paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 09:38:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

The TCommonDialog.Title property is flagged as nodefault.

Browse Source 
Without this change, Title property equal to '' is not saved to .lfm file.
This commit is contained in:
Sergey Larin 2022-02-20 13:35:22 +03:00
parent 3964d9db3b
commit b85417a330
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/dialogs.pp
View File

@ -131,7 +131,7 @@ type
property OnCanClose: TCloseQueryEvent read FOnCanClose write FOnCanClose;
property OnShow: TNotifyEvent read FOnShow write FOnShow;
property HelpContext: THelpContext read FHelpContext write FHelpContext default 0;
property Title: TTranslateString read FTitle write FTitle stored IsTitleStored;
property Title: TTranslateString read FTitle write FTitle stored IsTitleStored nodefault;
end;