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

Qt6: fixed bug with TSelectDirectoryDialog.

Browse Source
This commit is contained in:
zeljan1 2022-11-25 11:37:47 +01:00
parent a9c050a248
commit 16e54b9154
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/qt6/qtwsdialogs.pp
View File

@ -730,7 +730,8 @@ begin
QFileDialog_setOption(QFileDialogH(FileDialog.Widget),
QFileDialogOptionDontUseNativeDialog, False);
FileDialog.setFileMode(QFileDialogDirectoryOnly);
FileDialog.setFileMode(QFileDialogDirectory);
QFileDialog_setOption(QFileDialogH(FileDialog.Widget), QFileDialogOptionShowDirsOnly, True);
FileDialog.AttachEvents;