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

improved layout (issue #1454)

Browse Source 
git-svn-id: trunk@8724 -
This commit is contained in:
vincents 2006-02-09 23:52:13 +00:00
parent 1df08341cb
commit 1687699a68
2 changed files with 1374 additions and 1386 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

844
ide/codetoolsdefines.lfm
View File

@ -1,8 +1,14 @@
object CodeToolsDefinesEditor: TCodeToolsDefinesEditor object CodeToolsDefinesEditor: TCodeToolsDefinesEditor
Left = 381
Height = 461
Top = 235
Width = 500
HorzScrollBar.Page = 499
VertScrollBar.Page = 440
ActiveControl = DefineTreeView ActiveControl = DefineTreeView
BorderStyle = bsSizeToolWin BorderStyle = bsSizeToolWin
Caption = 'CodeToolsDefinesEditor' Caption = 'CodeToolsDefinesEditor'
ClientHeight = 440 ClientHeight = 441
ClientWidth = 500 ClientWidth = 500
KeyPreview = True KeyPreview = True
Menu = MainMenu Menu = MainMenu
@ -10,99 +16,440 @@ object CodeToolsDefinesEditor: TCodeToolsDefinesEditor
OnKeyUp = CodeToolsDefinesEditorKeyUp OnKeyUp = CodeToolsDefinesEditorKeyUp
PixelsPerInch = 96 PixelsPerInch = 96
Position = poScreenCenter Position = poScreenCenter
HorzScrollBar.Page = 499
VertScrollBar.Page = 439
Left = 846
Height = 460
Top = 519
Width = 500
object DefineTreeView: TTreeView object DefineTreeView: TTreeView
Left = 6
Height = 123
Top = 6
Width = 488
Align = alTop Align = alTop
BorderSpacing.Around = 6
DefaultItemHeight = 22 DefaultItemHeight = 22
Images = TheImageList Images = TheImageList
StateImages = TheImageList StateImages = TheImageList
TabOrder = 0 TabOrder = 0
OnSelectionChanged = DefineTreeViewSelectionChanged OnSelectionChanged = DefineTreeViewSelectionChanged
Height = 123
Width = 500
end end
object SelectedItemGroupBox: TGroupBox object SelectedItemGroupBox: TGroupBox
Left = 6
Height = 291
Top = 144
Width = 488
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'SelectedItemGroupBox' Caption = 'SelectedItemGroupBox'
ClientHeight = 282 ClientHeight = 273
ClientWidth = 484 ClientWidth = 484
TabOrder = 1 TabOrder = 1
Left = 6
Height = 300
Top = 134
Width = 488
object NameLabel: TLabel object NameLabel: TLabel
BorderSpacing.Right = 6
Caption = 'NameLabel'
Color = clNone
ParentColor = False
Left = 10 Left = 10
Height = 14 Height = 14
Top = 26 Top = 26
Width = 53 Width = 53
end
object DescriptionLabel: TLabel
BorderSpacing.Right = 6 BorderSpacing.Right = 6
Caption = 'DescriptionLabel' Caption = 'NameLabel'
Color = clNone Color = clNone
ParentColor = False ParentColor = False
end
object DescriptionLabel: TLabel
Left = 10 Left = 10
Height = 14 Height = 14
Top = 53 Top = 53
Width = 79 Width = 79
BorderSpacing.Right = 6
Caption = 'DescriptionLabel'
Color = clNone
ParentColor = False
end end
object TypeLabel: TLabel object TypeLabel: TLabel
Left = 6
Height = 14
Top = 6
Width = 472
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'TypeLabel' Caption = 'TypeLabel'
Color = clNone Color = clNone
ParentColor = False ParentColor = False
Left = 6
Height = 14
Top = 6
Width = 472
end end
object VariableLabel: TLabel object VariableLabel: TLabel
BorderSpacing.Right = 6
Caption = 'VariableLabel'
Color = clNone
ParentColor = False
Left = 10 Left = 10
Height = 14 Height = 14
Top = 78 Top = 78
Width = 64 Width = 64
BorderSpacing.Right = 6
Caption = 'VariableLabel'
Color = clNone
ParentColor = False
end end
object ValueNoteBook: TNotebook object ValueNoteBook: TNotebook
Left = 6
Height = 161
Top = 106
Width = 472
Align = alBottom Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
OnPageChanged = ValueNoteBookPageChanged OnPageChanged = ValueNoteBookPageChanged
PageIndex = 1 PageIndex = 1
Left = 6
Height = 170
Top = 106
Width = 472
object Page1: TPage object Page1: TPage
Caption = 'Page1' Caption = 'Page1'
ClientWidth = 464 ClientWidth = 464
ClientHeight = 144 ClientHeight = 135
Height = 144
Width = 464
object ValueAsTextSynEdit: TSynEdit object ValueAsTextSynEdit: TSynEdit
Name = 'ValueAsTextSynEdit'
Height = 150
Width = 464
Align = alClient Align = alClient
Font.Height = -16 Font.Height = -16
Font.Name = 'courier' Font.Name = 'courier'
Height = 150
Name = 'ValueAsTextSynEdit'
ParentColor = False ParentColor = False
TabOrder = 0 TabOrder = 0
Width = 464 BookMarkOptions.Xoffset = -18
Gutter.Visible = False
Gutter.CodeFoldingWidth = 14
Keystrokes = <
item
Command = 3
ShortCut = 38
end
item
Command = 103
ShortCut = 8230
end
item
Command = 211
ShortCut = 16422
end
item
Command = 4
ShortCut = 40
end
item
Command = 104
ShortCut = 8232
end
item
Command = 212
ShortCut = 16424
end
item
Command = 1
ShortCut = 37
end
item
Command = 101
ShortCut = 8229
end
item
Command = 5
ShortCut = 16421
end
item
Command = 105
ShortCut = 24613
end
item
Command = 2
ShortCut = 39
end
item
Command = 102
ShortCut = 8231
end
item
Command = 6
ShortCut = 16423
end
item
Command = 106
ShortCut = 24615
end
item
Command = 10
ShortCut = 34
end
item
Command = 110
ShortCut = 8226
end
item
Command = 14
ShortCut = 16418
end
item
Command = 114
ShortCut = 24610
end
item
Command = 9
ShortCut = 33
end
item
Command = 109
ShortCut = 8225
end
item
Command = 13
ShortCut = 16417
end
item
Command = 113
ShortCut = 24609
end
item
Command = 7
ShortCut = 36
end
item
Command = 107
ShortCut = 8228
end
item
Command = 15
ShortCut = 16420
end
item
Command = 115
ShortCut = 24612
end
item
Command = 8
ShortCut = 35
end
item
Command = 108
ShortCut = 8227
end
item
Command = 16
ShortCut = 16419
end
item
Command = 116
ShortCut = 24611
end
item
Command = 223
ShortCut = 45
end
item
Command = 201
ShortCut = 16429
end
item
Command = 604
ShortCut = 8237
end
item
Command = 502
ShortCut = 46
end
item
Command = 603
ShortCut = 8238
end
item
Command = 501
ShortCut = 8
end
item
Command = 501
ShortCut = 8200
end
item
Command = 504
ShortCut = 16392
end
item
Command = 601
ShortCut = 32776
end
item
Command = 602
ShortCut = 40968
end
item
Command = 509
ShortCut = 13
end
item
Command = 199
ShortCut = 16449
end
item
Command = 201
ShortCut = 16451
end
item
Command = 610
ShortCut = 24649
end
item
Command = 509
ShortCut = 16461
end
item
Command = 510
ShortCut = 16462
end
item
Command = 503
ShortCut = 16468
end
item
Command = 611
ShortCut = 24661
end
item
Command = 604
ShortCut = 16470
end
item
Command = 603
ShortCut = 16472
end
item
Command = 507
ShortCut = 16473
end
item
Command = 506
ShortCut = 24665
end
item
Command = 601
ShortCut = 16474
end
item
Command = 602
ShortCut = 24666
end
item
Command = 301
ShortCut = 16432
end
item
Command = 302
ShortCut = 16433
end
item
Command = 303
ShortCut = 16434
end
item
Command = 304
ShortCut = 16435
end
item
Command = 305
ShortCut = 16436
end
item
Command = 306
ShortCut = 16437
end
item
Command = 307
ShortCut = 16438
end
item
Command = 308
ShortCut = 16439
end
item
Command = 309
ShortCut = 16440
end
item
Command = 310
ShortCut = 16441
end
item
Command = 351
ShortCut = 24624
end
item
Command = 352
ShortCut = 24625
end
item
Command = 353
ShortCut = 24626
end
item
Command = 354
ShortCut = 24627
end
item
Command = 355
ShortCut = 24628
end
item
Command = 356
ShortCut = 24629
end
item
Command = 357
ShortCut = 24630
end
item
Command = 358
ShortCut = 24631
end
item
Command = 359
ShortCut = 24632
end
item
Command = 360
ShortCut = 24633
end
item
Command = 231
ShortCut = 24654
end
item
Command = 232
ShortCut = 24643
end
item
Command = 233
ShortCut = 24652
end
item
Command = 612
ShortCut = 9
end
item
Command = 613
ShortCut = 8201
end
item
Command = 250
ShortCut = 24642
end>
Lines.Strings = (
'ValueAsTextSynEdit'
)
Options = [eoDragDropEditing, eoHalfPageScroll, eoScrollByOneLess, eoScrollPastEol, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoBracketHighlight, eoHideRightMargin]
end
end
object Page2: TPage
Caption = 'Page2'
ClientWidth = 464
ClientHeight = 135
object ValueAsFilePathsSynEdit: TSynEdit
Name = 'ValueAsFilePathsSynEdit'
AnchorSideRight.Control = DeleteFilePathBitBtn
Height = 135
Width = 376
Align = alLeft
BorderSpacing.Right = 6
Anchors = [akTop, akLeft, akRight, akBottom]
Font.Height = -16
Font.Name = 'courier'
ParentColor = False
TabOrder = 0
BookMarkOptions.Xoffset = -18 BookMarkOptions.Xoffset = -18
BookMarkOptions.OnChange = nil BookMarkOptions.OnChange = nil
Gutter.Visible = False Gutter.Visible = False
@ -434,451 +781,94 @@ object CodeToolsDefinesEditor: TCodeToolsDefinesEditor
) )
Options = [eoDragDropEditing, eoHalfPageScroll, eoScrollByOneLess, eoScrollPastEol, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoBracketHighlight, eoHideRightMargin] Options = [eoDragDropEditing, eoHalfPageScroll, eoScrollByOneLess, eoScrollPastEol, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoBracketHighlight, eoHideRightMargin]
SelectedColor.OnChange = nil SelectedColor.OnChange = nil
Cursor = crIBeam
Height = 150
Width = 464
end
end
object Page2: TPage
Caption = 'Page2'
ClientWidth = 464
ClientHeight = 144
Height = 144
Width = 464
object ValueAsFilePathsSynEdit: TSynEdit
Align = alLeft
BorderSpacing.Right = 6
Anchors = [akTop, akLeft, akRight, akBottom]
Font.Height = -16
Font.Name = 'courier'
Height = 144
Name = 'ValueAsFilePathsSynEdit'
ParentColor = False
TabOrder = 0
Width = 376
BookMarkOptions.Xoffset = -18
Gutter.Visible = False
Gutter.CodeFoldingWidth = 14
Keystrokes = <
item
Command = 3
ShortCut = 38
end
item
Command = 103
ShortCut = 8230
end
item
Command = 211
ShortCut = 16422
end
item
Command = 4
ShortCut = 40
end
item
Command = 104
ShortCut = 8232
end
item
Command = 212
ShortCut = 16424
end
item
Command = 1
ShortCut = 37
end
item
Command = 101
ShortCut = 8229
end
item
Command = 5
ShortCut = 16421
end
item
Command = 105
ShortCut = 24613
end
item
Command = 2
ShortCut = 39
end
item
Command = 102
ShortCut = 8231
end
item
Command = 6
ShortCut = 16423
end
item
Command = 106
ShortCut = 24615
end
item
Command = 10
ShortCut = 34
end
item
Command = 110
ShortCut = 8226
end
item
Command = 14
ShortCut = 16418
end
item
Command = 114
ShortCut = 24610
end
item
Command = 9
ShortCut = 33
end
item
Command = 109
ShortCut = 8225
end
item
Command = 13
ShortCut = 16417
end
item
Command = 113
ShortCut = 24609
end
item
Command = 7
ShortCut = 36
end
item
Command = 107
ShortCut = 8228
end
item
Command = 15
ShortCut = 16420
end
item
Command = 115
ShortCut = 24612
end
item
Command = 8
ShortCut = 35
end
item
Command = 108
ShortCut = 8227
end
item
Command = 16
ShortCut = 16419
end
item
Command = 116
ShortCut = 24611
end
item
Command = 223
ShortCut = 45
end
item
Command = 201
ShortCut = 16429
end
item
Command = 604
ShortCut = 8237
end
item
Command = 502
ShortCut = 46
end
item
Command = 603
ShortCut = 8238
end
item
Command = 501
ShortCut = 8
end
item
Command = 501
ShortCut = 8200
end
item
Command = 504
ShortCut = 16392
end
item
Command = 601
ShortCut = 32776
end
item
Command = 602
ShortCut = 40968
end
item
Command = 509
ShortCut = 13
end
item
Command = 199
ShortCut = 16449
end
item
Command = 201
ShortCut = 16451
end
item
Command = 610
ShortCut = 24649
end
item
Command = 509
ShortCut = 16461
end
item
Command = 510
ShortCut = 16462
end
item
Command = 503
ShortCut = 16468
end
item
Command = 611
ShortCut = 24661
end
item
Command = 604
ShortCut = 16470
end
item
Command = 603
ShortCut = 16472
end
item
Command = 507
ShortCut = 16473
end
item
Command = 506
ShortCut = 24665
end
item
Command = 601
ShortCut = 16474
end
item
Command = 602
ShortCut = 24666
end
item
Command = 301
ShortCut = 16432
end
item
Command = 302
ShortCut = 16433
end
item
Command = 303
ShortCut = 16434
end
item
Command = 304
ShortCut = 16435
end
item
Command = 305
ShortCut = 16436
end
item
Command = 306
ShortCut = 16437
end
item
Command = 307
ShortCut = 16438
end
item
Command = 308
ShortCut = 16439
end
item
Command = 309
ShortCut = 16440
end
item
Command = 310
ShortCut = 16441
end
item
Command = 351
ShortCut = 24624
end
item
Command = 352
ShortCut = 24625
end
item
Command = 353
ShortCut = 24626
end
item
Command = 354
ShortCut = 24627
end
item
Command = 355
ShortCut = 24628
end
item
Command = 356
ShortCut = 24629
end
item
Command = 357
ShortCut = 24630
end
item
Command = 358
ShortCut = 24631
end
item
Command = 359
ShortCut = 24632
end
item
Command = 360
ShortCut = 24633
end
item
Command = 231
ShortCut = 24654
end
item
Command = 232
ShortCut = 24643
end
item
Command = 233
ShortCut = 24652
end
item
Command = 612
ShortCut = 9
end
item
Command = 613
ShortCut = 8201
end
item
Command = 250
ShortCut = 24642
end>
Lines.Strings = (
'ValueAsTextSynEdit'
)
Options = [eoDragDropEditing, eoHalfPageScroll, eoScrollByOneLess, eoScrollPastEol, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoBracketHighlight, eoHideRightMargin]
AnchorSideRight.Control = DeleteFilePathBitBtn
Cursor = crIBeam
Height = 144
Width = 376
end end
object MoveFilePathUpBitBtn: TBitBtn object MoveFilePathUpBitBtn: TBitBtn
Left = 382
Height = 30
Top = 2
Width = 75
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.InnerBorder = 2 BorderSpacing.InnerBorder = 2
Caption = 'MoveFilePathUpBitBtn' Caption = 'MoveFilePathUpBitBtn'
NumGlyphs = 0 NumGlyphs = 0
OnClick = MoveFilePathUpBitBtnClick OnClick = MoveFilePathUpBitBtnClick
TabOrder = 1 TabOrder = 1
Left = 382
Height = 30
Top = 2
Width = 75
end end
object MoveFilePathDownBitBtn: TBitBtn object MoveFilePathDownBitBtn: TBitBtn
Left = 382
Height = 30
Top = 34
Width = 75
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.InnerBorder = 2 BorderSpacing.InnerBorder = 2
Caption = 'MoveFilePathDownBitBtn' Caption = 'MoveFilePathDownBitBtn'
NumGlyphs = 0 NumGlyphs = 0
OnClick = MoveNodeDownMenuItemClick OnClick = MoveNodeDownMenuItemClick
TabOrder = 2 TabOrder = 2
Left = 382
Height = 30
Top = 34
Width = 75
end end
object DeleteFilePathBitBtn: TBitBtn object DeleteFilePathBitBtn: TBitBtn
Left = 382
Height = 30
Top = 66
Width = 75
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.InnerBorder = 2 BorderSpacing.InnerBorder = 2
Caption = 'DeleteFilePathBitBtn' Caption = 'DeleteFilePathBitBtn'
NumGlyphs = 0 NumGlyphs = 0
OnClick = DeleteFilePathBitBtnClick OnClick = DeleteFilePathBitBtnClick
TabOrder = 3 TabOrder = 3
Left = 382
Height = 30
Top = 66
Width = 75
end end
object InsertFilePathBitBtn: TBitBtn object InsertFilePathBitBtn: TBitBtn
Left = 382
Height = 30
Top = 98
Width = 75
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.InnerBorder = 2 BorderSpacing.InnerBorder = 2
Caption = 'InsertFilePathBitBtn' Caption = 'InsertFilePathBitBtn'
NumGlyphs = 0 NumGlyphs = 0
OnClick = InsertFilePathBitBtnClick OnClick = InsertFilePathBitBtnClick
TabOrder = 4 TabOrder = 4
Left = 382
Height = 30
Top = 98
Width = 75
end end
end end
end end
object NameEdit: TEdit object NameEdit: TEdit
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
TabOrder = 1
Text = 'NameEdit'
Left = 128 Left = 128
Height = 20 Height = 20
Top = 23 Top = 23
Width = 350 Width = 350
end
object DescriptionEdit: TEdit
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
TabOrder = 2 TabOrder = 1
Text = 'DescriptionEdit' Text = 'NameEdit'
end
object DescriptionEdit: TEdit
Left = 128 Left = 128
Height = 21 Height = 21
Top = 50 Top = 50
Width = 350 Width = 350
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
TabOrder = 2
Text = 'DescriptionEdit'
end end
object VariableEdit: TEdit object VariableEdit: TEdit
Anchors = [akTop, akLeft, akRight]
TabOrder = 3
Text = 'VariableEdit'
Left = 128 Left = 128
Height = 21 Height = 21
Top = 76 Top = 76
Width = 350 Width = 350
Anchors = [akTop, akLeft, akRight]
TabOrder = 3
Text = 'VariableEdit'
end end
end end
object Splitter1: TSplitter object Splitter1: TSplitter
Cursor = crVSplit
Height = 3
Top = 135
Width = 500
Align = alTop Align = alTop
Cursor = crVSplit
Height = 5
Width = 500
ResizeAnchor = akTop ResizeAnchor = akTop
Cursor = crVSplit
Height = 5
Top = 123
Width = 500
end end
object TheImageList: TImageList object TheImageList: TImageList
Height = 22 Height = 22

1916
ide/codetoolsdefines.lrs
View File

File diff suppressed because it is too large Load Diff