Merged revision(s) 48503 #2ed00ef245, 48505 #ed8a304f4f from trunk:

Packager: Use filter "*.lpk" in save dialog for a new package. Issue #27726.
........
Packager: a better fix for new package save dialog, issue #27726.
........

git-svn-id: branches/fixes_1_4@48597 -
This commit is contained in:
maxim 2015-04-02 22:04:42 +00:00
parent 33a2c1d453
commit 86b6c144a5

View File

@ -1139,6 +1139,8 @@ begin
try
InputHistories.ApplyFileDialogSettings(SaveDialog);
SaveDialog.Title:=Format(lisPkgMangSavePackageLpk, [APackage.IDAsString]);
SaveDialog.Filter:=lisLazarusPackage+' (*.lpk)|*.lpk'
+'|'+dlgAllFiles+' ('+FileMask+')|'+FileMask;
if APackage.HasDirectory then
SaveDialog.InitialDir:=APackage.Directory;