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

IDE: fixed layout

Browse Source 
git-svn-id: trunk@38093 -
This commit is contained in:
mattias 2012-07-31 10:48:39 +00:00
parent 350b296eb4
commit 79d54c4c15
2 changed files with 99 additions and 93 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

191
ide/initialsetupdlgs.lfm
View File

@ -18,13 +18,12 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideRight.Control = Splitter1 AnchorSideRight.Control = Splitter1
AnchorSideBottom.Control = BtnPanel AnchorSideBottom.Control = BtnPanel
Left = 6 Left = 6
Height = 286 Height = 282
Top = 54 Top = 54
Width = 159 Width = 159
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 6 BorderSpacing.Top = 6
DefaultItemHeight = 18
Images = ImageList1 Images = ImageList1
ReadOnly = True ReadOnly = True
ScrollBars = ssNone ScrollBars = ssNone
@ -40,7 +39,7 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideBottom.Control = PropertiesTreeView AnchorSideBottom.Control = PropertiesTreeView
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 165 Left = 165
Height = 286 Height = 282
Top = 54 Top = 54
Width = 5 Width = 5
Align = alNone Align = alNone
@ -48,21 +47,21 @@ object InitialSetupDialog: TInitialSetupDialog
end end
object BtnPanel: TPanel object BtnPanel: TPanel
Left = 10 Left = 10
Height = 25 Height = 29
Top = 350 Top = 346
Width = 600 Width = 600
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BorderSpacing.Around = 10 BorderSpacing.Around = 10
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 25 ClientHeight = 29
ClientWidth = 600 ClientWidth = 600
TabOrder = 2 TabOrder = 2
object StartIDEBitBtn: TBitBtn object StartIDEBitBtn: TBitBtn
Left = 500 Left = 490
Height = 25 Height = 29
Top = 0 Top = 0
Width = 100 Width = 110
Align = alRight Align = alRight
AutoSize = True AutoSize = True
Caption = 'StartIDEBitBtn' Caption = 'StartIDEBitBtn'
@ -80,13 +79,13 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideBottom.Control = Splitter1 AnchorSideBottom.Control = Splitter1
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 170 Left = 170
Height = 286 Height = 282
Top = 54 Top = 54
Width = 444 Width = 444
ActivePage = LazarusTabSheet ActivePage = MakeExeTabSheet
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Right = 6 BorderSpacing.Right = 6
TabIndex = 0 TabIndex = 3
TabOrder = 3 TabOrder = 3
OnChange = PropertiesPageControlChange OnChange = PropertiesPageControlChange
Options = [nboHidePageListPopup] Options = [nboHidePageListPopup]
@ -96,13 +95,13 @@ object InitialSetupDialog: TInitialSetupDialog
ChildSizing.TopBottomSpacing = 6 ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 6 ChildSizing.HorizontalSpacing = 6
ChildSizing.VerticalSpacing = 6 ChildSizing.VerticalSpacing = 6
ClientHeight = 258 ClientHeight = 251
ClientWidth = 436 ClientWidth = 440
object LazDirLabel: TLabel object LazDirLabel: TLabel
Left = 6 Left = 6
Height = 15 Height = 17
Top = 6 Top = 6
Width = 424 Width = 428
Align = alTop Align = alTop
Caption = 'LazDirLabel' Caption = 'LazDirLabel'
ParentColor = False ParentColor = False
@ -115,11 +114,11 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideRight.Control = LazarusTabSheet AnchorSideRight.Control = LazarusTabSheet
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 23 Height = 29
Top = 27 Top = 29
Width = 424 Width = 428
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
ItemHeight = 15 ItemHeight = 0
OnChange = LazDirComboBoxChange OnChange = LazDirComboBoxChange
TabOrder = 0 TabOrder = 0
Text = 'LazDirComboBox' Text = 'LazDirComboBox'
@ -128,9 +127,9 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideTop.Control = LazDirBrowseButton AnchorSideTop.Control = LazDirBrowseButton
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 165 Height = 146
Top = 87 Top = 99
Width = 424 Width = 428
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
Lines.Strings = ( Lines.Strings = (
@ -148,9 +147,9 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 25 Height = 29
Top = 56 Top = 64
Width = 132 Width = 151
AutoSize = True AutoSize = True
Caption = 'LazDirBrowseButton' Caption = 'LazDirBrowseButton'
OnClick = LazDirBrowseButtonClick OnClick = LazDirBrowseButtonClick
@ -163,13 +162,13 @@ object InitialSetupDialog: TInitialSetupDialog
ChildSizing.TopBottomSpacing = 6 ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 6 ChildSizing.HorizontalSpacing = 6
ChildSizing.VerticalSpacing = 6 ChildSizing.VerticalSpacing = 6
ClientHeight = 258 ClientHeight = 251
ClientWidth = 436 ClientWidth = 440
object CompilerLabel: TLabel object CompilerLabel: TLabel
Left = 6 Left = 6
Height = 15 Height = 17
Top = 6 Top = 6
Width = 424 Width = 428
Align = alTop Align = alTop
Caption = 'CompilerLabel' Caption = 'CompilerLabel'
ParentColor = False ParentColor = False
@ -182,11 +181,11 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideRight.Control = CompilerTabSheet AnchorSideRight.Control = CompilerTabSheet
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 23 Height = 29
Top = 27 Top = 29
Width = 424 Width = 428
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
ItemHeight = 15 ItemHeight = 0
OnChange = CompilerComboBoxChange OnChange = CompilerComboBoxChange
TabOrder = 0 TabOrder = 0
Text = 'CompilerComboBox' Text = 'CompilerComboBox'
@ -196,9 +195,9 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideTop.Control = CompilerComboBox AnchorSideTop.Control = CompilerComboBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 25 Height = 29
Top = 56 Top = 64
Width = 149 Width = 170
AutoSize = True AutoSize = True
Caption = 'CompilerBrowseButton' Caption = 'CompilerBrowseButton'
OnClick = CompilerBrowseButtonClick OnClick = CompilerBrowseButtonClick
@ -213,9 +212,9 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideBottom.Control = CompilerTabSheet AnchorSideBottom.Control = CompilerTabSheet
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 165 Height = 146
Top = 87 Top = 99
Width = 424 Width = 428
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
Lines.Strings = ( Lines.Strings = (
'CompilerMemo' 'CompilerMemo'
@ -232,13 +231,13 @@ object InitialSetupDialog: TInitialSetupDialog
ChildSizing.TopBottomSpacing = 6 ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 6 ChildSizing.HorizontalSpacing = 6
ChildSizing.VerticalSpacing = 6 ChildSizing.VerticalSpacing = 6
ClientHeight = 258 ClientHeight = 251
ClientWidth = 436 ClientWidth = 440
object FPCSrcDirLabel: TLabel object FPCSrcDirLabel: TLabel
Left = 6 Left = 6
Height = 15 Height = 17
Top = 6 Top = 6
Width = 424 Width = 428
Align = alTop Align = alTop
Caption = 'FPCSrcDirLabel' Caption = 'FPCSrcDirLabel'
ParentColor = False ParentColor = False
@ -246,11 +245,11 @@ object InitialSetupDialog: TInitialSetupDialog
end end
object FPCSrcDirComboBox: TComboBox object FPCSrcDirComboBox: TComboBox
Left = 6 Left = 6
Height = 23 Height = 29
Top = 27 Top = 29
Width = 424 Width = 428
Align = alTop Align = alTop
ItemHeight = 15 ItemHeight = 0
OnChange = FPCSrcDirComboBoxChange OnChange = FPCSrcDirComboBoxChange
TabOrder = 0 TabOrder = 0
Text = 'FPCSrcDirComboBox' Text = 'FPCSrcDirComboBox'
@ -260,9 +259,9 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideTop.Control = FPCSrcDirComboBox AnchorSideTop.Control = FPCSrcDirComboBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 25 Height = 29
Top = 56 Top = 64
Width = 152 Width = 175
AutoSize = True AutoSize = True
Caption = 'FPCSrcDirBrowseButton' Caption = 'FPCSrcDirBrowseButton'
OnClick = FPCSrcDirBrowseButtonClick OnClick = FPCSrcDirBrowseButtonClick
@ -272,9 +271,9 @@ object InitialSetupDialog: TInitialSetupDialog
AnchorSideTop.Control = FPCSrcDirBrowseButton AnchorSideTop.Control = FPCSrcDirBrowseButton
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 165 Height = 146
Top = 87 Top = 99
Width = 424 Width = 428
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
Lines.Strings = ( Lines.Strings = (
@ -288,38 +287,41 @@ object InitialSetupDialog: TInitialSetupDialog
end end
object MakeExeTabSheet: TTabSheet object MakeExeTabSheet: TTabSheet
Caption = 'MakeExeTabSheet' Caption = 'MakeExeTabSheet'
ClientHeight = 258 ClientHeight = 251
ClientWidth = 436 ClientWidth = 440
object MakeExeComboBox: TComboBox object MakeExeComboBox: TComboBox
Left = 0 Left = 6
Height = 23 Height = 29
Top = 15 Top = 29
Width = 436 Width = 428
Align = alTop Align = alTop
ItemHeight = 15 BorderSpacing.Around = 6
ItemHeight = 0
OnChange = MakeExeComboBoxChange OnChange = MakeExeComboBoxChange
TabOrder = 0 TabOrder = 0
Text = 'MakeExeComboBox' Text = 'MakeExeComboBox'
end end
object MakeExeLabel: TLabel object MakeExeLabel: TLabel
Left = 0 Left = 6
Height = 15 Height = 17
Top = 0 Top = 6
Width = 436 Width = 428
Align = alTop Align = alTop
BorderSpacing.Around = 6
Caption = 'MakeExeLabel' Caption = 'MakeExeLabel'
ParentColor = False ParentColor = False
WordWrap = True WordWrap = True
end end
object MakeExeBrowseButton: TButton object MakeExeBrowseButton: TButton
AnchorSideLeft.Control = FPCSourcesTabSheet AnchorSideLeft.Control = MakeExeTabSheet
AnchorSideTop.Control = MakeExeComboBox AnchorSideTop.Control = MakeExeComboBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 25 Height = 29
Top = 38 Top = 64
Width = 146 Width = 169
AutoSize = True AutoSize = True
BorderSpacing.Around = 6
Caption = 'MakeExeBrowseButton' Caption = 'MakeExeBrowseButton'
OnClick = MakeExeBrowseButtonClick OnClick = MakeExeBrowseButtonClick
TabOrder = 1 TabOrder = 1
@ -327,12 +329,13 @@ object InitialSetupDialog: TInitialSetupDialog
object MakeExeMemo: TMemo object MakeExeMemo: TMemo
AnchorSideTop.Control = MakeExeBrowseButton AnchorSideTop.Control = MakeExeBrowseButton
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 0 Left = 6
Height = 195 Height = 146
Top = 63 Top = 99
Width = 436 Width = 428
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Lines.Strings = ( Lines.Strings = (
'FPCSrcDirMemo' 'FPCSrcDirMemo'
'' ''
@ -344,38 +347,41 @@ object InitialSetupDialog: TInitialSetupDialog
end end
object DebuggerTabSheet: TTabSheet object DebuggerTabSheet: TTabSheet
Caption = 'DebuggerTabSheet' Caption = 'DebuggerTabSheet'
ClientHeight = 258 ClientHeight = 251
ClientWidth = 436 ClientWidth = 440
object DebuggerComboBox: TComboBox object DebuggerComboBox: TComboBox
Left = 0 Left = 6
Height = 23 Height = 29
Top = 15 Top = 29
Width = 436 Width = 428
Align = alTop Align = alTop
ItemHeight = 15 BorderSpacing.Around = 6
ItemHeight = 0
OnChange = DebuggerComboBoxChange OnChange = DebuggerComboBoxChange
TabOrder = 0 TabOrder = 0
Text = 'DebuggerComboBox' Text = 'DebuggerComboBox'
end end
object DebuggerLabel: TLabel object DebuggerLabel: TLabel
Left = 0 Left = 6
Height = 15 Height = 17
Top = 0 Top = 6
Width = 436 Width = 428
Align = alTop Align = alTop
BorderSpacing.Around = 6
Caption = 'DebuggerLabel' Caption = 'DebuggerLabel'
ParentColor = False ParentColor = False
WordWrap = True WordWrap = True
end end
object DebuggerBrowseButton: TButton object DebuggerBrowseButton: TButton
AnchorSideLeft.Control = FPCSourcesTabSheet AnchorSideLeft.Control = DebuggerTabSheet
AnchorSideTop.Control = DebuggerComboBox AnchorSideTop.Control = DebuggerComboBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 25 Height = 29
Top = 38 Top = 64
Width = 152 Width = 173
AutoSize = True AutoSize = True
BorderSpacing.Around = 6
Caption = 'DebuggerBrowseButton' Caption = 'DebuggerBrowseButton'
OnClick = DebuggerBrowseButtonClick OnClick = DebuggerBrowseButtonClick
TabOrder = 1 TabOrder = 1
@ -383,12 +389,13 @@ object InitialSetupDialog: TInitialSetupDialog
object DebuggerMemo: TMemo object DebuggerMemo: TMemo
AnchorSideTop.Control = DebuggerBrowseButton AnchorSideTop.Control = DebuggerBrowseButton
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 0 Left = 6
Height = 195 Height = 146
Top = 63 Top = 99
Width = 436 Width = 428
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Lines.Strings = ( Lines.Strings = (
'FPCSrcDirMemo' 'FPCSrcDirMemo'
'' ''

1
ide/initialsetupdlgs.pas
View File

@ -1327,7 +1327,6 @@ begin
DebuggerBrowseButton.Caption:=lisPathEditBrowse; DebuggerBrowseButton.Caption:=lisPathEditBrowse;
DebuggerLabel.Caption:=Format( DebuggerLabel.Caption:=Format(
lisTheDebuggerExecutableTypicallyHasTheName, ['gdb'+GetExecutableExt('')]); lisTheDebuggerExecutableTypicallyHasTheName, ['gdb'+GetExecutableExt('')]);
end; end;
procedure TInitialSetupDialog.CompilerComboBoxChange(Sender: TObject); procedure TInitialSetupDialog.CompilerComboBoxChange(Sender: TObject);