paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-17 23:49:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

Debugger: Add file filter to History dialog. Issue , patch from Alexey Torgashin.

Browse Source 
git-svn-id: trunk@49190 -
This commit is contained in:
juha 2015-05-27 10:41:53 +00:00
parent f5bdffceb6
commit 50f2b070b6
1 changed files with 5 additions and 0 deletions

5
debugger/historydlg.pp
View File

@ -362,6 +362,11 @@ begin
for i := low(COL_WIDTHS) to high(COL_WIDTHS) do
lvHistory.Column[i].Width := COL_WIDTHS[i];
OpenDialog1.Title := lisImport;
SaveDialog1.Title := lisExport;
OpenDialog1.Filter := Format('%s|*.xml|%s|*.*|', [lisXMLFiles, lisAllFiles]);
SaveDialog1.Filter := OpenDialog1.Filter;
end;
initialization