mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 05:39:24 +02:00
cocoa: adding support for close event of a filedialog
git-svn-id: trunk@62160 -
This commit is contained in:
parent
2ea0313525
commit
f06e1e33c9
@ -440,6 +440,7 @@ begin
|
||||
if lFilter <> nil then
|
||||
FileDialog.FilterIndex := lFilter.lastSelectedItemIndex+1;
|
||||
end;
|
||||
FileDialog.DoClose;
|
||||
|
||||
|
||||
// release everything
|
||||
|
Loading…
Reference in New Issue
Block a user