paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-07 16:00:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

qt, qt5: fix uninitialized result in TQtComboBox.getText

Browse Source 
git-svn-id: trunk@55043 -
This commit is contained in:
ondrej 2017-05-22 13:50:57 +00:00
parent 3dbd19358b
commit 675c59e5e6
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/interfaces/qt/qtwidgets.pas
View File

@ -11279,6 +11279,7 @@ end;
function TQtComboBox.getText: WideString;
begin
Result := '';
QComboBox_currentText(QComboBoxH(Widget), @Result);
if FOwnerDrawn and (FLineEdit = nil) and
(Result = '') and (Result <> FText) then

1
lcl/interfaces/qt5/qtwidgets.pas
View File

@ -11248,6 +11248,7 @@ end;
function TQtComboBox.getText: WideString;
begin
Result := '';
QComboBox_currentText(QComboBoxH(Widget), @Result);
if FOwnerDrawn and (FLineEdit = nil) and
(Result = '') and (Result <> FText) then