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

Qt4: fixed build under mswindows

Browse Source 
git-svn-id: trunk@55737 -
This commit is contained in:
zeljko 2017-08-23 09:29:58 +00:00
parent 0d932901b9
commit 2e764a39b1
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/qt/qtwsdialogs.pp
View File

@ -411,10 +411,12 @@ var
ReturnList: QStringListH;
i: integer;
QtFileDialog: TQtFileDialog;
{$if defined(QT_NATIVE_DIALOGS) or defined(MSWINDOWS)}
s: string;
{$endif}
{$ifdef QT_NATIVE_DIALOGS}
selectedFilter, saveFileName, saveFilter, saveTitle, sDir: WideString;
Flags: Cardinal;
s: string;
{$endif}
ActiveWin: HWND;
begin