Commit a14e2188 authored by Bart B's avatar Bart B 🐞
Browse files

Win32: handle ofDontAddToRecent option in TOpen/SaveDialog (Issue #27682).

git-svn-id: trunk@49187 -
parent d70ff5b8
......@@ -604,6 +604,7 @@ function CreateFileDialogHandle(AOpenDialog: TOpenDialog): THandle;
if ofReadOnly in Options then Result := Result or OFN_READONLY;
if ofShareAware in Options then Result := Result or OFN_SHAREAWARE;
if ofShowHelp in Options then Result := Result or OFN_SHOWHELP;
if ofDontAddToRecent in Options then Result := Result or OFN_DONTADDTORECENT;
end;
procedure ReplacePipe(var AFilter:string);
......@@ -799,6 +800,7 @@ FOS_FORCEPREVIEWPANEON}
if ofOverwritePrompt in Options then Result := Result or FOS_OVERWRITEPROMPT;
if ofPathMustExist in Options then Result := Result or FOS_PATHMUSTEXIST;
if ofShareAware in Options then Result := Result or FOS_SHAREAWARE;
if ofDontAddToRecent in Options then Result := Result or FOS_DONTADDTORECENT;
{ unavailable options:
ofHideReadOnly
ofEnableSizing
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment