From 36f561684ecfb4c7c9e5bffc1a5b25474dab2b24 Mon Sep 17 00:00:00 2001 From: maxim Date: Mon, 17 Jan 2011 23:54:03 +0000 Subject: [PATCH] Packager: improve 'Missing package files' dialog localization git-svn-id: trunk@29088 - --- packager/missingpkgfilesdlg.lfm | 9 +++++---- packager/missingpkgfilesdlg.pas | 2 +- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/packager/missingpkgfilesdlg.lfm b/packager/missingpkgfilesdlg.lfm index caddf673c4..e4bf3d4fe9 100644 --- a/packager/missingpkgfilesdlg.lfm +++ b/packager/missingpkgfilesdlg.lfm @@ -11,11 +11,12 @@ object MissingPkgFilesDialog: TMissingPkgFilesDialog LCLVersion = '0.9.31' object ButtonPanel1: TButtonPanel Left = 6 - Height = 42 - Top = 334 + Height = 34 + Top = 342 Width = 465 OKButton.Name = 'OKButton' OKButton.Caption = '&OK' + OKButton.OnClick = ButtonPanel1Click HelpButton.Name = 'HelpButton' HelpButton.Caption = '&Help' HelpButton.Enabled = False @@ -29,12 +30,12 @@ object MissingPkgFilesDialog: TMissingPkgFilesDialog end object FilesTreeView: TTreeView Left = 6 - Height = 322 + Height = 330 Top = 6 Width = 465 Align = alClient BorderSpacing.Around = 6 - DefaultItemHeight = 19 + DefaultItemHeight = 15 TabOrder = 1 end end diff --git a/packager/missingpkgfilesdlg.pas b/packager/missingpkgfilesdlg.pas index 150f1058ac..d33d9ee182 100644 --- a/packager/missingpkgfilesdlg.pas +++ b/packager/missingpkgfilesdlg.pas @@ -69,7 +69,7 @@ end; procedure TMissingPkgFilesDialog.FormCreate(Sender: TObject); begin - ButtonPanel1.OKButton.OnClick:=@ButtonPanel1Click; + ButtonPanel1.CancelButton.Caption:=dlgCancel; end; procedure TMissingPkgFilesDialog.ButtonPanel1Click(Sender: TObject);