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

Load glyph form resource and somme resourcestrings

Browse Source 
git-svn-id: trunk@16705 -
This commit is contained in:
laurent 2008-09-24 12:56:01 +00:00
parent c96500a8bd
commit dd28cb447d
18 changed files with 435 additions and 402 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

122
converter/chgencodingdlg.lfm
View File

@ -9,17 +9,18 @@ object ChgEncodingDialog: TChgEncodingDialog
ClientWidth = 509 ClientWidth = 509
OnCreate = FormCreate OnCreate = FormCreate
OnDestroy = FormDestroy OnDestroy = FormDestroy
ParentFont = False
LCLVersion = '0.9.25' LCLVersion = '0.9.25'
object FilesGroupBox: TGroupBox object FilesGroupBox: TGroupBox
Left = 6 Left = 6
Height = 163 Height = 141
Top = 72 Top = 63
Width = 497 Width = 497
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'FilesGroupBox' Caption = 'FilesGroupBox'
ClientHeight = 144 ClientHeight = 123
ClientWidth = 493 ClientWidth = 493
TabOrder = 0 TabOrder = 0
object FileFilterLabel: TLabel object FileFilterLabel: TLabel
@ -27,9 +28,9 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideTop.Control = NonUTF8FilesCheckBox AnchorSideTop.Control = NonUTF8FilesCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 18 Height = 14
Top = 71 Top = 65
Width = 85 Width = 66
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 15 BorderSpacing.Top = 15
BorderSpacing.Bottom = 2 BorderSpacing.Bottom = 2
@ -40,9 +41,9 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideLeft.Control = FilesGroupBox AnchorSideLeft.Control = FilesGroupBox
AnchorSideTop.Control = FilesGroupBox AnchorSideTop.Control = FilesGroupBox
Left = 6 Left = 6
Height = 22 Height = 19
Top = 6 Top = 6
Width = 146 Width = 119
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'UTF8FilesCheckBox' Caption = 'UTF8FilesCheckBox'
Checked = True Checked = True
@ -54,9 +55,9 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideTop.Control = UTF8FilesCheckBox AnchorSideTop.Control = UTF8FilesCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 22 Height = 19
Top = 34 Top = 31
Width = 172 Width = 138
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'NonUTF8FilesCheckBox' Caption = 'NonUTF8FilesCheckBox'
Checked = True Checked = True
@ -68,9 +69,9 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideTop.Control = FileFilterCombobox AnchorSideTop.Control = FileFilterCombobox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 22 Height = 19
Top = 122 Top = 104
Width = 138 Width = 114
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 2 BorderSpacing.Top = 2
Caption = 'RegExprCheckBox' Caption = 'RegExprCheckBox'
@ -83,76 +84,87 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideRight.Control = FilesGroupBox AnchorSideRight.Control = FilesGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 29 Height = 21
Top = 91 Top = 81
Width = 481 Width = 481
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Right = 6 BorderSpacing.Right = 6
ItemHeight = 13
MaxLength = -1
TabOrder = 3 TabOrder = 3
Text = 'FileFilterCombobox' Text = 'FileFilterCombobox'
end end
end end
object BtnPanel: TPanel object BtnPanel: TPanel
Height = 41 Height = 35
Top = 438 Top = 444
Width = 509 Width = 509
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 41 ClientHeight = 35
ClientWidth = 509 ClientWidth = 509
TabOrder = 1 TabOrder = 1
object ApplyButton: TButton object CloseButton: TBitBtn
Left = 317 AnchorSideRight.Control = BtnPanel
Height = 29 AnchorSideBottom.Control = BtnPanel
Left = 419
Height = 23
Top = 6 Top = 6
Width = 90 Width = 84
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Caption = 'ApplyButton'
Constraints.MinWidth = 75
OnClick = ApplyButtonClick
TabOrder = 0
end
object CloseButton: TButton
Left = 413
Height = 29
Top = 6
Width = 90
Align = alRight Align = alRight
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'CloseButton' Caption = 'CloseButton'
Constraints.MinWidth = 75 Constraints.MinWidth = 75
ModalResult = 1 ModalResult = 1
NumGlyphs = 0
TabOrder = 0
end
object ApplyButton: TBitBtn
AnchorSideRight.Control = CloseButton
AnchorSideBottom.Control = BtnPanel
Left = 328
Height = 23
Top = 6
Width = 85
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Caption = 'ApplyButton'
Constraints.MinWidth = 75
NumGlyphs = 0
OnClick = ApplyButtonClick
TabOrder = 1 TabOrder = 1
end end
object PreviewButton: TButton object PreviewButton: TBitBtn
Left = 208 AnchorSideRight.Control = ApplyButton
Height = 29 AnchorSideBottom.Control = BtnPanel
Left = 226
Height = 23
Top = 6 Top = 6
Width = 103 Width = 96
Align = alRight Align = alRight
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'PreviewButton' Caption = 'PreviewButton'
Constraints.MinWidth = 75 Constraints.MinWidth = 75
NumGlyphs = 0
OnClick = PreviewButtonClick OnClick = PreviewButtonClick
TabOrder = 2 TabOrder = 2
end end
end end
object ScopeGroupBox: TGroupBox object ScopeGroupBox: TGroupBox
Left = 6 Left = 6
Height = 60 Height = 51
Top = 6 Top = 6
Width = 497 Width = 497
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'ScopeGroupBox' Caption = 'ScopeGroupBox'
ClientHeight = 41 ClientHeight = 33
ClientWidth = 493 ClientWidth = 493
TabOrder = 2 TabOrder = 2
object NewEncodingLabel: TLabel object NewEncodingLabel: TLabel
@ -160,10 +172,10 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideTop.Control = NewEncodingComboBox AnchorSideTop.Control = NewEncodingComboBox
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = NewEncodingComboBox AnchorSideRight.Control = NewEncodingComboBox
Left = 240 Left = 270
Height = 18 Height = 14
Top = 11 Top = 9
Width = 120 Width = 90
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.Left = 15 BorderSpacing.Left = 15
Caption = 'NewEncodingLabel' Caption = 'NewEncodingLabel'
@ -174,11 +186,13 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideTop.Control = ScopeGroupBox AnchorSideTop.Control = ScopeGroupBox
AnchorSideRight.Control = NewEncodingLabel AnchorSideRight.Control = NewEncodingLabel
Left = 6 Left = 6
Height = 29 Height = 21
Top = 6 Top = 6
Width = 219 Width = 249
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ItemHeight = 13
MaxLength = -1
TabOrder = 0 TabOrder = 0
Text = 'OwnerComboBox' Text = 'OwnerComboBox'
end end
@ -187,30 +201,32 @@ object ChgEncodingDialog: TChgEncodingDialog
AnchorSideRight.Control = ScopeGroupBox AnchorSideRight.Control = ScopeGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 360 Left = 360
Height = 29 Height = 21
Top = 6 Top = 6
Width = 127 Width = 127
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 6 BorderSpacing.Right = 6
BorderSpacing.Bottom = 6 BorderSpacing.Bottom = 6
ItemHeight = 13
MaxLength = -1
TabOrder = 1 TabOrder = 1
Text = 'NewEncodingComboBox' Text = 'NewEncodingComboBox'
end end
end end
object PreviewGroupBox: TGroupBox object PreviewGroupBox: TGroupBox
Left = 6 Left = 6
Height = 191 Height = 228
Top = 241 Top = 210
Width = 497 Width = 497
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'PreviewGroupBox' Caption = 'PreviewGroupBox'
ClientHeight = 172 ClientHeight = 210
ClientWidth = 493 ClientWidth = 493
TabOrder = 3 TabOrder = 3
object PreviewListView: TListView object PreviewListView: TListView
Height = 172 Height = 210
Width = 493 Width = 493
Align = alClient Align = alClient
Columns = < Columns = <

141
converter/chgencodingdlg.lrs
View File

@ -4,72 +4,77 @@ LazarusResources.Add('TChgEncodingDialog','FORMDATA',[
'TPF0'#18'TChgEncodingDialog'#17'ChgEncodingDialog'#4'Left'#3'"'#1#6'Height'#3 'TPF0'#18'TChgEncodingDialog'#17'ChgEncodingDialog'#4'Left'#3'"'#1#6'Height'#3
+#223#1#3'Top'#3#191#0#5'Width'#3#253#1#13'ActiveControl'#7#13'OwnerComboBox' +#223#1#3'Top'#3#191#0#5'Width'#3#253#1#13'ActiveControl'#7#13'OwnerComboBox'
+#7'Caption'#6#17'ChgEncodingDialog'#12'ClientHeight'#3#223#1#11'ClientWidth' +#7'Caption'#6#17'ChgEncodingDialog'#12'ClientHeight'#3#223#1#11'ClientWidth'
+#3#253#1#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#10'LCLV' +#3#253#1#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#10'Pare'
+'ersion'#6#6'0.9.25'#0#9'TGroupBox'#13'FilesGroupBox'#4'Left'#2#6#6'Height'#3 +'ntFont'#8#10'LCLVersion'#6#6'0.9.25'#0#9'TGroupBox'#13'FilesGroupBox'#4'Lef'
+#163#0#3'Top'#2'H'#5'Width'#3#241#1#5'Align'#7#5'alTop'#8'AutoSize'#9#20'Bor' +'t'#2#6#6'Height'#3#141#0#3'Top'#2'?'#5'Width'#3#241#1#5'Align'#7#5'alTop'#8
+'derSpacing.Around'#2#6#7'Caption'#6#13'FilesGroupBox'#12'ClientHeight'#3#144 +'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'FilesGroupBox'#12
+#0#11'ClientWidth'#3#237#1#8'TabOrder'#2#0#0#6'TLabel'#15'FileFilterLabel'#22 +'ClientHeight'#2'{'#11'ClientWidth'#3#237#1#8'TabOrder'#2#0#0#6'TLabel'#15'F'
+'AnchorSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'#7#20 +'ileFilterLabel'#22'AnchorSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSid'
+'NonUTF8FilesCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'H' +'eTop.Control'#7#20'NonUTF8FilesCheckBox'#18'AnchorSideTop.Side'#7#9'asrBott'
+'eight'#2#18#3'Top'#2'G'#5'Width'#2'U'#18'BorderSpacing.Left'#2#6#17'BorderS' +'om'#4'Left'#2#6#6'Height'#2#14#3'Top'#2'A'#5'Width'#2'B'#18'BorderSpacing.L'
+'pacing.Top'#2#15#20'BorderSpacing.Bottom'#2#2#7'Caption'#6#15'FileFilterLab' +'eft'#2#6#17'BorderSpacing.Top'#2#15#20'BorderSpacing.Bottom'#2#2#7'Caption'
+'el'#11'ParentColor'#8#0#0#9'TCheckBox'#17'UTF8FilesCheckBox'#22'AnchorSideL' +#6#15'FileFilterLabel'#11'ParentColor'#8#0#0#9'TCheckBox'#17'UTF8FilesCheckB'
+'eft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'#7#13'FilesGroupB' +'ox'#22'AnchorSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'
+'ox'#4'Left'#2#6#6'Height'#2#22#3'Top'#2#6#5'Width'#3#146#0#20'BorderSpacing' +#7#13'FilesGroupBox'#4'Left'#2#6#6'Height'#2#19#3'Top'#2#6#5'Width'#2'w'#20
+'.Around'#2#6#7'Caption'#6#17'UTF8FilesCheckBox'#7'Checked'#9#5'State'#7#9'c' +'BorderSpacing.Around'#2#6#7'Caption'#6#17'UTF8FilesCheckBox'#7'Checked'#9#5
+'bChecked'#8'TabOrder'#2#0#0#0#9'TCheckBox'#20'NonUTF8FilesCheckBox'#22'Anch' +'State'#7#9'cbChecked'#8'TabOrder'#2#0#0#0#9'TCheckBox'#20'NonUTF8FilesCheck'
+'orSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'#7#17'UTF8' +'Box'#22'AnchorSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Contro'
+'FilesCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2 +'l'#7#17'UTF8FilesCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6
+#22#3'Top'#2'"'#5'Width'#3#172#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#20 +#6'Height'#2#19#3'Top'#2#31#5'Width'#3#138#0#20'BorderSpacing.Around'#2#6#7
+'NonUTF8FilesCheckBox'#7'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0 +'Caption'#6#20'NonUTF8FilesCheckBox'#7'Checked'#9#5'State'#7#9'cbChecked'#8
+#0#9'TCheckBox'#15'RegExprCheckBox'#22'AnchorSideLeft.Control'#7#13'FilesGro' +'TabOrder'#2#1#0#0#9'TCheckBox'#15'RegExprCheckBox'#22'AnchorSideLeft.Contro'
+'upBox'#21'AnchorSideTop.Control'#7#18'FileFilterCombobox'#18'AnchorSideTop.' +'l'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'#7#18'FileFilterCombobox'#18
+'Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#22#3'Top'#2'z'#5'Width'#3#138#0 +'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#19#3'Top'#2'h'#5
+#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#2#7'Caption'#6#15'RegExp' +'Width'#2'r'#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#2#7'Caption'
+'rCheckBox'#8'TabOrder'#2#2#0#0#9'TComboBox'#18'FileFilterCombobox'#22'Ancho' +#6#15'RegExprCheckBox'#8'TabOrder'#2#2#0#0#9'TComboBox'#18'FileFilterCombobo'
+'rSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'#7#15'FileF' +'x'#22'AnchorSideLeft.Control'#7#13'FilesGroupBox'#21'AnchorSideTop.Control'
+'ilterLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Contro' +#7#15'FileFilterLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRi'
+'l'#7#13'FilesGroupBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2#6#6 +'ght.Control'#7#13'FilesGroupBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4
+'Height'#2#29#3'Top'#2'['#5'Width'#3#225#1#7'Anchors'#11#5'akTop'#6'akLeft'#7 +'Left'#2#6#6'Height'#2#21#3'Top'#2'Q'#5'Width'#3#225#1#7'Anchors'#11#5'akTop'
+'akRight'#0#18'BorderSpacing.Left'#2#6#19'BorderSpacing.Right'#2#6#8'TabOrde' +#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#19'BorderSpacing.Right'#2
+'r'#2#3#4'Text'#6#18'FileFilterCombobox'#0#0#0#6'TPanel'#8'BtnPanel'#6'Heigh' +#6#10'ItemHeight'#2#13#9'MaxLength'#2#255#8'TabOrder'#2#3#4'Text'#6#18'FileF'
+'t'#2')'#3'Top'#3#182#1#5'Width'#3#253#1#5'Align'#7#8'alBottom'#8'AutoSize'#9 +'ilterCombobox'#0#0#0#6'TPanel'#8'BtnPanel'#6'Height'#2'#'#3'Top'#3#188#1#5
+#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2')'#11'ClientWidth'#3#253#1#8 +'Width'#3#253#1#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'BevelOuter'#7#6'bvNo'
+'TabOrder'#2#1#0#7'TButton'#11'ApplyButton'#4'Left'#3'='#1#6'Height'#2#29#3 +'ne'#12'ClientHeight'#2'#'#11'ClientWidth'#3#253#1#8'TabOrder'#2#1#0#7'TBitB'
+'Top'#2#6#5'Width'#2'Z'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing' +'tn'#11'CloseButton'#23'AnchorSideRight.Control'#7#8'BtnPanel'#24'AnchorSide'
+'.Around'#2#6#7'Caption'#6#11'ApplyButton'#20'Constraints.MinWidth'#2'K'#7'O' +'Bottom.Control'#7#8'BtnPanel'#4'Left'#3#163#1#6'Height'#2#23#3'Top'#2#6#5'W'
+'nClick'#7#16'ApplyButtonClick'#8'TabOrder'#2#0#0#0#7'TButton'#11'CloseButto' +'idth'#2'T'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6
+'n'#4'Left'#3#157#1#6'Height'#2#29#3'Top'#2#6#5'Width'#2'Z'#5'Align'#7#7'alR' +#7'Caption'#6#11'CloseButton'#20'Constraints.MinWidth'#2'K'#11'ModalResult'#2
+'ight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#11'CloseButto' +#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#11'ApplyButton'#23'Anchor'
+'n'#20'Constraints.MinWidth'#2'K'#11'ModalResult'#2#1#8'TabOrder'#2#1#0#0#7 +'SideRight.Control'#7#11'CloseButton'#24'AnchorSideBottom.Control'#7#8'BtnPa'
+'TButton'#13'PreviewButton'#4'Left'#3#208#0#6'Height'#2#29#3'Top'#2#6#5'Widt' +'nel'#4'Left'#3'H'#1#6'Height'#2#23#3'Top'#2#6#5'Width'#2'U'#5'Align'#7#7'al'
+'h'#2'g'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7 +'Right'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#11'ApplyButt'
+'Caption'#6#13'PreviewButton'#20'Constraints.MinWidth'#2'K'#7'OnClick'#7#18 +'on'#20'Constraints.MinWidth'#2'K'#9'NumGlyphs'#2#0#7'OnClick'#7#16'ApplyBut'
+'PreviewButtonClick'#8'TabOrder'#2#2#0#0#0#9'TGroupBox'#13'ScopeGroupBox'#4 +'tonClick'#8'TabOrder'#2#1#0#0#7'TBitBtn'#13'PreviewButton'#23'AnchorSideRig'
+'Left'#2#6#6'Height'#2'<'#3'Top'#2#6#5'Width'#3#241#1#5'Align'#7#5'alTop'#8 +'ht.Control'#7#11'ApplyButton'#24'AnchorSideBottom.Control'#7#8'BtnPanel'#4
+'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'ScopeGroupBox'#12 +'Left'#3#226#0#6'Height'#2#23#3'Top'#2#6#5'Width'#2'`'#5'Align'#7#7'alRight'
+'ClientHeight'#2')'#11'ClientWidth'#3#237#1#8'TabOrder'#2#2#0#6'TLabel'#16'N' +#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'PreviewButton'#20
+'ewEncodingLabel'#22'AnchorSideLeft.Control'#7#19'NewEncodingComboBox'#21'An' +'Constraints.MinWidth'#2'K'#9'NumGlyphs'#2#0#7'OnClick'#7#18'PreviewButtonCl'
+'chorSideTop.Control'#7#19'NewEncodingComboBox'#18'AnchorSideTop.Side'#7#9'a' +'ick'#8'TabOrder'#2#2#0#0#0#9'TGroupBox'#13'ScopeGroupBox'#4'Left'#2#6#6'Hei'
+'srCenter'#23'AnchorSideRight.Control'#7#19'NewEncodingComboBox'#4'Left'#3 +'ght'#2'3'#3'Top'#2#6#5'Width'#3#241#1#5'Align'#7#5'alTop'#8'AutoSize'#9#20
+#240#0#6'Height'#2#18#3'Top'#2#11#5'Width'#2'x'#7'Anchors'#11#5'akTop'#7'akR' +'BorderSpacing.Around'#2#6#7'Caption'#6#13'ScopeGroupBox'#12'ClientHeight'#2
+'ight'#0#18'BorderSpacing.Left'#2#15#7'Caption'#6#16'NewEncodingLabel'#11'Pa' +'!'#11'ClientWidth'#3#237#1#8'TabOrder'#2#2#0#6'TLabel'#16'NewEncodingLabel'
+'rentColor'#8#0#0#9'TComboBox'#13'OwnerComboBox'#22'AnchorSideLeft.Control'#7 +#22'AnchorSideLeft.Control'#7#19'NewEncodingComboBox'#21'AnchorSideTop.Contr'
+#13'ScopeGroupBox'#21'AnchorSideTop.Control'#7#13'ScopeGroupBox'#23'AnchorSi' +'ol'#7#19'NewEncodingComboBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#23'Anch'
+'deRight.Control'#7#16'NewEncodingLabel'#4'Left'#2#6#6'Height'#2#29#3'Top'#2 +'orSideRight.Control'#7#19'NewEncodingComboBox'#4'Left'#3#14#1#6'Height'#2#14
+#6#5'Width'#3#219#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#20'BorderS' +#3'Top'#2#9#5'Width'#2'Z'#7'Anchors'#11#5'akTop'#7'akRight'#0#18'BorderSpaci'
+'pacing.Around'#2#6#8'TabOrder'#2#0#4'Text'#6#13'OwnerComboBox'#0#0#9'TCombo' +'ng.Left'#2#15#7'Caption'#6#16'NewEncodingLabel'#11'ParentColor'#8#0#0#9'TCo'
+'Box'#19'NewEncodingComboBox'#21'AnchorSideTop.Control'#7#13'ScopeGroupBox' +'mboBox'#13'OwnerComboBox'#22'AnchorSideLeft.Control'#7#13'ScopeGroupBox'#21
+#23'AnchorSideRight.Control'#7#13'ScopeGroupBox'#20'AnchorSideRight.Side'#7#9 +'AnchorSideTop.Control'#7#13'ScopeGroupBox'#23'AnchorSideRight.Control'#7#16
+'asrBottom'#4'Left'#3'h'#1#6'Height'#2#29#3'Top'#2#6#5'Width'#2''#7'Anchors' +'NewEncodingLabel'#4'Left'#2#6#6'Height'#2#21#3'Top'#2#6#5'Width'#3#249#0#7
+#11#5'akTop'#7'akRight'#0#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2 +'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#20'BorderSpacing.Around'#2#6#10
+#6#20'BorderSpacing.Bottom'#2#6#8'TabOrder'#2#1#4'Text'#6#19'NewEncodingComb' +'ItemHeight'#2#13#9'MaxLength'#2#255#8'TabOrder'#2#0#4'Text'#6#13'OwnerCombo'
+'oBox'#0#0#0#9'TGroupBox'#15'PreviewGroupBox'#4'Left'#2#6#6'Height'#3#191#0#3 +'Box'#0#0#9'TComboBox'#19'NewEncodingComboBox'#21'AnchorSideTop.Control'#7#13
,'Top'#3#241#0#5'Width'#3#241#1#5'Align'#7#8'alClient'#20'BorderSpacing.Aroun' ,'ScopeGroupBox'#23'AnchorSideRight.Control'#7#13'ScopeGroupBox'#20'AnchorSid'
+'d'#2#6#7'Caption'#6#15'PreviewGroupBox'#12'ClientHeight'#3#172#0#11'ClientW' +'eRight.Side'#7#9'asrBottom'#4'Left'#3'h'#1#6'Height'#2#21#3'Top'#2#6#5'Widt'
+'idth'#3#237#1#8'TabOrder'#2#3#0#9'TListView'#15'PreviewListView'#6'Height'#3 +'h'#2''#7'Anchors'#11#5'akTop'#7'akRight'#0#17'BorderSpacing.Top'#2#6#19'Bo'
+#172#0#5'Width'#3#237#1#5'Align'#7#8'alClient'#7'Columns'#14#1#7'Caption'#6#5 +'rderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#10'ItemHeight'#2#13#9'M'
+'Files'#8'MinWidth'#2'K'#5'Width'#3','#1#0#1#7'Caption'#6#8'Encoding'#8'MinW' +'axLength'#2#255#8'TabOrder'#2#1#4'Text'#6#19'NewEncodingComboBox'#0#0#0#9'T'
+'idth'#2'K'#5'Width'#3#175#0#0#0#8'TabOrder'#2#0#9'ViewStyle'#7#8'vsReport'#0 +'GroupBox'#15'PreviewGroupBox'#4'Left'#2#6#6'Height'#3#228#0#3'Top'#3#210#0#5
+#0#0#0 +'Width'#3#241#1#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2#6#7'Captio'
+'n'#6#15'PreviewGroupBox'#12'ClientHeight'#3#210#0#11'ClientWidth'#3#237#1#8
+'TabOrder'#2#3#0#9'TListView'#15'PreviewListView'#6'Height'#3#210#0#5'Width'
+#3#237#1#5'Align'#7#8'alClient'#7'Columns'#14#1#7'Caption'#6#5'Files'#8'MinW'
+'idth'#2'K'#5'Width'#3','#1#0#1#7'Caption'#6#8'Encoding'#8'MinWidth'#2'K'#5
+'Width'#3#175#0#0#0#8'TabOrder'#2#0#9'ViewStyle'#7#8'vsReport'#0#0#0#0
]); ]);

11
converter/chgencodingdlg.pas
View File

@ -37,24 +37,24 @@ uses
CodeCache, CodeToolsStructs, CodeToolManager, AVL_Tree, CodeCache, CodeToolsStructs, CodeToolManager, AVL_Tree,
// IDE // IDE
IDEProcs, CodeBrowser, PackageDefs, PackageSystem, Project, IDEProcs, CodeBrowser, PackageDefs, PackageSystem, Project,
LazarusIDEStrConsts; LazarusIDEStrConsts, Buttons;
type type
{ TChgEncodingDialog } { TChgEncodingDialog }
TChgEncodingDialog = class(TForm) TChgEncodingDialog = class(TForm)
ApplyButton: TBitBtn;
BtnPanel: TPanel; BtnPanel: TPanel;
CloseButton: TBitBtn;
NewEncodingComboBox: TComboBox; NewEncodingComboBox: TComboBox;
FileFilterCombobox: TComboBox; FileFilterCombobox: TComboBox;
NewEncodingLabel: TLabel; NewEncodingLabel: TLabel;
PreviewButton: TButton; PreviewButton: TBitBtn;
PreviewListView: TListView; PreviewListView: TListView;
CloseButton: TButton;
PreviewGroupBox: TGroupBox; PreviewGroupBox: TGroupBox;
OwnerComboBox: TComboBox; OwnerComboBox: TComboBox;
ScopeGroupBox: TGroupBox; ScopeGroupBox: TGroupBox;
ApplyButton: TButton;
RegExprCheckBox: TCheckBox; RegExprCheckBox: TCheckBox;
FileFilterLabel: TLabel; FileFilterLabel: TLabel;
NonUTF8FilesCheckBox: TCheckBox; NonUTF8FilesCheckBox: TCheckBox;
@ -106,6 +106,9 @@ begin
PreviewButton.Caption:=lisUpdatePreview; PreviewButton.Caption:=lisUpdatePreview;
CloseButton.Caption:=lisMenuClose; CloseButton.Caption:=lisMenuClose;
ApplyButton.Caption:=lisConvert; ApplyButton.Caption:=lisConvert;
PreviewButton.LoadGlyphFromLazarusResource('refresh');
CloseButton.LoadGlyphFromLazarusResource('btn_close');
ApplyButton.LoadGlyphFromLazarusResource('btn_ok');
PreviewGroupBox.Caption:=dlgWRDPreview; PreviewGroupBox.Caption:=dlgWRDPreview;
PreviewListView.Column[0].Caption:=dlgEnvFiles; PreviewListView.Column[0].Caption:=dlgEnvFiles;

26
designer/aligncompsdlg.lfm
View File

@ -3,19 +3,19 @@ object AlignComponentsDialog: TAlignComponentsDialog
Height = 238 Height = 238
Top = 325 Top = 325
Width = 400 Width = 400
HorzScrollBar.Page = 399
VertScrollBar.Page = 237
ActiveControl = OKButton ActiveControl = OKButton
BorderStyle = bsSizeToolWin BorderStyle = bsSizeToolWin
Caption = 'AlignComponentsDialog' Caption = 'AlignComponentsDialog'
ClientHeight = 238 ClientHeight = 238
ClientWidth = 400 ClientWidth = 400
OnResize = FormResize OnResize = FormResize
ParentFont = False
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.25'
object HorizontalRadioGroup: TRadioGroup object HorizontalRadioGroup: TRadioGroup
AnchorSideBottom.Control = ACDBtnPanel AnchorSideBottom.Control = ACDBtnPanel
Left = 6 Left = 6
Height = 176 Height = 191
Top = 6 Top = 6
Width = 191 Width = 191
Anchors = [akTop, akLeft, akBottom] Anchors = [akTop, akLeft, akBottom]
@ -35,7 +35,7 @@ object AlignComponentsDialog: TAlignComponentsDialog
object VerticalRadioGroup: TRadioGroup object VerticalRadioGroup: TRadioGroup
AnchorSideBottom.Control = ACDBtnPanel AnchorSideBottom.Control = ACDBtnPanel
Left = 203 Left = 203
Height = 176 Height = 191
Top = 6 Top = 6
Width = 191 Width = 191
Anchors = [akTop, akRight, akBottom] Anchors = [akTop, akRight, akBottom]
@ -53,23 +53,21 @@ object AlignComponentsDialog: TAlignComponentsDialog
TabOrder = 1 TabOrder = 1
end end
object ACDBtnPanel: TPanel object ACDBtnPanel: TPanel
Height = 50 Height = 35
Top = 188 Top = 203
Width = 400 Width = 400
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 50 ClientHeight = 35
ClientWidth = 400 ClientWidth = 400
TabOrder = 2 TabOrder = 2
object OKButton: TBitBtn object OKButton: TBitBtn
AnchorSideRight.Control = CancelButton Left = 238
Left = 227 Height = 23
Height = 38
Top = 6 Top = 6
Width = 75 Width = 75
Align = alRight Align = alRight
Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = '&OK' Caption = '&OK'
@ -82,10 +80,10 @@ object AlignComponentsDialog: TAlignComponentsDialog
end end
object CancelButton: TBitBtn object CancelButton: TBitBtn
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 308 Left = 319
Height = 38 Height = 23
Top = 6 Top = 6
Width = 86 Width = 75
Align = alRight Align = alRight
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6

69
designer/aligncompsdlg.lrs
View File

@ -2,39 +2,38 @@
LazarusResources.Add('TAlignComponentsDialog','FORMDATA',[ LazarusResources.Add('TAlignComponentsDialog','FORMDATA',[
'TPF0'#22'TAlignComponentsDialog'#21'AlignComponentsDialog'#4'Left'#3'j'#1#6 'TPF0'#22'TAlignComponentsDialog'#21'AlignComponentsDialog'#4'Left'#3'j'#1#6
+'Height'#3#238#0#3'Top'#3'E'#1#5'Width'#3#144#1#18'HorzScrollBar.Page'#3#143 +'Height'#3#238#0#3'Top'#3'E'#1#5'Width'#3#144#1#13'ActiveControl'#7#8'OKButt'
+#1#18'VertScrollBar.Page'#3#237#0#13'ActiveControl'#7#8'OKButton'#11'BorderS' +'on'#11'BorderStyle'#7#13'bsSizeToolWin'#7'Caption'#6#21'AlignComponentsDial'
+'tyle'#7#13'bsSizeToolWin'#7'Caption'#6#21'AlignComponentsDialog'#12'ClientH' +'og'#12'ClientHeight'#3#238#0#11'ClientWidth'#3#144#1#8'OnResize'#7#10'FormR'
+'eight'#3#238#0#11'ClientWidth'#3#144#1#8'OnResize'#7#10'FormResize'#8'Posit' +'esize'#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6
+'ion'#7#14'poScreenCenter'#0#11'TRadioGroup'#20'HorizontalRadioGroup'#24'Anc' +'0.9.25'#0#11'TRadioGroup'#20'HorizontalRadioGroup'#24'AnchorSideBottom.Cont'
+'horSideBottom.Control'#7#11'ACDBtnPanel'#4'Left'#2#6#6'Height'#3#176#0#3'To' +'rol'#7#11'ACDBtnPanel'#4'Left'#2#6#6'Height'#3#191#0#3'Top'#2#6#5'Width'#3
+'p'#2#6#5'Width'#3#191#0#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#8'Au' +#191#0#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#8'AutoFill'#9#20'Borde'
+'toFill'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#20'HorizontalRadioGroup' +'rSpacing.Around'#2#6#7'Caption'#6#20'HorizontalRadioGroup'#28'ChildSizing.L'
+#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29 +'eftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.En'
+'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizin' +'largeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVerti'
+'g.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHori' +'cal'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'c'
+'zontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleCh' +'rsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'Child'
+'ilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSi' +'Sizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsP'
+'zing.ControlsPerLine'#2#1#8'TabOrder'#2#0#0#0#11'TRadioGroup'#18'VerticalRa' +'erLine'#2#1#8'TabOrder'#2#0#0#0#11'TRadioGroup'#18'VerticalRadioGroup'#24'A'
+'dioGroup'#24'AnchorSideBottom.Control'#7#11'ACDBtnPanel'#4'Left'#3#203#0#6 +'nchorSideBottom.Control'#7#11'ACDBtnPanel'#4'Left'#3#203#0#6'Height'#3#191#0
+'Height'#3#176#0#3'Top'#2#6#5'Width'#3#191#0#7'Anchors'#11#5'akTop'#7'akRigh' +#3'Top'#2#6#5'Width'#3#191#0#7'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0
+'t'#8'akBottom'#0#8'AutoFill'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#18 +#8'AutoFill'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'VerticalRadioGro'
+'VerticalRadioGroup'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.Top' +'up'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2
+'BottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChil' +#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'Child'
+'dResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28 +'Sizing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.Shrin'
+'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVer' +'kHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsSc'
+'tical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenT' +'aleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'Ch'
+'opToBottom'#27'ChildSizing.ControlsPerLine'#2#1#8'TabOrder'#2#1#0#0#6'TPane' +'ildSizing.ControlsPerLine'#2#1#8'TabOrder'#2#1#0#0#6'TPanel'#11'ACDBtnPanel'
+'l'#11'ACDBtnPanel'#6'Height'#2'2'#3'Top'#3#188#0#5'Width'#3#144#1#5'Align'#7 +#6'Height'#2'#'#3'Top'#3#203#0#5'Width'#3#144#1#5'Align'#7#8'alBottom'#8'Aut'
+#8'alBottom'#8'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'2' +'oSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'#'#11'ClientWidth'#3
+#11'ClientWidth'#3#144#1#8'TabOrder'#2#2#0#7'TBitBtn'#8'OKButton'#23'AnchorS' +#144#1#8'TabOrder'#2#2#0#7'TBitBtn'#8'OKButton'#4'Left'#3#238#0#6'Height'#2
+'ideRight.Control'#7#12'CancelButton'#4'Left'#3#227#0#6'Height'#2'&'#3'Top'#2 +#23#3'Top'#2#6#5'Width'#2'K'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSp'
+#6#5'Width'#2'K'#5'Align'#7#7'alRight'#7'Anchors'#11#7'akRight'#8'akBottom'#0 +'acing.Around'#2#6#7'Caption'#6#3'&OK'#20'Constraints.MinWidth'#2'K'#7'Defau'
+#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#20'Constrain' +'lt'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0
+'ts.MinWidth'#2'K'#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumG' +#0#0#7'TBitBtn'#12'CancelButton'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'L'
+'lyphs'#2#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#12'CancelButton'#20'AnchorSideRig' +'eft'#3'?'#1#6'Height'#2#23#3'Top'#2#6#5'Width'#2'K'#5'Align'#7#7'alRight'#8
+'ht.Side'#7#9'asrBottom'#4'Left'#3'4'#1#6'Height'#2'&'#3'Top'#2#6#5'Width'#2 +'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#6'Cancel'#20'Constrai'
+'V'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Capti' +'nts.MinWidth'#2'K'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2
+'on'#6#6'Cancel'#20'Constraints.MinWidth'#2'K'#4'Kind'#7#8'bkCancel'#11'Moda' +#0#8'TabOrder'#2#1#0#0#0#0
+'lResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#1#0#0#0#0
]); ]);

2
designer/aligncompsdlg.pp
View File

@ -117,6 +117,8 @@ begin
OkButton.Caption:=dlgButApply; OkButton.Caption:=dlgButApply;
CancelButton.Caption:=dlgCancel; CancelButton.Caption:=dlgCancel;
OkButton.LoadGlyphFromLazarusResource('btn_ok');
CancelButton.LoadGlyphFromLazarusResource('btn_cancel');
end; end;
initialization initialization

26
designer/designermenu.lfm
View File

@ -3,8 +3,6 @@ object TemplateMenuForm: TTemplateMenuForm
Height = 240 Height = 240
Top = 199 Top = 199
Width = 520 Width = 520
HorzScrollBar.Page = 519
VertScrollBar.Page = 239
Caption = 'TemplateMenuForm' Caption = 'TemplateMenuForm'
ClientHeight = 240 ClientHeight = 240
ClientWidth = 520 ClientWidth = 520
@ -12,7 +10,9 @@ object TemplateMenuForm: TTemplateMenuForm
Constraints.MinWidth = 350 Constraints.MinWidth = 350
OnCreate = FormCreate OnCreate = FormCreate
OnResize = FormResize OnResize = FormResize
ParentFont = False
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.25'
object Label_template_description: TLabel object Label_template_description: TLabel
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
@ -43,7 +43,7 @@ object TemplateMenuForm: TTemplateMenuForm
AnchorSideBottom.Control = ListBoxView AnchorSideBottom.Control = ListBoxView
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 176 Height = 179
Top = 26 Top = 26
Width = 244 Width = 244
Anchors = [akTop, akLeft, akBottom] Anchors = [akTop, akLeft, akBottom]
@ -61,7 +61,7 @@ object TemplateMenuForm: TTemplateMenuForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = CancelBitBtn AnchorSideBottom.Control = CancelBitBtn
Left = 262 Left = 262
Height = 176 Height = 179
Top = 26 Top = 26
Width = 252 Width = 252
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
@ -77,7 +77,7 @@ object TemplateMenuForm: TTemplateMenuForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 23 Height = 23
Top = 208 Top = 211
Width = 244 Width = 244
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -89,10 +89,10 @@ object TemplateMenuForm: TTemplateMenuForm
AnchorSideRight.Control = CancelBitBtn AnchorSideRight.Control = CancelBitBtn
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 364 Left = 420
Height = 26 Height = 23
Top = 208 Top = 211
Width = 60 Width = 36
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -110,10 +110,10 @@ object TemplateMenuForm: TTemplateMenuForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 430 Left = 462
Height = 26 Height = 23
Top = 208 Top = 211
Width = 84 Width = 52
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6

88
designer/designermenu.lrs
View File

@ -2,48 +2,48 @@
LazarusResources.Add('TTemplateMenuForm','FORMDATA',[ LazarusResources.Add('TTemplateMenuForm','FORMDATA',[
'TPF0'#17'TTemplateMenuForm'#16'TemplateMenuForm'#4'Left'#3#25#2#6'Height'#3 'TPF0'#17'TTemplateMenuForm'#16'TemplateMenuForm'#4'Left'#3#25#2#6'Height'#3
+#240#0#3'Top'#3#199#0#5'Width'#3#8#2#18'HorzScrollBar.Page'#3#7#2#18'VertScr' +#240#0#3'Top'#3#199#0#5'Width'#3#8#2#7'Caption'#6#16'TemplateMenuForm'#12'Cl'
+'ollBar.Page'#3#239#0#7'Caption'#6#16'TemplateMenuForm'#12'ClientHeight'#3 +'ientHeight'#3#240#0#11'ClientWidth'#3#8#2#21'Constraints.MinHeight'#2'd'#20
+#240#0#11'ClientWidth'#3#8#2#21'Constraints.MinHeight'#2'd'#20'Constraints.M' +'Constraints.MinWidth'#3'^'#1#8'OnCreate'#7#10'FormCreate'#8'OnResize'#7#10
+'inWidth'#3'^'#1#8'OnCreate'#7#10'FormCreate'#8'OnResize'#7#10'FormResize'#8 +'FormResize'#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'#10'LCLVersion'
+'Position'#7#14'poScreenCenter'#0#6'TLabel'#26'Label_template_description'#22 +#6#6'0.9.25'#0#6'TLabel'#26'Label_template_description'#22'AnchorSideLeft.Co'
+'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#4'L' +'ntrol'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#4'Left'#2#6#6'Height'
+'eft'#2#6#6'Height'#2#14#3'Top'#2#6#5'Width'#3#132#0#18'BorderSpacing.Left'#2 +#2#14#3'Top'#2#6#5'Width'#3#132#0#18'BorderSpacing.Left'#2#6#17'BorderSpacin'
+#6#17'BorderSpacing.Top'#2#6#7'Caption'#6#26'Label_template_description'#11 +'g.Top'#2#6#7'Caption'#6#26'Label_template_description'#11'ParentColor'#8#0#0
+'ParentColor'#8#0#0#6'TLabel'#19'Label_template_view'#22'AnchorSideLeft.Cont' +#6'TLabel'#19'Label_template_view'#22'AnchorSideLeft.Control'#7#11'ListBoxVi'
+'rol'#7#11'ListBoxView'#21'AnchorSideTop.Control'#7#5'Owner'#4'Left'#3#6#1#6 +'ew'#21'AnchorSideTop.Control'#7#5'Owner'#4'Left'#3#6#1#6'Height'#2#14#3'Top'
+'Height'#2#14#3'Top'#2#6#5'Width'#2'f'#17'BorderSpacing.Top'#2#6#7'Caption'#6 +#2#6#5'Width'#2'f'#17'BorderSpacing.Top'#2#6#7'Caption'#6#19'Label_template_'
+#19'Label_template_view'#11'ParentColor'#8#0#0#8'TListBox'#16'TemplatesListB' +'view'#11'ParentColor'#8#0#0#8'TListBox'#16'TemplatesListBox'#22'AnchorSideL'
+'ox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#26'La' +'eft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#26'Label_template_descr'
+'bel_template_description'#18'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSi' +'iption'#18'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7
+'deBottom.Control'#7#11'ListBoxView'#21'AnchorSideBottom.Side'#7#9'asrBottom' +#11'ListBoxView'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Heig'
+#4'Left'#2#6#6'Height'#3#176#0#3'Top'#2#26#5'Width'#3#244#0#7'Anchors'#11#5 +'ht'#3#179#0#3'Top'#2#26#5'Width'#3#244#0#7'Anchors'#11#5'akTop'#6'akLeft'#8
+'akTop'#6'akLeft'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.' +'akBottom'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#7'OnClick'
+'Top'#2#6#7'OnClick'#7#21'TemplatesListBoxClick'#8'TabOrder'#2#0#0#0#8'TList' +#7#21'TemplatesListBoxClick'#8'TabOrder'#2#0#0#0#8'TListBox'#11'ListBoxView'
+'Box'#11'ListBoxView'#22'AnchorSideLeft.Control'#7#16'TemplatesListBox'#19'A' +#22'AnchorSideLeft.Control'#7#16'TemplatesListBox'#19'AnchorSideLeft.Side'#7
+'nchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#19'Label_tem' +#9'asrBottom'#21'AnchorSideTop.Control'#7#19'Label_template_view'#18'AnchorS'
+'plate_view'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Contro' +'ideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#5'Owner'#20'Ancho'
+'l'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.C' +'rSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#12'CancelBit'
+'ontrol'#7#12'CancelBitBtn'#4'Left'#3#6#1#6'Height'#3#176#0#3'Top'#2#26#5'Wi' +'Btn'#4'Left'#3#6#1#6'Height'#3#179#0#3'Top'#2#26#5'Width'#3#252#0#7'Anchors'
+'dth'#3#252#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'B' +#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#20
+'orderSpacing.Left'#2#6#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#1#0#0#5'T' +'BorderSpacing.Around'#2#6#8'TabOrder'#2#1#0#0#5'TEdit'#25'Edit_template_des'
+'Edit'#25'Edit_template_description'#22'AnchorSideLeft.Control'#7#16'Templat' +'cription'#22'AnchorSideLeft.Control'#7#16'TemplatesListBox'#21'AnchorSideTo'
+'esListBox'#21'AnchorSideTop.Control'#7#16'TemplatesListBox'#18'AnchorSideTo' +'p.Control'#7#16'TemplatesListBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
+'p.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#16'TemplatesListBox'#20 +'AnchorSideRight.Control'#7#16'TemplatesListBox'#20'AnchorSideRight.Side'#7#9
+'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#3#208 +'asrBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#3#211#0#5'Width'#3#244#0#7'Anc'
+#0#5'Width'#3#244#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderS' +'hors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#6#8'TabOrd'
+'pacing.Top'#2#6#8'TabOrder'#2#2#4'Text'#6#25'Edit_template_description'#7'V' +'er'#2#2#4'Text'#6#25'Edit_template_description'#7'Visible'#8#0#0#7'TBitBtn'
+'isible'#8#0#0#7'TBitBtn'#8'OKBitBtn'#23'AnchorSideRight.Control'#7#12'Cance' +#8'OKBitBtn'#23'AnchorSideRight.Control'#7#12'CancelBitBtn'#24'AnchorSideBot'
+'lBitBtn'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7 +'tom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3
+#9'asrBottom'#4'Left'#3'l'#1#6'Height'#2#26#3'Top'#3#208#0#5'Width'#2'<'#7'A' +#164#1#6'Height'#2#23#3'Top'#3#211#0#5'Width'#2'$'#7'Anchors'#11#7'akRight'#8
+'nchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2 +'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bott'
+#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#3'&'#206#202#7'Default'#9#4'Kin' +'om'#2#6#7'Caption'#6#5'&'#195#142#195#138#7'Default'#9#4'Kind'#7#4'bkOK'#11
+'d'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#13'OKBitBtnC' +'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#13'OKBitBtnClick'#8'TabOrder'
+'lick'#8'TabOrder'#2#3#0#0#7'TBitBtn'#12'CancelBitBtn'#23'AnchorSideRight.Co' +#2#3#0#0#7'TBitBtn'#12'CancelBitBtn'#23'AnchorSideRight.Control'#7#5'Owner'
+'ntrol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBott' +#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Ow'
+'om.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3 +'ner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#206#1#6'Height'#2#23
+#174#1#6'Height'#2#26#3'Top'#3#208#0#5'Width'#2'T'#7'Anchors'#11#7'akRight'#8 +#3'Top'#3#211#0#5'Width'#2'4'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoS'
+'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Captio' +'ize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#12#195#142#195
+'n'#6#6#206#242#236#229#237#224#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9 +#178#195#172#195#165#195#173#195#160#4'Kind'#7#8'bkCancel'#11'ModalResult'#2
+'NumGlyphs'#2#0#7'OnClick'#7#17'CancelBitBtnClick'#8'TabOrder'#2#4#0#0#0 +#2#9'NumGlyphs'#2#0#7'OnClick'#7#17'CancelBitBtnClick'#8'TabOrder'#2#4#0#0#0
]); ]);

2
designer/designermenu.pp
View File

@ -2010,6 +2010,8 @@ begin
OKBitBtn.Caption:=lisOkBtn; OKBitBtn.Caption:=lisOkBtn;
CancelBitBtn.Caption:=dlgCancel; CancelBitBtn.Caption:=dlgCancel;
OKBitBtn.LoadGlyphFromLazarusResource('btn_ok');
CancelBitBtn.LoadGlyphFromLazarusResource('btn_cancel');
// Templates from menutemplates.xml // Templates from menutemplates.xml
i:=1; i:=1;

19
designer/scalecompsdlg.lfm
View File

@ -3,14 +3,13 @@ object ScaleComponentsDialog: TScaleComponentsDialog
Height = 82 Height = 82
Top = 698 Top = 698
Width = 258 Width = 258
HorzScrollBar.Page = 257
VertScrollBar.Page = 81
ActiveControl = OKButton ActiveControl = OKButton
BorderIcons = [biSystemMenu, biMinimize] BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsToolWindow BorderStyle = bsToolWindow
Caption = 'ScaleComponentsDialog' Caption = 'ScaleComponentsDialog'
ClientHeight = 82 ClientHeight = 82
ClientWidth = 258 ClientWidth = 258
ParentFont = False
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.25' LCLVersion = '0.9.25'
object PercentLabel: TLabel object PercentLabel: TLabel
@ -41,10 +40,10 @@ object ScaleComponentsDialog: TScaleComponentsDialog
AnchorSideRight.Control = CancelButton AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 108 Left = 148
Height = 26 Height = 23
Top = 50 Top = 53
Width = 60 Width = 40
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -61,10 +60,10 @@ object ScaleComponentsDialog: TScaleComponentsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 174 Left = 194
Height = 26 Height = 23
Top = 50 Top = 53
Width = 78 Width = 58
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6

60
designer/scalecompsdlg.lrs
View File

@ -2,34 +2,34 @@
LazarusResources.Add('TScaleComponentsDialog','FORMDATA',[ LazarusResources.Add('TScaleComponentsDialog','FORMDATA',[
'TPF0'#22'TScaleComponentsDialog'#21'ScaleComponentsDialog'#4'Left'#3't'#1#6 'TPF0'#22'TScaleComponentsDialog'#21'ScaleComponentsDialog'#4'Left'#3't'#1#6
+'Height'#2'R'#3'Top'#3#186#2#5'Width'#3#2#1#18'HorzScrollBar.Page'#3#1#1#18 +'Height'#2'R'#3'Top'#3#186#2#5'Width'#3#2#1#13'ActiveControl'#7#8'OKButton'
+'VertScrollBar.Page'#2'Q'#13'ActiveControl'#7#8'OKButton'#11'BorderIcons'#11 +#11'BorderIcons'#11#12'biSystemMenu'#10'biMinimize'#0#11'BorderStyle'#7#12'b'
+#12'biSystemMenu'#10'biMinimize'#0#11'BorderStyle'#7#12'bsToolWindow'#7'Capt' +'sToolWindow'#7'Caption'#6#21'ScaleComponentsDialog'#12'ClientHeight'#2'R'#11
+'ion'#6#21'ScaleComponentsDialog'#12'ClientHeight'#2'R'#11'ClientWidth'#3#2#1 +'ClientWidth'#3#2#1#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'#10'LCL'
+#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#12 +'Version'#6#6'0.9.25'#0#6'TLabel'#12'PercentLabel'#21'AnchorSideTop.Control'
+'PercentLabel'#21'AnchorSideTop.Control'#7#11'PercentEdit'#18'AnchorSideTop.' +#7#11'PercentEdit'#18'AnchorSideTop.Side'#7#9'asrCenter'#23'AnchorSideRight.'
+'Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRi' +'Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#189#0
+'ght.Side'#7#9'asrBottom'#4'Left'#3#189#0#6'Height'#2#14#3'Top'#2#10#5'Width' +#6'Height'#2#14#3'Top'#2#10#5'Width'#2'?'#7'Anchors'#11#5'akTop'#7'akRight'#0
+#2'?'#7'Anchors'#11#5'akTop'#7'akRight'#0#19'BorderSpacing.Right'#2#6#7'Capt' +#19'BorderSpacing.Right'#2#6#7'Caption'#6#12'PercentLabel'#11'ParentColor'#8
+'ion'#6#12'PercentLabel'#11'ParentColor'#8#0#0#6'TLabel'#10'ScaleLabel'#21'A' +#0#0#6'TLabel'#10'ScaleLabel'#21'AnchorSideTop.Control'#7#11'PercentEdit'#18
+'nchorSideTop.Control'#7#11'PercentEdit'#18'AnchorSideTop.Side'#7#9'asrCente' +'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#10#5
+'r'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#10#5'Width'#2'3'#7'Caption'#6#10'Sca' +'Width'#2'3'#7'Caption'#6#10'ScaleLabel'#11'ParentColor'#8#0#0#7'TBitBtn'#8
+'leLabel'#11'ParentColor'#8#0#0#7'TBitBtn'#8'OKButton'#23'AnchorSideRight.Co' +'OKButton'#23'AnchorSideRight.Control'#7#12'CancelButton'#24'AnchorSideBotto'
+'ntrol'#7#12'CancelButton'#24'AnchorSideBottom.Control'#7#5'Owner'#21'Anchor' +'m.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#148
+'SideBottom.Side'#7#9'asrBottom'#4'Left'#2'l'#6'Height'#2#26#3'Top'#2'2'#5'W' +#0#6'Height'#2#23#3'Top'#2'5'#5'Width'#2'('#7'Anchors'#11#7'akRight'#8'akBot'
+'idth'#2'<'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSp' +'tom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2
+'acing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#3'&OK'#7'Default' +#6#7'Caption'#6#3'&OK'#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9
+#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0 +'NumGlyphs'#2#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#12'CancelButton'#23'AnchorSid'
+#7'TBitBtn'#12'CancelButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'Ancho' +'eRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'Ancho'
+'rSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21 +'rSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
+'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#174#0#6'Height'#2#26#3'Top' +'Left'#3#194#0#6'Height'#2#23#3'Top'#2'5'#5'Width'#2':'#7'Anchors'#11#7'akRi'
+#2'2'#5'Width'#2'N'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19 +'ght'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpaci'
+'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#6'Cancel' +'ng.Bottom'#2#6#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'
+#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#1#0 +#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#1#0#0#5'TEdit'#11'PercentEdit'#22'Anchor'
+#0#5'TEdit'#11'PercentEdit'#22'AnchorSideLeft.Control'#7#10'ScaleLabel'#19'A' +'SideLeft.Control'#7#10'ScaleLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21
+'nchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#5'Owner'#23 +'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight.Control'#7#12'PercentL'
+'AnchorSideRight.Control'#7#12'PercentLabel'#4'Left'#2'A'#6'Height'#2#23#3'T' +'abel'#4'Left'#2'A'#6'Height'#2#23#3'Top'#2#6#5'Width'#2'v'#7'Anchors'#11#5
+'op'#2#6#5'Width'#2'v'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'Bord' +'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.T'
+'erSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2#6#8 +'op'#2#6#19'BorderSpacing.Right'#2#6#8'TabOrder'#2#2#4'Text'#6#11'PercentEdi'
+'TabOrder'#2#2#4'Text'#6#11'PercentEdit'#0#0#0 +'t'#0#0#0
]); ]);

4
designer/scalecompsdlg.pp
View File

@ -66,13 +66,15 @@ constructor TScaleComponentsDialog.Create(AOwner: TComponent);
begin begin
inherited Create(AOwner); inherited Create(AOwner);
Caption:='Scale'; Caption:=fdmScaleWord;
ScaleLabel.Caption:=lisScalingFactor; ScaleLabel.Caption:=lisScalingFactor;
PercentLabel.Caption:='%'; PercentLabel.Caption:='%';
OkButton.Caption:=dlgButApply; OkButton.Caption:=dlgButApply;
CancelButton.Caption:=dlgCancel; CancelButton.Caption:=dlgCancel;
OkButton.LoadGlyphFromLazarusResource('btn_ok');
CancelButton.LoadGlyphFromLazarusResource('btn_cancel');
end; end;
initialization initialization

32
designer/sizecompsdlg.lfm
View File

@ -3,8 +3,6 @@ object SizeComponentsDialog: TSizeComponentsDialog
Height = 190 Height = 190
Top = 745 Top = 745
Width = 380 Width = 380
HorzScrollBar.Page = 379
VertScrollBar.Page = 189
ActiveControl = OKButton ActiveControl = OKButton
BorderStyle = bsSizeToolWin BorderStyle = bsSizeToolWin
Caption = 'SizeComponentsDialog' Caption = 'SizeComponentsDialog'
@ -12,15 +10,17 @@ object SizeComponentsDialog: TSizeComponentsDialog
ClientWidth = 380 ClientWidth = 380
OnClose = FormClose OnClose = FormClose
OnResize = FormResize OnResize = FormResize
ParentFont = False
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.25'
object OKButton: TBitBtn object OKButton: TBitBtn
AnchorSideRight.Control = CancelButton AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 230 Left = 270
Height = 26 Height = 23
Top = 158 Top = 161
Width = 60 Width = 40
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -37,10 +37,10 @@ object SizeComponentsDialog: TSizeComponentsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 296 Left = 316
Height = 26 Height = 23
Top = 158 Top = 161
Width = 78 Width = 58
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -56,7 +56,7 @@ object SizeComponentsDialog: TSizeComponentsDialog
AnchorSideBottom.Control = HeightRadioGroup AnchorSideBottom.Control = HeightRadioGroup
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 146 Height = 149
Top = 6 Top = 6
Width = 181 Width = 181
Anchors = [akTop, akLeft, akBottom] Anchors = [akTop, akLeft, akBottom]
@ -71,7 +71,7 @@ object SizeComponentsDialog: TSizeComponentsDialog
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 128 ClientHeight = 131
ClientWidth = 177 ClientWidth = 177
TabOrder = 2 TabOrder = 2
object WidthEdit: TEdit object WidthEdit: TEdit
@ -79,7 +79,7 @@ object SizeComponentsDialog: TSizeComponentsDialog
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 86 Left = 86
Height = 23 Height = 23
Top = 99 Top = 102
Width = 80 Width = 80
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -92,7 +92,7 @@ object SizeComponentsDialog: TSizeComponentsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = OKButton AnchorSideBottom.Control = OKButton
Left = 193 Left = 193
Height = 146 Height = 149
Top = 6 Top = 6
Width = 181 Width = 181
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
@ -107,7 +107,7 @@ object SizeComponentsDialog: TSizeComponentsDialog
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 128 ClientHeight = 131
ClientWidth = 177 ClientWidth = 177
TabOrder = 3 TabOrder = 3
object HeightEdit: TEdit object HeightEdit: TEdit
@ -115,7 +115,7 @@ object SizeComponentsDialog: TSizeComponentsDialog
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 87 Left = 87
Height = 23 Height = 23
Top = 99 Top = 102
Width = 80 Width = 80
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6

86
designer/sizecompsdlg.lrs
View File

@ -2,50 +2,50 @@
LazarusResources.Add('TSizeComponentsDialog','FORMDATA',[ LazarusResources.Add('TSizeComponentsDialog','FORMDATA',[
'TPF0'#21'TSizeComponentsDialog'#20'SizeComponentsDialog'#4'Left'#3'{'#1#6'He' 'TPF0'#21'TSizeComponentsDialog'#20'SizeComponentsDialog'#4'Left'#3'{'#1#6'He'
+'ight'#3#190#0#3'Top'#3#233#2#5'Width'#3'|'#1#18'HorzScrollBar.Page'#3'{'#1 +'ight'#3#190#0#3'Top'#3#233#2#5'Width'#3'|'#1#13'ActiveControl'#7#8'OKButton'
+#18'VertScrollBar.Page'#3#189#0#13'ActiveControl'#7#8'OKButton'#11'BorderSty' +#11'BorderStyle'#7#13'bsSizeToolWin'#7'Caption'#6#20'SizeComponentsDialog'#12
+'le'#7#13'bsSizeToolWin'#7'Caption'#6#20'SizeComponentsDialog'#12'ClientHeig' +'ClientHeight'#3#190#0#11'ClientWidth'#3'|'#1#7'OnClose'#7#9'FormClose'#8'On'
+'ht'#3#190#0#11'ClientWidth'#3'|'#1#7'OnClose'#7#9'FormClose'#8'OnResize'#7 +'Resize'#7#10'FormResize'#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'
+#10'FormResize'#8'Position'#7#14'poScreenCenter'#0#7'TBitBtn'#8'OKButton'#23 +#10'LCLVersion'#6#6'0.9.25'#0#7'TBitBtn'#8'OKButton'#23'AnchorSideRight.Cont'
+'AnchorSideRight.Control'#7#12'CancelButton'#24'AnchorSideBottom.Control'#7#5 +'rol'#7#12'CancelButton'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSi'
+'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#230#0#6'Height'#2 +'deBottom.Side'#7#9'asrBottom'#4'Left'#3#14#1#6'Height'#2#23#3'Top'#3#161#0#5
+#26#3'Top'#3#158#0#5'Width'#2'<'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'Au' +'Width'#2'('#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderS'
+'toSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Captio' +'pacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#3'&OK'#7'Defaul'
+'n'#6#3'&OK'#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs' +'t'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#0
+#2#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#12'CancelButton'#23'AnchorSideRight.Cont' +#0#0#7'TBitBtn'#12'CancelButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'A'
+'rol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom' +'nchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'
+'.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'('#1 +#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'<'#1#6'Height'#2#23#3'To'
+#6'Height'#2#26#3'Top'#3#158#0#5'Width'#2'N'#7'Anchors'#11#7'akRight'#8'akBo' +'p'#3#161#0#5'Width'#2':'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'
+'ttom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2 +#9#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#6'C'
+#6#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGly' +'ancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrde'
+'phs'#2#0#8'TabOrder'#2#1#0#0#11'TRadioGroup'#15'WidthRadioGroup'#22'AnchorS' +'r'#2#1#0#0#11'TRadioGroup'#15'WidthRadioGroup'#22'AnchorSideLeft.Control'#7
+'ideLeft.Control'#7#5'Owner'#24'AnchorSideBottom.Control'#7#16'HeightRadioGr' +#5'Owner'#24'AnchorSideBottom.Control'#7#16'HeightRadioGroup'#21'AnchorSideB'
+'oup'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#146#0 +'ottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#149#0#3'Top'#2#6#5'Width'
+#3'Top'#2#6#5'Width'#3#181#0#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#8 +#3#181#0#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#8'AutoFill'#9#18'Bor'
+'AutoFill'#9#18'BorderSpacing.Left'#2#6#7'Caption'#6#15'WidthRadioGroup'#28 +'derSpacing.Left'#2#6#7'Caption'#6#15'WidthRadioGroup'#28'ChildSizing.LeftRi'
+'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'C' +'ghtSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.Enlarge'
+'hildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing' +'Horizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7
+'.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHoriz'
+'ontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChi'
+'lds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSiz'
+'ing.ControlsPerLine'#2#1#12'ClientHeight'#3#128#0#11'ClientWidth'#3#177#0#8
+'TabOrder'#2#2#0#5'TEdit'#9'WidthEdit'#24'AnchorSideBottom.Control'#7#15'Wid'
+'thRadioGroup'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2'V'#6'Heigh'
+'t'#2#23#3'Top'#2'c'#5'Width'#2'P'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20
+'BorderSpacing.Around'#2#6#8'TabOrder'#2#0#4'Text'#6#9'WidthEdit'#0#0#0#11'T'
+'RadioGroup'#16'HeightRadioGroup'#23'AnchorSideRight.Control'#7#5'Owner'#20
+'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#8'OKBut'
+'ton'#4'Left'#3#193#0#6'Height'#3#146#0#3'Top'#2#6#5'Width'#3#181#0#7'Anchor'
+'s'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#8'AutoFill'#9#20'BorderSp'
+'acing.Around'#2#6#7'Caption'#6#16'HeightRadioGroup'#28'ChildSizing.LeftRigh'
+'tSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHo'
+'rizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7
+#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScale' +#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScale'
+'Childs'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.' +'Childs'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.'
+'Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine' +'Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'
+#2#1#12'ClientHeight'#3#128#0#11'ClientWidth'#3#177#0#8'TabOrder'#2#3#0#5'TE' +#2#1#12'ClientHeight'#3#131#0#11'ClientWidth'#3#177#0#8'TabOrder'#2#2#0#5'TE'
+'dit'#10'HeightEdit'#24'AnchorSideBottom.Control'#7#16'HeightRadioGroup'#21 +'dit'#9'WidthEdit'#24'AnchorSideBottom.Control'#7#15'WidthRadioGroup'#21'Anc'
+'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2'W'#6'Height'#2#23#3'Top'#2 +'horSideBottom.Side'#7#9'asrBottom'#4'Left'#2'V'#6'Height'#2#23#3'Top'#2'f'#5
+'c'#5'Width'#2'P'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20'BorderSpacing.Ar' +'Width'#2'P'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'
+'ound'#2#6#8'TabOrder'#2#0#4'Text'#6#10'HeightEdit'#0#0#0#0 +#2#6#8'TabOrder'#2#0#4'Text'#6#9'WidthEdit'#0#0#0#11'TRadioGroup'#16'HeightR'
+'adioGroup'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7
+#9'asrBottom'#24'AnchorSideBottom.Control'#7#8'OKButton'#4'Left'#3#193#0#6'H'
+'eight'#3#149#0#3'Top'#2#6#5'Width'#3#181#0#7'Anchors'#11#5'akTop'#6'akLeft'
+#7'akRight'#8'akBottom'#0#8'AutoFill'#9#20'BorderSpacing.Around'#2#6#7'Capti'
+'on'#6#16'HeightRadioGroup'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSiz'
+'ing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogen'
+'ousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResi'
+'ze'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.Sh'
+'rinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRig'
+'htThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#3
+#131#0#11'ClientWidth'#3#177#0#8'TabOrder'#2#3#0#5'TEdit'#10'HeightEdit'#24
+'AnchorSideBottom.Control'#7#16'HeightRadioGroup'#21'AnchorSideBottom.Side'#7
+#9'asrBottom'#4'Left'#2'W'#6'Height'#2#23#3'Top'#2'f'#5'Width'#2'P'#7'Anchor'
+'s'#11#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#0
+#4'Text'#6#10'HeightEdit'#0#0#0#0
]); ]);

3
designer/sizecompsdlg.pp
View File

@ -119,6 +119,9 @@ begin
HeightEdit.Text:=''; HeightEdit.Text:='';
OkButton.Caption:=lisOkBtn; OkButton.Caption:=lisOkBtn;
CancelButton.Caption:= dlgCancel;
CancelButton.LoadGlyphFromLazarusResource('btn_cancel');
OkButton.LoadGlyphFromLazarusResource('btn_ok');
end; end;
initialization initialization

62
designer/taborderdlg.lfm
View File

@ -3,8 +3,6 @@ object TabOrderDialog: TTabOrderDialog
Height = 387 Height = 387
Top = 167 Top = 167
Width = 310 Width = 310
HorzScrollBar.Page = 309
VertScrollBar.Page = 386
ActiveControl = ItemTreeview ActiveControl = ItemTreeview
BorderStyle = bsSizeToolWin BorderStyle = bsSizeToolWin
Caption = 'TabOrderDialog' Caption = 'TabOrderDialog'
@ -12,12 +10,36 @@ object TabOrderDialog: TTabOrderDialog
ClientWidth = 310 ClientWidth = 310
OnClose = TabOrderDialogCLOSE OnClose = TabOrderDialogCLOSE
OnCreate = TabOrderDialogCREATE OnCreate = TabOrderDialogCREATE
ParentFont = False
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '0.9.25' LCLVersion = '0.9.25'
object ArrowUp: TSpeedButton
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 279
Height = 25
Top = 120
Width = 25
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
Color = clBtnFace
NumGlyphs = 0
end
object ArrowDown: TSpeedButton
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 279
Height = 25
Top = 176
Width = 25
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
Color = clBtnFace
NumGlyphs = 0
end
object ItemTreeview: TTreeView object ItemTreeview: TTreeView
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
AnchorSideRight.Control = ArrowDown
AnchorSideBottom.Control = ShowOldValuesCheckbox AnchorSideBottom.Control = ShowOldValuesCheckbox
Left = 6 Left = 6
Height = 318 Height = 318
@ -38,7 +60,7 @@ object TabOrderDialog: TTabOrderDialog
Left = 6 Left = 6
Height = 19 Height = 19
Top = 330 Top = 330
Width = 149 Width = 146
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'ShowOldValuesCheckbox' Caption = 'ShowOldValuesCheckbox'
@ -49,10 +71,10 @@ object TabOrderDialog: TTabOrderDialog
AnchorSideRight.Control = CancelButton AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 160 Left = 162
Height = 26 Height = 26
Top = 355 Top = 355
Width = 60 Width = 59
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -68,10 +90,10 @@ object TabOrderDialog: TTabOrderDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 226 Left = 227
Height = 26 Height = 26
Top = 355 Top = 355
Width = 78 Width = 77
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -82,28 +104,4 @@ object TabOrderDialog: TTabOrderDialog
NumGlyphs = 0 NumGlyphs = 0
TabOrder = 3 TabOrder = 3
end end
object ArrowUp: TArrow
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 279
Height = 25
Top = 120
Width = 25
Anchors = [akTop, akRight]
ArrowType = atUp
BorderSpacing.Around = 6
OnClick = UpSpeedbuttonCLICK
end
object ArrowDown: TArrow
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 279
Height = 25
Top = 176
Width = 25
Anchors = [akTop, akRight]
ArrowType = atDown
BorderSpacing.Around = 6
OnClick = DownSpeedbuttonCLICK
end
end end

73
designer/taborderdlg.lrs
View File

@ -2,41 +2,40 @@
LazarusResources.Add('TTabOrderDialog','FORMDATA',[ LazarusResources.Add('TTabOrderDialog','FORMDATA',[
'TPF0'#15'TTabOrderDialog'#14'TabOrderDialog'#4'Left'#3'}'#1#6'Height'#3#131#1 'TPF0'#15'TTabOrderDialog'#14'TabOrderDialog'#4'Left'#3'}'#1#6'Height'#3#131#1
+#3'Top'#3#167#0#5'Width'#3'6'#1#18'HorzScrollBar.Page'#3'5'#1#18'VertScrollB' +#3'Top'#3#167#0#5'Width'#3'6'#1#13'ActiveControl'#7#12'ItemTreeview'#11'Bord'
+'ar.Page'#3#130#1#13'ActiveControl'#7#12'ItemTreeview'#11'BorderStyle'#7#13 +'erStyle'#7#13'bsSizeToolWin'#7'Caption'#6#14'TabOrderDialog'#12'ClientHeigh'
+'bsSizeToolWin'#7'Caption'#6#14'TabOrderDialog'#12'ClientHeight'#3#131#1#11 +'t'#3#131#1#11'ClientWidth'#3'6'#1#7'OnClose'#7#19'TabOrderDialogCLOSE'#8'On'
+'ClientWidth'#3'6'#1#7'OnClose'#7#19'TabOrderDialogCLOSE'#8'OnCreate'#7#20'T' +'Create'#7#20'TabOrderDialogCREATE'#10'ParentFont'#8#8'Position'#7#14'poScre'
+'abOrderDialogCREATE'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.' +'enCenter'#10'LCLVersion'#6#6'0.9.25'#0#12'TSpeedButton'#7'ArrowUp'#23'Ancho'
+'9.25'#0#9'TTreeView'#12'ItemTreeview'#22'AnchorSideLeft.Control'#7#5'Owner' +'rSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Le'
+#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight.Control'#7#9'ArrowD' +'ft'#3#23#1#6'Height'#2#25#3'Top'#2'x'#5'Width'#2#25#7'Anchors'#11#5'akTop'#7
+'own'#24'AnchorSideBottom.Control'#7#21'ShowOldValuesCheckbox'#4'Left'#2#6#6 +'akRight'#0#20'BorderSpacing.Around'#2#6#5'Color'#7#9'clBtnFace'#9'NumGlyphs'
+'Height'#3'>'#1#3'Top'#2#6#5'Width'#3#11#1#7'Anchors'#11#5'akTop'#6'akLeft'#7 +#2#0#0#0#12'TSpeedButton'#9'ArrowDown'#23'AnchorSideRight.Control'#7#5'Owner'
+'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#17'DefaultItemHeight'#2 +#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#23#1#6'Height'#2#25#3'Top'
+#15#13'HideSelection'#8#11'ParentCtl3D'#8#16'RightClickSelect'#9#8'TabOrder' +#3#176#0#5'Width'#2#25#7'Anchors'#11#5'akTop'#7'akRight'#0#20'BorderSpacing.'
+#2#0#7'Options'#11#17'tvoAutoItemHeight'#21'tvoKeepCollapsedNodes'#19'tvoRig' +'Around'#2#6#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#0#0#9'TTreeView'#12'It'
+'htClickSelect'#14'tvoShowButtons'#12'tvoShowLines'#11'tvoShowRoot'#11'tvoTo' +'emTreeview'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'
+'olTips'#0#0#0#9'TCheckBox'#21'ShowOldValuesCheckbox'#22'AnchorSideLeft.Cont' +#7#5'Owner'#24'AnchorSideBottom.Control'#7#21'ShowOldValuesCheckbox'#4'Left'
+'rol'#7#5'Owner'#24'AnchorSideBottom.Control'#7#12'CancelButton'#4'Left'#2#6 +#2#6#6'Height'#3'>'#1#3'Top'#2#6#5'Width'#3#11#1#7'Anchors'#11#5'akTop'#6'ak'
+#6'Height'#2#19#3'Top'#3'J'#1#5'Width'#3#149#0#7'Anchors'#11#6'akLeft'#8'akB' +'Left'#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#17'DefaultItemH'
+'ottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'ShowOldValuesCheckbox' +'eight'#2#15#13'HideSelection'#8#11'ParentCtl3D'#8#16'RightClickSelect'#9#8
+#7'OnClick'#7#26'ShowOldValuesCheckboxCLICK'#8'TabOrder'#2#1#0#0#7'TBitBtn'#8 +'TabOrder'#2#0#7'Options'#11#17'tvoAutoItemHeight'#21'tvoKeepCollapsedNodes'
+'OkButton'#23'AnchorSideRight.Control'#7#12'CancelButton'#24'AnchorSideBotto' +#19'tvoRightClickSelect'#14'tvoShowButtons'#12'tvoShowLines'#11'tvoShowRoot'
+'m.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#160 +#11'tvoToolTips'#0#0#0#9'TCheckBox'#21'ShowOldValuesCheckbox'#22'AnchorSideL'
+#0#6'Height'#2#26#3'Top'#3'c'#1#5'Width'#2'<'#7'Anchors'#11#7'akRight'#8'akB' +'eft.Control'#7#5'Owner'#24'AnchorSideBottom.Control'#7#12'CancelButton'#4'L'
+'ottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#4'K' +'eft'#2#6#6'Height'#2#19#3'Top'#3'J'#1#5'Width'#3#146#0#7'Anchors'#11#6'akLe'
+'ind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButto' +'ft'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'ShowOldValue'
+'nCLICK'#8'TabOrder'#2#2#0#0#7'TBitBtn'#12'CancelButton'#23'AnchorSideRight.' +'sCheckbox'#7'OnClick'#7#26'ShowOldValuesCheckboxCLICK'#8'TabOrder'#2#1#0#0#7
+'Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBo' +'TBitBtn'#8'OkButton'#23'AnchorSideRight.Control'#7#12'CancelButton'#24'Anch'
+'ttom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3 +'orSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
+#226#0#6'Height'#2#26#3'Top'#3'c'#1#5'Width'#2'N'#7'Anchors'#11#7'akRight'#8 +'Left'#3#162#0#6'Height'#2#26#3'Top'#3'c'#1#5'Width'#2';'#7'Anchors'#11#7'ak'
+'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Captio' +'Right'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6
+'n'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8 +#3'&OK'#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7
+'TabOrder'#2#3#0#0#6'TArrow'#7'ArrowUp'#23'AnchorSideRight.Control'#7#5'Owne' +#13'OkButtonCLICK'#8'TabOrder'#2#2#0#0#7'TBitBtn'#12'CancelButton'#23'Anchor'
+'r'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#23#1#6'Height'#2#25#3 +'SideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'An'
+'Top'#2'x'#5'Width'#2#25#7'Anchors'#11#5'akTop'#7'akRight'#0#9'ArrowType'#7#4 +'chorSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'
+'atUp'#20'BorderSpacing.Around'#2#6#7'OnClick'#7#18'UpSpeedbuttonCLICK'#0#0#6 +#4'Left'#3#227#0#6'Height'#2#26#3'Top'#3'c'#1#5'Width'#2'M'#7'Anchors'#11#7
+'TArrow'#9'ArrowDown'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRi' +'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'
+'ght.Side'#7#9'asrBottom'#4'Left'#3#23#1#6'Height'#2#25#3'Top'#3#176#0#5'Wid' +#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGly'
+'th'#2#25#7'Anchors'#11#5'akTop'#7'akRight'#0#9'ArrowType'#7#6'atDown'#20'Bo' +'phs'#2#0#8'TabOrder'#2#3#0#0#0
+'rderSpacing.Around'#2#6#7'OnClick'#7#20'DownSpeedbuttonCLICK'#0#0#0
]); ]);

11
designer/taborderdlg.pas
View File

@ -40,8 +40,8 @@ type
{ TTabOrderDialog } { TTabOrderDialog }
TTabOrderDialog = class(TForm) TTabOrderDialog = class(TForm)
ArrowUp: TArrow; ArrowDown: TSpeedButton;
ArrowDown: TArrow; ArrowUp: TSpeedButton;
CancelButton: TBitBtn; CancelButton: TBitBtn;
OkButton: TBitBtn; OkButton: TBitBtn;
ShowOldValuesCheckbox: TCheckBox; ShowOldValuesCheckbox: TCheckBox;
@ -84,6 +84,13 @@ end;
procedure TTabOrderDialog.TabOrderDialogCREATE(Sender: TObject); procedure TTabOrderDialog.TabOrderDialogCREATE(Sender: TObject);
begin begin
ShowOldValuesCheckbox.Caption:=lisShowOldTabOrder; ShowOldValuesCheckbox.Caption:=lisShowOldTabOrder;
OkButton.Caption:= lisOkBtn;
CancelButton.Caption:= dlgCancel;
OkButton.LoadGlyphFromLazarusResource('btn_ok');
CancelButton.LoadGlyphFromLazarusResource('btn_cancel');
ArrowDown.LoadGlyphFromLazarusResource('arrow_down');
ArrowUp.LoadGlyphFromLazarusResource('arrow_up');
end; end;
procedure TTabOrderDialog.UpSpeedbuttonCLICK(Sender: TObject); procedure TTabOrderDialog.UpSpeedbuttonCLICK(Sender: TObject);