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

IDE, Build mode differences dialog: improved layout and localized

Browse Source 
git-svn-id: trunk@28205 -
This commit is contained in:
maxim 2010-11-14 16:07:39 +00:00
parent 977afc6da5
commit ffa63ddfd3
3 changed files with 37 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
ide/buildmodediffdlg.lfm
View File

@ -9,10 +9,10 @@ object BuildModeDiffDialog: TBuildModeDiffDialog
OnCreate = FormCreate OnCreate = FormCreate
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.29' LCLVersion = '0.9.29'
object ButtonPanel1: TButtonPanel object ButtonPanel: TButtonPanel
Left = 6 Left = 6
Height = 40 Height = 34
Top = 270 Top = 276
Width = 481 Width = 481
OKButton.Name = 'OKButton' OKButton.Name = 'OKButton'
OKButton.Caption = '&OK' OKButton.Caption = '&OK'
@ -32,11 +32,11 @@ object BuildModeDiffDialog: TBuildModeDiffDialog
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ModeComboBox AnchorSideTop.Control = ModeComboBox
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 10 Left = 6
Height = 18 Height = 14
Top = 14 Top = 9
Width = 78 Width = 52
BorderSpacing.Left = 10 BorderSpacing.Left = 6
Caption = 'ModeLabel' Caption = 'ModeLabel'
ParentColor = False ParentColor = False
end end
@ -46,13 +46,13 @@ object BuildModeDiffDialog: TBuildModeDiffDialog
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 98 Left = 64
Height = 27 Height = 21
Top = 10 Top = 6
Width = 385 Width = 423
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 10 BorderSpacing.Around = 6
ItemHeight = 0 ItemHeight = 13
OnChange = ModeComboBoxChange OnChange = ModeComboBoxChange
TabOrder = 1 TabOrder = 1
Text = 'ModeComboBox' Text = 'ModeComboBox'
@ -60,26 +60,25 @@ object BuildModeDiffDialog: TBuildModeDiffDialog
object DiffsGroupBox: TGroupBox object DiffsGroupBox: TGroupBox
AnchorSideTop.Control = ModeComboBox AnchorSideTop.Control = ModeComboBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 Left = 6
Height = 217 Height = 237
Top = 47 Top = 33
Width = 473 Width = 481
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 4
BorderSpacing.Right = 4
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'DiffsGroupBox' Caption = 'DiffsGroupBox'
ClientHeight = 196 ClientHeight = 219
ClientWidth = 465 ClientWidth = 477
TabOrder = 2 TabOrder = 2
object DiffTreeView: TTreeView object DiffTreeView: TTreeView
Left = 0 Left = 6
Height = 196 Height = 207
Top = 0 Top = 6
Width = 465 Width = 465
Align = alClient Align = alClient
DefaultItemHeight = 19 BorderSpacing.Around = 6
DefaultItemHeight = 15
TabOrder = 0 TabOrder = 0
end end
end end

9
ide/buildmodediffdlg.pas
View File

@ -38,7 +38,7 @@ type
{ TBuildModeDiffDialog } { TBuildModeDiffDialog }
TBuildModeDiffDialog = class(TForm) TBuildModeDiffDialog = class(TForm)
ButtonPanel1: TButtonPanel; ButtonPanel: TButtonPanel;
DiffsGroupBox: TGroupBox; DiffsGroupBox: TGroupBox;
DiffTreeView: TTreeView; DiffTreeView: TTreeView;
ModeComboBox: TComboBox; ModeComboBox: TComboBox;
@ -81,10 +81,11 @@ end;
procedure TBuildModeDiffDialog.FormCreate(Sender: TObject); procedure TBuildModeDiffDialog.FormCreate(Sender: TObject);
begin begin
Caption:='Differences between build modes'; Caption:=lisBuildModeDiffDifferencesBetweenBuildModes;
ModeLabel.Caption:='Mode:'; ModeLabel.Caption:=lisBuildModeDiffMode;
DiffsGroupBox.Caption:='Differences to other build modes'; DiffsGroupBox.Caption:=lisBuildModeDiffDifferencesToOtherBuildModes;
ButtonPanel.CloseButton.Caption:=lisClose;
end; end;
procedure TBuildModeDiffDialog.ModeComboBoxChange(Sender: TObject); procedure TBuildModeDiffDialog.ModeComboBoxChange(Sender: TObject);

7
ide/lazarusidestrconsts.pas
View File

@ -4979,6 +4979,13 @@ resourcestring
lisKeepInInstallList = 'Keep in install list'; lisKeepInInstallList = 'Keep in install list';
lisInformationAboutUsedFPC = 'Information about used FPC'; lisInformationAboutUsedFPC = 'Information about used FPC';
//Build mode differences dialog
lisBuildModeDiffDifferencesBetweenBuildModes = 'Differences between build '
+'modes';
lisBuildModeDiffMode = 'Mode:';
lisBuildModeDiffDifferencesToOtherBuildModes = 'Differences to other build '
+'modes';
implementation implementation
end. end.