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

designer: change align and look of few dialogs

Browse Source 
git-svn-id: trunk@14701 -
This commit is contained in:
paul 2008-04-01 01:47:32 +00:00
parent aa9e2a3230
commit 8a14c7ca0e
7 changed files with 247 additions and 222 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

83
designer/changeclassdialog.lfm
View File

@ -1,22 +1,25 @@
object ChangeClassDlg: TChangeClassDlg object ChangeClassDlg: TChangeClassDlg
Left = 291 Left = 291
Height = 311 Height = 298
Top = 163 Top = 163
Width = 423 Width = 423
HorzScrollBar.Page = 422 HorzScrollBar.Page = 422
VertScrollBar.Page = 310 VertScrollBar.Page = 297
ActiveControl = OldAncestorsListBox ActiveControl = OldAncestorsListBox
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsToolWindow
Caption = 'ChangeClassDlg' Caption = 'ChangeClassDlg'
ClientHeight = 311 ClientHeight = 298
ClientWidth = 423 ClientWidth = 423
OnCreate = ChangeClassDlgCreate OnCreate = ChangeClassDlgCreate
LCLVersion = '0.9.25'
object OldGroupBox: TGroupBox object OldGroupBox: TGroupBox
Left = 8 Left = 8
Height = 248 Height = 248
Top = 8 Top = 8
Width = 200 Width = 200
Caption = 'OldGroupBox' Caption = 'OldGroupBox'
ClientHeight = 229 ClientHeight = 230
ClientWidth = 196 ClientWidth = 196
TabOrder = 0 TabOrder = 0
object OldClassLabel: TLabel object OldClassLabel: TLabel
@ -29,20 +32,19 @@ object ChangeClassDlg: TChangeClassDlg
end end
object OldAncestorGroupBox: TGroupBox object OldAncestorGroupBox: TGroupBox
Height = 192 Height = 192
Top = 37 Top = 38
Width = 196 Width = 196
Align = alBottom Align = alBottom
Caption = 'OldAncestorGroupBox' Caption = 'OldAncestorGroupBox'
ClientHeight = 173 ClientHeight = 174
ClientWidth = 192 ClientWidth = 192
TabOrder = 0 TabOrder = 0
object OldAncestorsListBox: TListBox object OldAncestorsListBox: TListBox
Height = 173 Height = 174
Width = 192 Width = 192
Align = alClient Align = alClient
ClickOnSelChange = False ClickOnSelChange = False
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
end end
end end
@ -52,15 +54,16 @@ object ChangeClassDlg: TChangeClassDlg
Top = 8 Top = 8
Width = 200 Width = 200
Caption = 'NewGroupBox' Caption = 'NewGroupBox'
ClientHeight = 229 ClientHeight = 230
ClientWidth = 196 ClientWidth = 196
TabOrder = 1 TabOrder = 1
object NewClassComboBox: TComboBox object NewClassComboBox: TComboBox
Left = 14 Left = 14
Height = 25 Height = 21
Top = 9 Top = 9
Width = 174 Width = 174
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending] AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
ItemHeight = 13
MaxLength = 0 MaxLength = 0
OnEditingDone = NewClassComboBoxEditingDone OnEditingDone = NewClassComboBoxEditingDone
TabOrder = 0 TabOrder = 0
@ -68,54 +71,56 @@ object ChangeClassDlg: TChangeClassDlg
end end
object NewAncestorGroupBox: TGroupBox object NewAncestorGroupBox: TGroupBox
Height = 192 Height = 192
Top = 37 Top = 38
Width = 196 Width = 196
Align = alBottom Align = alBottom
Caption = 'NewAncestorGroupBox' Caption = 'NewAncestorGroupBox'
ClientHeight = 173 ClientHeight = 174
ClientWidth = 192 ClientWidth = 192
TabOrder = 1 TabOrder = 1
object NewAncestorsListBox: TListBox object NewAncestorsListBox: TListBox
Height = 173 Height = 174
Width = 192 Width = 192
Align = alClient Align = alClient
ClickOnSelChange = False ClickOnSelChange = False
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
end end
end end
object BtnPanel: TPanel object OkButton: TBitBtn
Height = 42 AnchorSideRight.Control = CancelButton
Top = 269 AnchorSideBottom.Control = Owner
Width = 423 AnchorSideBottom.Side = asrBottom
Align = alBottom Left = 273
Height = 26
Top = 266
Width = 60
Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BevelOuter = bvNone
ClientHeight = 42
ClientWidth = 423
TabOrder = 2
object OkButton: TButton
Left = 228
Height = 28
Top = 7
Width = 91
Align = alRight
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Ok' Caption = '&OK'
Kind = bkOK
ModalResult = 1 ModalResult = 1
TabOrder = 0 NumGlyphs = 0
TabOrder = 2
end end
object CancelButton: TButton object CancelButton: TBitBtn
Left = 325 AnchorSideRight.Control = Owner
Height = 28 AnchorSideRight.Side = asrBottom
Top = 7 AnchorSideBottom.Control = Owner
Width = 91 AnchorSideBottom.Side = asrBottom
Align = alRight Left = 339
Height = 26
Top = 266
Width = 78
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Cancel = True
Caption = 'Cancel' Caption = 'Cancel'
Kind = bkCancel
ModalResult = 2 ModalResult = 2
TabOrder = 1 NumGlyphs = 0
end TabOrder = 3
end end
end end

68
designer/changeclassdialog.lrs
View File

@ -1,37 +1,41 @@
{ This is an automatically generated lazarus resource file } { This is an automatically generated lazarus resource file }
LazarusResources.Add('TChangeClassDlg','FORMDATA',[ LazarusResources.Add('TChangeClassDlg','FORMDATA',[
'TPF0'#15'TChangeClassDlg'#14'ChangeClassDlg'#4'Left'#3'#'#1#6'Height'#3'7'#1 'TPF0'#15'TChangeClassDlg'#14'ChangeClassDlg'#4'Left'#3'#'#1#6'Height'#3'*'#1
+#3'Top'#3#163#0#5'Width'#3#167#1#18'HorzScrollBar.Page'#3#166#1#18'VertScrol' +#3'Top'#3#163#0#5'Width'#3#167#1#18'HorzScrollBar.Page'#3#166#1#18'VertScrol'
+'lBar.Page'#3'6'#1#13'ActiveControl'#7#19'OldAncestorsListBox'#7'Caption'#6 +'lBar.Page'#3')'#1#13'ActiveControl'#7#19'OldAncestorsListBox'#11'BorderIcon'
+#14'ChangeClassDlg'#12'ClientHeight'#3'7'#1#11'ClientWidth'#3#167#1#8'OnCrea' +'s'#11#12'biSystemMenu'#10'biMinimize'#0#11'BorderStyle'#7#12'bsToolWindow'#7
+'te'#7#20'ChangeClassDlgCreate'#0#9'TGroupBox'#11'OldGroupBox'#4'Left'#2#8#6 +'Caption'#6#14'ChangeClassDlg'#12'ClientHeight'#3'*'#1#11'ClientWidth'#3#167
+'Height'#3#248#0#3'Top'#2#8#5'Width'#3#200#0#7'Caption'#6#11'OldGroupBox'#12 +#1#8'OnCreate'#7#20'ChangeClassDlgCreate'#10'LCLVersion'#6#6'0.9.25'#0#9'TGr'
+'ClientHeight'#3#229#0#11'ClientWidth'#3#196#0#8'TabOrder'#2#0#0#6'TLabel'#13 +'oupBox'#11'OldGroupBox'#4'Left'#2#8#6'Height'#3#248#0#3'Top'#2#8#5'Width'#3
+'OldClassLabel'#4'Left'#2#6#6'Height'#2' '#3'Top'#2#2#5'Width'#3#185#0#7'Cap' +#200#0#7'Caption'#6#11'OldGroupBox'#12'ClientHeight'#3#230#0#11'ClientWidth'
+'tion'#6#13'OldClassLabel'#11'ParentColor'#8#0#0#9'TGroupBox'#19'OldAncestor' +#3#196#0#8'TabOrder'#2#0#0#6'TLabel'#13'OldClassLabel'#4'Left'#2#6#6'Height'
+'GroupBox'#6'Height'#3#192#0#3'Top'#2'%'#5'Width'#3#196#0#5'Align'#7#8'alBot' +#2' '#3'Top'#2#2#5'Width'#3#185#0#7'Caption'#6#13'OldClassLabel'#11'ParentCo'
+'tom'#7'Caption'#6#19'OldAncestorGroupBox'#12'ClientHeight'#3#173#0#11'Clien' +'lor'#8#0#0#9'TGroupBox'#19'OldAncestorGroupBox'#6'Height'#3#192#0#3'Top'#2
+'tWidth'#3#192#0#8'TabOrder'#2#0#0#8'TListBox'#19'OldAncestorsListBox'#6'Hei' +'&'#5'Width'#3#196#0#5'Align'#7#8'alBottom'#7'Caption'#6#19'OldAncestorGroup'
+'ght'#3#173#0#5'Width'#3#192#0#5'Align'#7#8'alClient'#16'ClickOnSelChange'#8 +'Box'#12'ClientHeight'#3#174#0#11'ClientWidth'#3#192#0#8'TabOrder'#2#0#0#8'T'
+#8'TabOrder'#2#0#8'TopIndex'#2#255#0#0#0#0#9'TGroupBox'#11'NewGroupBox'#4'Le' +'ListBox'#19'OldAncestorsListBox'#6'Height'#3#174#0#5'Width'#3#192#0#5'Align'
+'ft'#3#216#0#6'Height'#3#248#0#3'Top'#2#8#5'Width'#3#200#0#7'Caption'#6#11'N' +#7#8'alClient'#16'ClickOnSelChange'#8#8'TabOrder'#2#0#0#0#0#0#9'TGroupBox'#11
+'ewGroupBox'#12'ClientHeight'#3#229#0#11'ClientWidth'#3#196#0#8'TabOrder'#2#1 +'NewGroupBox'#4'Left'#3#216#0#6'Height'#3#248#0#3'Top'#2#8#5'Width'#3#200#0#7
+#0#9'TComboBox'#16'NewClassComboBox'#4'Left'#2#14#6'Height'#2#25#3'Top'#2#9#5 +'Caption'#6#11'NewGroupBox'#12'ClientHeight'#3#230#0#11'ClientWidth'#3#196#0
+'Width'#3#174#0#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactS' +#8'TabOrder'#2#1#0#9'TComboBox'#16'NewClassComboBox'#4'Left'#2#14#6'Height'#2
+'earchAscending'#0#9'MaxLength'#2#0#13'OnEditingDone'#7#27'NewClassComboBoxE' +#21#3'Top'#2#9#5'Width'#3#174#0#16'AutoCompleteText'#11#22'cbactEndOfLineCom'
+'ditingDone'#8'TabOrder'#2#0#4'Text'#6#16'NewClassComboBox'#0#0#9'TGroupBox' +'plete'#20'cbactSearchAscending'#0#10'ItemHeight'#2#13#9'MaxLength'#2#0#13'O'
+#19'NewAncestorGroupBox'#6'Height'#3#192#0#3'Top'#2'%'#5'Width'#3#196#0#5'Al' +'nEditingDone'#7#27'NewClassComboBoxEditingDone'#8'TabOrder'#2#0#4'Text'#6#16
+'ign'#7#8'alBottom'#7'Caption'#6#19'NewAncestorGroupBox'#12'ClientHeight'#3 +'NewClassComboBox'#0#0#9'TGroupBox'#19'NewAncestorGroupBox'#6'Height'#3#192#0
+#173#0#11'ClientWidth'#3#192#0#8'TabOrder'#2#1#0#8'TListBox'#19'NewAncestors' +#3'Top'#2'&'#5'Width'#3#196#0#5'Align'#7#8'alBottom'#7'Caption'#6#19'NewAnce'
+'ListBox'#6'Height'#3#173#0#5'Width'#3#192#0#5'Align'#7#8'alClient'#16'Click' +'storGroupBox'#12'ClientHeight'#3#174#0#11'ClientWidth'#3#192#0#8'TabOrder'#2
+'OnSelChange'#8#8'TabOrder'#2#0#8'TopIndex'#2#255#0#0#0#0#6'TPanel'#8'BtnPan' +#1#0#8'TListBox'#19'NewAncestorsListBox'#6'Height'#3#174#0#5'Width'#3#192#0#5
+'el'#6'Height'#2'*'#3'Top'#3#13#1#5'Width'#3#167#1#5'Align'#7#8'alBottom'#8 +'Align'#7#8'alClient'#16'ClickOnSelChange'#8#8'TabOrder'#2#0#0#0#0#0#7'TBitB'
+'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'*'#11'ClientWidth' +'tn'#8'OkButton'#23'AnchorSideRight.Control'#7#12'CancelButton'#24'AnchorSid'
+#3#167#1#8'TabOrder'#2#2#0#7'TButton'#8'OkButton'#4'Left'#3#228#0#6'Height'#2 +'eBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'
+#28#3'Top'#2#7#5'Width'#2'['#5'Align'#7#7'alRight'#20'BorderSpacing.Around'#2 +#3#17#1#6'Height'#2#26#3'Top'#3#10#1#5'Width'#2'<'#7'Anchors'#11#7'akRight'#8
+#6#7'Caption'#6#2'Ok'#11'ModalResult'#2#1#8'TabOrder'#2#0#0#0#7'TButton'#12 +'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#4
+'CancelButton'#4'Left'#3'E'#1#6'Height'#2#28#3'Top'#2#7#5'Width'#2'['#5'Alig' +'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#7
+'n'#7#7'alRight'#20'BorderSpacing.Around'#2#6#7'Caption'#6#6'Cancel'#11'Moda' +'TBitBtn'#12'CancelButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorS'
+'lResult'#2#2#8'TabOrder'#2#1#0#0#0#0 +'ideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'An'
+'chorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'S'#1#6'Height'#2#26#3'Top'#3
+#10#1#5'Width'#2'N'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20
+'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bk'
+'Cancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#3#0#0#0
]); ]);

5
designer/changeclassdialog.pas
View File

@ -46,17 +46,16 @@ type
{ TChangeClassDlg } { TChangeClassDlg }
TChangeClassDlg = class(TForm) TChangeClassDlg = class(TForm)
OkButton: TBitBtn;
CancelButton: TBitBtn;
NewClassComboBox: TComboBox; NewClassComboBox: TComboBox;
NewAncestorGroupBox: TGroupBox; NewAncestorGroupBox: TGroupBox;
NewAncestorsListBox: TListBox; NewAncestorsListBox: TListBox;
OldAncestorGroupBox: TGroupBox; OldAncestorGroupBox: TGroupBox;
OldAncestorsListBox: TListBox; OldAncestorsListBox: TListBox;
OldClassLabel: TLabel; OldClassLabel: TLabel;
OkButton: TButton;
CancelButton: TButton;
NewGroupBox: TGroupBox; NewGroupBox: TGroupBox;
OldGroupBox: TGroupBox; OldGroupBox: TGroupBox;
BtnPanel: TPanel;
procedure ChangeClassDlgCreate(Sender: TObject); procedure ChangeClassDlgCreate(Sender: TObject);
procedure NewClassComboBoxEditingDone(Sender: TObject); procedure NewClassComboBoxEditingDone(Sender: TObject);
private private

83
designer/scalecompsdlg.lfm
View File

@ -1,85 +1,94 @@
object ScaleComponentsDialog: TScaleComponentsDialog object ScaleComponentsDialog: TScaleComponentsDialog
Left = 372
Height = 82
Top = 698
Width = 258
HorzScrollBar.Page = 257
VertScrollBar.Page = 81
ActiveControl = OKButton ActiveControl = OKButton
BorderStyle = bsSizeToolWin BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsToolWindow
Caption = 'ScaleComponentsDialog' Caption = 'ScaleComponentsDialog'
ClientHeight = 82 ClientHeight = 82
ClientWidth = 258 ClientWidth = 258
PixelsPerInch = 96
Position = poScreenCenter Position = poScreenCenter
HorzScrollBar.Page = 257 LCLVersion = '0.9.25'
VertScrollBar.Page = 81
Left = 319
Height = 82
Top = 881
Width = 258
object PercentLabel: TLabel object PercentLabel: TLabel
Anchors = [akTop, akRight] AnchorSideTop.Control = PercentEdit
BorderSpacing.Right = 6 AnchorSideTop.Side = asrCenter
Caption = 'PercentLabel'
Color = clNone
ParentColor = False
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 189 Left = 189
Height = 14 Height = 14
Top = 8 Top = 10
Width = 63 Width = 63
Anchors = [akTop, akRight]
BorderSpacing.Right = 6
Caption = 'PercentLabel'
ParentColor = False
end end
object ScaleLabel: TLabel object ScaleLabel: TLabel
Caption = 'ScaleLabel' AnchorSideTop.Control = PercentEdit
Color = clNone AnchorSideTop.Side = asrCenter
ParentColor = False
Left = 8 Left = 8
Height = 14 Height = 14
Top = 8 Top = 10
Width = 51 Width = 51
Caption = 'ScaleLabel'
ParentColor = False
end end
object OKButton: TBitBtn object OKButton: TBitBtn
AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 108
Height = 26
Top = 50
Width = 60
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Caption = '&OK' Caption = '&OK'
Default = True Default = True
Kind = bkOK Kind = bkOK
ModalResult = 1 ModalResult = 1
NumGlyphs = 0 NumGlyphs = 0
TabOrder = 0 TabOrder = 0
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 184
Height = 34
Top = 40
Width = 68
end end
object CancelButton: TBitBtn object CancelButton: TBitBtn
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 174
Height = 26
Top = 50
Width = 78
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Caption = 'Cancel' Caption = 'Cancel'
Kind = bkCancel Kind = bkCancel
ModalResult = 2 ModalResult = 2
NumGlyphs = 0 NumGlyphs = 0
TabOrder = 1 TabOrder = 1
AnchorSideRight.Control = OKButton
Left = 98
Height = 34
Top = 40
Width = 80
end end
object PercentEdit: TEdit object PercentEdit: TEdit
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
TabOrder = 2
Text = 'PercentEdit'
AnchorSideLeft.Control = ScaleLabel AnchorSideLeft.Control = ScaleLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Owner
AnchorSideRight.Control = PercentLabel AnchorSideRight.Control = PercentLabel
Left = 65 Left = 65
Height = 23 Height = 23
Top = 8 Top = 6
Width = 118 Width = 118
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
TabOrder = 2
Text = 'PercentEdit'
end end
end end

56
designer/scalecompsdlg.lrs
View File

@ -1,27 +1,35 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TScaleComponentsDialog','FORMDATA',[ LazarusResources.Add('TScaleComponentsDialog','FORMDATA',[
'TPF0'#22'TScaleComponentsDialog'#21'ScaleComponentsDialog'#13'ActiveControl' 'TPF0'#22'TScaleComponentsDialog'#21'ScaleComponentsDialog'#4'Left'#3't'#1#6
+#7#8'OKButton'#11'BorderStyle'#7#13'bsSizeToolWin'#7'Caption'#6#21'ScaleComp' +'Height'#2'R'#3'Top'#3#186#2#5'Width'#3#2#1#18'HorzScrollBar.Page'#3#1#1#18
+'onentsDialog'#12'ClientHeight'#2'R'#11'ClientWidth'#3#2#1#13'PixelsPerInch' +'VertScrollBar.Page'#2'Q'#13'ActiveControl'#7#8'OKButton'#11'BorderIcons'#11
+#2'`'#8'Position'#7#14'poScreenCenter'#18'HorzScrollBar.Page'#3#1#1#18'VertS' +#12'biSystemMenu'#10'biMinimize'#0#11'BorderStyle'#7#12'bsToolWindow'#7'Capt'
+'crollBar.Page'#2'Q'#4'Left'#3'?'#1#6'Height'#2'R'#3'Top'#3'q'#3#5'Width'#3#2 +'ion'#6#21'ScaleComponentsDialog'#12'ClientHeight'#2'R'#11'ClientWidth'#3#2#1
+#1#0#6'TLabel'#12'PercentLabel'#7'Anchors'#11#5'akTop'#7'akRight'#0#19'Borde' +#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#12
+'rSpacing.Right'#2#6#7'Caption'#6#12'PercentLabel'#5'Color'#7#6'clNone'#11'P' +'PercentLabel'#21'AnchorSideTop.Control'#7#11'PercentEdit'#18'AnchorSideTop.'
+'arentColor'#8#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Sid' +'Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRi'
+'e'#7#9'asrBottom'#4'Left'#3#189#0#6'Height'#2#14#3'Top'#2#8#5'Width'#2'?'#0 +'ght.Side'#7#9'asrBottom'#4'Left'#3#189#0#6'Height'#2#14#3'Top'#2#10#5'Width'
+#0#6'TLabel'#10'ScaleLabel'#7'Caption'#6#10'ScaleLabel'#5'Color'#7#6'clNone' +#2'?'#7'Anchors'#11#5'akTop'#7'akRight'#0#19'BorderSpacing.Right'#2#6#7'Capt'
+#11'ParentColor'#8#4'Left'#2#8#6'Height'#2#14#3'Top'#2#8#5'Width'#2'3'#0#0#7 +'ion'#6#12'PercentLabel'#11'ParentColor'#8#0#0#6'TLabel'#10'ScaleLabel'#21'A'
+'TBitBtn'#8'OKButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19 +'nchorSideTop.Control'#7#11'PercentEdit'#18'AnchorSideTop.Side'#7#9'asrCente'
+'BorderSpacing.Right'#2#6#7'Caption'#6#3'&OK'#7'Default'#9#4'Kind'#7#4'bkOK' +'r'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#10#5'Width'#2'3'#7'Caption'#6#10'Sca'
+#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#23'AnchorSideRight.Con' +'leLabel'#11'ParentColor'#8#0#0#7'TBitBtn'#8'OKButton'#23'AnchorSideRight.Co'
+'trol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#184#0#6 +'ntrol'#7#12'CancelButton'#24'AnchorSideBottom.Control'#7#5'Owner'#21'Anchor'
+'Height'#2'"'#3'Top'#2'('#5'Width'#2'D'#0#0#7'TBitBtn'#12'CancelButton'#7'An' +'SideBottom.Side'#7#9'asrBottom'#4'Left'#2'l'#6'Height'#2#26#3'Top'#2'2'#5'W'
+'chors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6 +'idth'#2'<'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSp'
+#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyph' +'acing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#3'&OK'#7'Default'
+'s'#2#0#8'TabOrder'#2#1#23'AnchorSideRight.Control'#7#8'OKButton'#4'Left'#2 +#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0
+'b'#6'Height'#2'"'#3'Top'#2'('#5'Width'#2'P'#0#0#5'TEdit'#11'PercentEdit'#7 +#7'TBitBtn'#12'CancelButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'Ancho'
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#19'B' +'rSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21
+'orderSpacing.Right'#2#6#8'TabOrder'#2#2#4'Text'#6#11'PercentEdit'#22'Anchor' +'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#174#0#6'Height'#2#26#3'Top'
+'SideLeft.Control'#7#10'ScaleLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#23 +#2'2'#5'Width'#2'N'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19
+'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#6'Cancel'
+#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#1#0
+#0#5'TEdit'#11'PercentEdit'#22'AnchorSideLeft.Control'#7#10'ScaleLabel'#19'A'
+'nchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#5'Owner'#23
+'AnchorSideRight.Control'#7#12'PercentLabel'#4'Left'#2'A'#6'Height'#2#23#3'T' +'AnchorSideRight.Control'#7#12'PercentLabel'#4'Left'#2'A'#6'Height'#2#23#3'T'
+'op'#2#8#5'Width'#2'v'#0#0#0 +'op'#2#6#5'Width'#2'v'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'Bord'
+'erSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2#6#8
+'TabOrder'#2#2#4'Text'#6#11'PercentEdit'#0#0#0
]); ]);

86
designer/taborderdlg.lfm
View File

@ -1,4 +1,10 @@
object TabOrderDialog: TTabOrderDialog object TabOrderDialog: TTabOrderDialog
Left = 381
Height = 387
Top = 167
Width = 310
HorzScrollBar.Page = 309
VertScrollBar.Page = 386
ActiveControl = ItemTreeview ActiveControl = ItemTreeview
BorderStyle = bsSizeToolWin BorderStyle = bsSizeToolWin
Caption = 'TabOrderDialog' Caption = 'TabOrderDialog'
@ -6,15 +12,17 @@ object TabOrderDialog: TTabOrderDialog
ClientWidth = 310 ClientWidth = 310
OnClose = TabOrderDialogCLOSE OnClose = TabOrderDialogCLOSE
OnCreate = TabOrderDialogCREATE OnCreate = TabOrderDialogCREATE
PixelsPerInch = 96
Position = poScreenCenter Position = poScreenCenter
HorzScrollBar.Page = 309 LCLVersion = '0.9.25'
VertScrollBar.Page = 386
Left = 381
Height = 387
Top = 167
Width = 310
object ItemTreeview: TTreeView object ItemTreeview: TTreeView
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = ArrowDown
AnchorSideBottom.Control = ShowOldValuesCheckbox
Left = 6
Height = 318
Top = 6
Width = 267
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
DefaultItemHeight = 15 DefaultItemHeight = 15
@ -23,89 +31,79 @@ object TabOrderDialog: TTabOrderDialog
RightClickSelect = True RightClickSelect = True
TabOrder = 0 TabOrder = 0
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips] Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = ArrowDown
AnchorSideBottom.Control = ShowOldValuesCheckbox
Left = 6
Height = 316
Top = 6
Width = 267
end end
object ShowOldValuesCheckbox: TCheckBox object ShowOldValuesCheckbox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideBottom.Control = CancelButton
Left = 6
Height = 19
Top = 330
Width = 149
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'ShowOldValuesCheckbox' Caption = 'ShowOldValuesCheckbox'
OnClick = ShowOldValuesCheckboxCLICK OnClick = ShowOldValuesCheckboxCLICK
TabOrder = 1 TabOrder = 1
AnchorSideLeft.Control = Owner
AnchorSideBottom.Control = CancelButton
Left = 6
Height = 13
Top = 328
Width = 143
end end
object OkButton: TBitBtn object OkButton: TBitBtn
AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 160
Height = 26
Top = 355
Width = 60
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = '&OK' Caption = '&OK'
Kind = bkOK Kind = bkOK
ModalResult = 1 ModalResult = 1
NumGlyphs = 0 NumGlyphs = 0
OnClick = OkButtonCLICK OnClick = OkButtonCLICK
TabOrder = 2 TabOrder = 2
end
object CancelButton: TBitBtn
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 236 Left = 226
Height = 34 Height = 26
Top = 347 Top = 355
Width = 68 Width = 78
end
object CancelButton: TBitBtn
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Cancel = True Cancel = True
Caption = 'Cancel' Caption = 'Cancel'
Kind = bkCancel Kind = bkCancel
ModalResult = 2 ModalResult = 2
NumGlyphs = 0 NumGlyphs = 0
TabOrder = 3 TabOrder = 3
AnchorSideRight.Control = OkButton
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 150
Height = 34
Top = 347
Width = 80
end end
object ArrowUp: TArrow object ArrowUp: TArrow
Anchors = [akTop, akRight]
ArrowType = atUp
BorderSpacing.Around = 6
OnClick = UpSpeedbuttonCLICK
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 279 Left = 279
Height = 25 Height = 25
Top = 120 Top = 120
Width = 25 Width = 25
Anchors = [akTop, akRight]
ArrowType = atUp
BorderSpacing.Around = 6
OnClick = UpSpeedbuttonCLICK
end end
object ArrowDown: TArrow object ArrowDown: TArrow
Anchors = [akTop, akRight]
ArrowType = atDown
BorderSpacing.Around = 6
OnClick = DownSpeedbuttonCLICK
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 279 Left = 279
Height = 25 Height = 25
Top = 176 Top = 176
Width = 25 Width = 25
Anchors = [akTop, akRight]
ArrowType = atDown
BorderSpacing.Around = 6
OnClick = DownSpeedbuttonCLICK
end end
end end

78
designer/taborderdlg.lrs
View File

@ -1,40 +1,42 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TTabOrderDialog','FORMDATA',[ LazarusResources.Add('TTabOrderDialog','FORMDATA',[
'TPF0'#15'TTabOrderDialog'#14'TabOrderDialog'#13'ActiveControl'#7#12'ItemTree' 'TPF0'#15'TTabOrderDialog'#14'TabOrderDialog'#4'Left'#3'}'#1#6'Height'#3#131#1
+'view'#11'BorderStyle'#7#13'bsSizeToolWin'#7'Caption'#6#14'TabOrderDialog'#12 +#3'Top'#3#167#0#5'Width'#3'6'#1#18'HorzScrollBar.Page'#3'5'#1#18'VertScrollB'
+'ClientHeight'#3#131#1#11'ClientWidth'#3'6'#1#7'OnClose'#7#19'TabOrderDialog' +'ar.Page'#3#130#1#13'ActiveControl'#7#12'ItemTreeview'#11'BorderStyle'#7#13
+'CLOSE'#8'OnCreate'#7#20'TabOrderDialogCREATE'#13'PixelsPerInch'#2'`'#8'Posi' +'bsSizeToolWin'#7'Caption'#6#14'TabOrderDialog'#12'ClientHeight'#3#131#1#11
+'tion'#7#14'poScreenCenter'#18'HorzScrollBar.Page'#3'5'#1#18'VertScrollBar.P' +'ClientWidth'#3'6'#1#7'OnClose'#7#19'TabOrderDialogCLOSE'#8'OnCreate'#7#20'T'
+'age'#3#130#1#4'Left'#3'}'#1#6'Height'#3#131#1#3'Top'#3#167#0#5'Width'#3'6'#1 +'abOrderDialogCREATE'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.'
+#0#9'TTreeView'#12'ItemTreeview'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight' +'9.25'#0#9'TTreeView'#12'ItemTreeview'#22'AnchorSideLeft.Control'#7#5'Owner'
+#8'akBottom'#0#20'BorderSpacing.Around'#2#6#17'DefaultItemHeight'#2#15#13'Hi' +#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight.Control'#7#9'ArrowD'
+'deSelection'#8#11'ParentCtl3D'#8#16'RightClickSelect'#9#8'TabOrder'#2#0#7'O' +'own'#24'AnchorSideBottom.Control'#7#21'ShowOldValuesCheckbox'#4'Left'#2#6#6
+'ptions'#11#17'tvoAutoItemHeight'#21'tvoKeepCollapsedNodes'#19'tvoRightClick' +'Height'#3'>'#1#3'Top'#2#6#5'Width'#3#11#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
+'Select'#14'tvoShowButtons'#12'tvoShowLines'#11'tvoShowRoot'#11'tvoToolTips' +'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#17'DefaultItemHeight'#2
+#0#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner' +#15#13'HideSelection'#8#11'ParentCtl3D'#8#16'RightClickSelect'#9#8'TabOrder'
+#23'AnchorSideRight.Control'#7#9'ArrowDown'#24'AnchorSideBottom.Control'#7#21 +#2#0#7'Options'#11#17'tvoAutoItemHeight'#21'tvoKeepCollapsedNodes'#19'tvoRig'
+'ShowOldValuesCheckbox'#4'Left'#2#6#6'Height'#3'<'#1#3'Top'#2#6#5'Width'#3#11 +'htClickSelect'#14'tvoShowButtons'#12'tvoShowLines'#11'tvoShowRoot'#11'tvoTo'
+#1#0#0#9'TCheckBox'#21'ShowOldValuesCheckbox'#7'Anchors'#11#6'akLeft'#8'akBo' +'olTips'#0#0#0#9'TCheckBox'#21'ShowOldValuesCheckbox'#22'AnchorSideLeft.Cont'
+'ttom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'ShowOldValuesCheckbox' +'rol'#7#5'Owner'#24'AnchorSideBottom.Control'#7#12'CancelButton'#4'Left'#2#6
+#7'OnClick'#7#26'ShowOldValuesCheckboxCLICK'#8'TabOrder'#2#1#22'AnchorSideLe' +#6'Height'#2#19#3'Top'#3'J'#1#5'Width'#3#149#0#7'Anchors'#11#6'akLeft'#8'akB'
+'ft.Control'#7#5'Owner'#24'AnchorSideBottom.Control'#7#12'CancelButton'#4'Le' +'ottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'ShowOldValuesCheckbox'
+'ft'#2#6#6'Height'#2#13#3'Top'#3'H'#1#5'Width'#3#143#0#0#0#7'TBitBtn'#8'OkBu' +#7'OnClick'#7#26'ShowOldValuesCheckboxCLICK'#8'TabOrder'#2#1#0#0#7'TBitBtn'#8
+'tton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing' +'OkButton'#23'AnchorSideRight.Control'#7#12'CancelButton'#24'AnchorSideBotto'
+'.Around'#2#6#7'Caption'#6#3'&OK'#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'Nu' +'m.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#160
+'mGlyphs'#2#0#7'OnClick'#7#13'OkButtonCLICK'#8'TabOrder'#2#2#23'AnchorSideRi' +#0#6'Height'#2#26#3'Top'#3'c'#1#5'Width'#2'<'#7'Anchors'#11#7'akRight'#8'akB'
+'ght.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSi' +'ottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#4'K'
+'deBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Lef' +'ind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButto'
+'t'#3#236#0#6'Height'#2'"'#3'Top'#3'['#1#5'Width'#2'D'#0#0#7'TBitBtn'#12'Can' +'nCLICK'#8'TabOrder'#2#2#0#0#7'TBitBtn'#12'CancelButton'#23'AnchorSideRight.'
+'celButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSp' +'Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBo'
+'acing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel' +'ttom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3
+#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#3#23'AnchorSideRight.Con' +#226#0#6'Height'#2#26#3'Top'#3'c'#1#5'Width'#2'N'#7'Anchors'#11#7'akRight'#8
+'trol'#7#8'OkButton'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBo' +'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Captio'
+'ttom.Side'#7#9'asrBottom'#4'Left'#3#150#0#6'Height'#2'"'#3'Top'#3'['#1#5'Wi' +'n'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8
+'dth'#2'P'#0#0#6'TArrow'#7'ArrowUp'#7'Anchors'#11#5'akTop'#7'akRight'#0#9'Ar' +'TabOrder'#2#3#0#0#6'TArrow'#7'ArrowUp'#23'AnchorSideRight.Control'#7#5'Owne'
+'rowType'#7#4'atUp'#20'BorderSpacing.Around'#2#6#7'OnClick'#7#18'UpSpeedbutt' +'r'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#23#1#6'Height'#2#25#3
+'onCLICK'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9 +'Top'#2'x'#5'Width'#2#25#7'Anchors'#11#5'akTop'#7'akRight'#0#9'ArrowType'#7#4
+'asrBottom'#4'Left'#3#23#1#6'Height'#2#25#3'Top'#2'x'#5'Width'#2#25#0#0#6'TA' +'atUp'#20'BorderSpacing.Around'#2#6#7'OnClick'#7#18'UpSpeedbuttonCLICK'#0#0#6
+'rrow'#9'ArrowDown'#7'Anchors'#11#5'akTop'#7'akRight'#0#9'ArrowType'#7#6'atD' +'TArrow'#9'ArrowDown'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRi'
+'own'#20'BorderSpacing.Around'#2#6#7'OnClick'#7#20'DownSpeedbuttonCLICK'#23 +'ght.Side'#7#9'asrBottom'#4'Left'#3#23#1#6'Height'#2#25#3'Top'#3#176#0#5'Wid'
+'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom' +'th'#2#25#7'Anchors'#11#5'akTop'#7'akRight'#0#9'ArrowType'#7#6'atDown'#20'Bo'
+#4'Left'#3#23#1#6'Height'#2#25#3'Top'#3#176#0#5'Width'#2#25#0#0#0 +'rderSpacing.Around'#2#6#7'OnClick'#7#20'DownSpeedbuttonCLICK'#0#0#0
]); ]);