paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 08:29:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

Merged revision(s) 55453 #3a95ba5f79 from trunk:

Browse Source 
QT, QT5: Initialize WideString Result in TQtTextEdit methods.
........

git-svn-id: branches/fixes_1_8@55471 -
This commit is contained in:
maxim 2017-07-08 12:06:53 +00:00
parent 56b247bb3a
commit e3226dc645
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

@ -9966,6 +9966,7 @@ end;
function TQtTextEdit.getText: WideString; function TQtTextEdit.getText: WideString;
begin begin
Result := '';
QTextEdit_toPlainText(QTextEditH(Widget), @Result); QTextEdit_toPlainText(QTextEditH(Widget), @Result);
end; end;

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

@ -9931,6 +9931,7 @@ end;
function TQtTextEdit.getText: WideString; function TQtTextEdit.getText: WideString;
begin begin
Result := '';
QTextEdit_toPlainText(QTextEditH(Widget), @Result); QTextEdit_toPlainText(QTextEditH(Widget), @Result);
end; end;