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

Win32: Vista dialogs: reverse the logic of applying FOS_STRICTFILETYPES to IFileDialog.

Browse Source
This commit is contained in:
Bart 2023-08-19 19:32:53 +02:00
parent e5c0139d49
commit ed3e261065
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/win32/win32wsdialogs.pp
View File

@ -843,7 +843,7 @@ begin
Result := 0; Result := 0;
if ofAllowMultiSelect in Options then Result := Result or FOS_ALLOWMULTISELECT; if ofAllowMultiSelect in Options then Result := Result or FOS_ALLOWMULTISELECT;
if ofCreatePrompt in Options then Result := Result or FOS_CREATEPROMPT; if ofCreatePrompt in Options then Result := Result or FOS_CREATEPROMPT;
if ofExtensionDifferent in Options then Result := Result or FOS_STRICTFILETYPES; if not (ofExtensionDifferent in Options) then Result := Result or FOS_STRICTFILETYPES;
if ofFileMustExist in Options then Result := Result or FOS_FILEMUSTEXIST; if ofFileMustExist in Options then Result := Result or FOS_FILEMUSTEXIST;
if ofNoChangeDir in Options then Result := Result or FOS_NOCHANGEDIR; if ofNoChangeDir in Options then Result := Result or FOS_NOCHANGEDIR;
if ofNoDereferenceLinks in Options then Result := Result or FOS_NODEREFERENCELINKS; if ofNoDereferenceLinks in Options then Result := Result or FOS_NODEREFERENCELINKS;