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

Packager: improve 'Missing package files' dialog localization

Browse Source 
git-svn-id: trunk@29088 -
This commit is contained in:
maxim 2011-01-17 23:54:03 +00:00
parent a3ab5687f0
commit 36f561684e
2 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
packager/missingpkgfilesdlg.lfm
View File

@ -11,11 +11,12 @@ object MissingPkgFilesDialog: TMissingPkgFilesDialog
LCLVersion = '0.9.31' LCLVersion = '0.9.31'
object ButtonPanel1: TButtonPanel object ButtonPanel1: TButtonPanel
Left = 6 Left = 6
Height = 42 Height = 34
Top = 334 Top = 342
Width = 465 Width = 465
OKButton.Name = 'OKButton' OKButton.Name = 'OKButton'
OKButton.Caption = '&OK' OKButton.Caption = '&OK'
OKButton.OnClick = ButtonPanel1Click
HelpButton.Name = 'HelpButton' HelpButton.Name = 'HelpButton'
HelpButton.Caption = '&Help' HelpButton.Caption = '&Help'
HelpButton.Enabled = False HelpButton.Enabled = False
@ -29,12 +30,12 @@ object MissingPkgFilesDialog: TMissingPkgFilesDialog
end end
object FilesTreeView: TTreeView object FilesTreeView: TTreeView
Left = 6 Left = 6
Height = 322 Height = 330
Top = 6 Top = 6
Width = 465 Width = 465
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
DefaultItemHeight = 19 DefaultItemHeight = 15
TabOrder = 1 TabOrder = 1
end end
end end

2
packager/missingpkgfilesdlg.pas
View File

@ -69,7 +69,7 @@ end;
procedure TMissingPkgFilesDialog.FormCreate(Sender: TObject); procedure TMissingPkgFilesDialog.FormCreate(Sender: TObject);
begin begin
ButtonPanel1.OKButton.OnClick:=@ButtonPanel1Click; ButtonPanel1.CancelButton.Caption:=dlgCancel;
end; end;
procedure TMissingPkgFilesDialog.ButtonPanel1Click(Sender: TObject); procedure TMissingPkgFilesDialog.ButtonPanel1Click(Sender: TObject);