mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-06 12:40:22 +02:00
improved autosizing from Darius
git-svn-id: trunk@7854 -
This commit is contained in:
mattias
parent
abc306261e
commit
5c83b4fae9
@ -126,7 +126,7 @@ begin
|
||||
Name:='WholeWordsOnlyCheckBox';
|
||||
Parent:=OptionsGroupBox;
|
||||
SetBounds(CaseSensitiveCheckBox.Left,
|
||||
CaseSensitiveCheckBox.Top+CaseSensitiveCheckBox.Height+5,
|
||||
CaseSensitiveCheckBox.Top+CaseSensitiveCheckBox.Height+2,
|
||||
CaseSensitiveCheckBox.Width,20);
|
||||
Caption:=lisFindFileWholeWordsOnly;
|
||||
end;
|
||||
@ -136,7 +136,7 @@ begin
|
||||
Name:='RegularExpressionsCheckBox';
|
||||
Parent:=OptionsGroupBox;
|
||||
SetBounds(CaseSensitiveCheckBox.Left,
|
||||
WholeWordsOnlyCheckBox.Top+WholeWordsOnlyCheckBox.Height+5,
|
||||
WholeWordsOnlyCheckBox.Top+WholeWordsOnlyCheckBox.Height+2,
|
||||
CaseSensitiveCheckBox.Width,20);
|
||||
Caption:=lisFindFileRegularExpressions;
|
||||
end;
|
||||
@ -267,19 +267,15 @@ begin
|
||||
end;
|
||||
|
||||
with CaseSensitiveCheckBox do begin
|
||||
SetBounds(8,2,OptionsGroupBox.ClientWidth-20,20);
|
||||
Width:=OptionsGroupBox.ClientWidth;
|
||||
end;
|
||||
|
||||
with WholeWordsOnlyCheckBox do begin
|
||||
SetBounds(CaseSensitiveCheckBox.Left,
|
||||
CaseSensitiveCheckBox.Top+CaseSensitiveCheckBox.Height+5,
|
||||
CaseSensitiveCheckBox.Width,20);
|
||||
Width:=OptionsGroupBox.ClientWidth;
|
||||
end;
|
||||
|
||||
with RegularExpressionsCheckBox do begin
|
||||
SetBounds(CaseSensitiveCheckBox.Left,
|
||||
WholeWordsOnlyCheckBox.Top+WholeWordsOnlyCheckBox.Height+5,
|
||||
CaseSensitiveCheckBox.Width,20);
|
||||
Width:=OptionsGroupBox.ClientWidth;
|
||||
end;
|
||||
|
||||
with WhereRadioGroup do begin
|
||||
|
||||
@ -1,10 +1,11 @@
|
||||
object FindRenameIdentifierDialog: TFindRenameIdentifierDialog
|
||||
BorderStyle = bsSizeToolWin
|
||||
Caption = 'FindRenameIdentifierDialog'
|
||||
ClientHeight = 435
|
||||
ClientWidth = 452
|
||||
OnClose = FindRenameIdentifierDialogClose
|
||||
OnCreate = FindRenameIdentifierDialogCreate
|
||||
PixelsPerInch = 112
|
||||
PixelsPerInch = 96
|
||||
Position = poScreenCenter
|
||||
HorzScrollBar.Page = 451
|
||||
VertScrollBar.Page = 434
|
||||
@ -13,81 +14,100 @@ object FindRenameIdentifierDialog: TFindRenameIdentifierDialog
|
||||
Top = 163
|
||||
Width = 452
|
||||
object CurrentGroupBox: TGroupBox
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'CurrentGroupBox'
|
||||
ClientHeight = 55
|
||||
ClientWidth = 434
|
||||
ClientHeight = 56
|
||||
ClientWidth = 436
|
||||
ParentColor = True
|
||||
TabOrder = 0
|
||||
Left = 8
|
||||
Height = 72
|
||||
Top = 8
|
||||
Width = 438
|
||||
Left = 6
|
||||
Height = 74
|
||||
Top = 6
|
||||
Width = 440
|
||||
object CurrentListBox: TListBox
|
||||
Align = alClient
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
ClickOnSelChange = False
|
||||
TabOrder = 0
|
||||
TopIndex = -1
|
||||
Height = 55
|
||||
Width = 434
|
||||
Left = 6
|
||||
Height = 44
|
||||
Top = 6
|
||||
Width = 424
|
||||
end
|
||||
end
|
||||
object NewGroupBox: TGroupBox
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'NewGroupBox'
|
||||
ClientHeight = 36
|
||||
ClientWidth = 434
|
||||
ClientHeight = 58
|
||||
ClientWidth = 436
|
||||
ParentColor = True
|
||||
TabOrder = 1
|
||||
Left = 8
|
||||
Height = 53
|
||||
Top = 91
|
||||
Width = 438
|
||||
Left = 6
|
||||
Height = 76
|
||||
Top = 86
|
||||
Width = 440
|
||||
object NewEdit: TEdit
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
TabOrder = 0
|
||||
Text = 'NewEdit'
|
||||
Left = 6
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 262
|
||||
Width = 424
|
||||
end
|
||||
object RenameCheckBox: TCheckBox
|
||||
Align = alTop
|
||||
AllowGrayed = True
|
||||
Anchors = [akTop, akRight]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'RenameCheckBox'
|
||||
OnChange = RenameCheckBoxChange
|
||||
TabOrder = 1
|
||||
UseOnChange = True
|
||||
Left = 276
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 151
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 35
|
||||
Width = 424
|
||||
end
|
||||
end
|
||||
object ScopeGroupBox: TGroupBox
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ScopeGroupBox'
|
||||
ClientHeight = 211
|
||||
ClientWidth = 435
|
||||
ClientHeight = 206
|
||||
ClientWidth = 436
|
||||
ParentColor = True
|
||||
TabOrder = 2
|
||||
Left = 8
|
||||
Height = 228
|
||||
Top = 156
|
||||
Width = 439
|
||||
Left = 6
|
||||
Height = 224
|
||||
Top = 168
|
||||
Width = 440
|
||||
object ScopeCommentsCheckBox: TCheckBox
|
||||
Align = alTop
|
||||
AllowGrayed = True
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ScopeCommentsCheckBox'
|
||||
TabOrder = 0
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 181
|
||||
Width = 419
|
||||
Height = 13
|
||||
Top = 184
|
||||
Width = 424
|
||||
end
|
||||
object ScopeRadioGroup: TRadioGroup
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ScopeRadioGroup'
|
||||
Items.Strings = (
|
||||
'in current unit'
|
||||
@ -98,46 +118,53 @@ object FindRenameIdentifierDialog: TFindRenameIdentifierDialog
|
||||
ParentColor = True
|
||||
Left = 6
|
||||
Height = 112
|
||||
Top = 5
|
||||
Width = 419
|
||||
Top = 6
|
||||
Width = 424
|
||||
end
|
||||
object ExtraFilesGroupBox: TGroupBox
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ExtraFilesGroupBox'
|
||||
ClientHeight = 27
|
||||
ClientWidth = 415
|
||||
ClientHeight = 36
|
||||
ClientWidth = 420
|
||||
ParentColor = True
|
||||
TabOrder = 2
|
||||
Left = 6
|
||||
Height = 44
|
||||
Top = 125
|
||||
Width = 419
|
||||
Height = 54
|
||||
Top = 124
|
||||
Width = 424
|
||||
object ExtraFilesEdit: TEdit
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
Align = alTop
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
TabOrder = 0
|
||||
Text = 'ExtraFilesEdit'
|
||||
Left = 6
|
||||
Height = 23
|
||||
Width = 406
|
||||
Top = 6
|
||||
Width = 408
|
||||
end
|
||||
end
|
||||
end
|
||||
object FindOrRenameButton: TButton
|
||||
Anchors = [akTop, akRight]
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = 'FindOrRenameButton'
|
||||
OnClick = FindOrRenameButtonClick
|
||||
TabOrder = 3
|
||||
Left = 90
|
||||
Left = 120
|
||||
Height = 25
|
||||
Top = 400
|
||||
Width = 233
|
||||
end
|
||||
object CancelButton: TButton
|
||||
Anchors = [akTop, akRight]
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = 'CancelButton'
|
||||
ModalResult = 2
|
||||
TabOrder = 4
|
||||
Left = 338
|
||||
Left = 357
|
||||
Height = 25
|
||||
Top = 400
|
||||
Width = 89
|
||||
|
||||
@ -1,46 +1,54 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TFindRenameIdentifierDialog','FORMDATA',[
|
||||
'TPF0'#27'TFindRenameIdentifierDialog'#26'FindRenameIdentifierDialog'#7'Capti'
|
||||
+'on'#6#26'FindRenameIdentifierDialog'#12'ClientHeight'#3#179#1#11'ClientWidt'
|
||||
+'h'#3#196#1#7'OnClose'#7#31'FindRenameIdentifierDialogClose'#8'OnCreate'#7' '
|
||||
+'FindRenameIdentifierDialogCreate'#13'PixelsPerInch'#2'p'#8'Position'#7#14'p'
|
||||
+'oScreenCenter'#18'HorzScrollBar.Page'#3#195#1#18'VertScrollBar.Page'#3#178#1
|
||||
+#4'Left'#3'#'#1#6'Height'#3#179#1#3'Top'#3#163#0#5'Width'#3#196#1#0#9'TGroup'
|
||||
+'Box'#15'CurrentGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Ca'
|
||||
+'ption'#6#15'CurrentGroupBox'#12'ClientHeight'#2'7'#11'ClientWidth'#3#178#1
|
||||
+#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#8#6'Height'#2'H'#3'Top'#2#8#5'W'
|
||||
+'idth'#3#182#1#0#8'TListBox'#14'CurrentListBox'#5'Align'#7#8'alClient'#16'Cl'
|
||||
+'ickOnSelChange'#8#8'TabOrder'#2#0#8'TopIndex'#2#255#6'Height'#2'7'#5'Width'
|
||||
+#3#178#1#0#0#0#9'TGroupBox'#11'NewGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'
|
||||
+#7'akRight'#0#7'Caption'#6#11'NewGroupBox'#12'ClientHeight'#2'$'#11'ClientWi'
|
||||
+'dth'#3#178#1#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#2#8#6'Height'#2'5'#3
|
||||
+'Top'#2'['#5'Width'#3#182#1#0#5'TEdit'#7'NewEdit'#7'Anchors'#11#5'akTop'#6'a'
|
||||
+'kLeft'#7'akRight'#0#8'TabOrder'#2#0#4'Text'#6#7'NewEdit'#4'Left'#2#6#6'Heig'
|
||||
+'ht'#2#23#3'Top'#2#6#5'Width'#3#6#1#0#0#9'TCheckBox'#14'RenameCheckBox'#11'A'
|
||||
+'llowGrayed'#9#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#14'RenameChe'
|
||||
+'ckBox'#8'OnChange'#7#20'RenameCheckBoxChange'#8'TabOrder'#2#1#11'UseOnChang'
|
||||
+'e'#9#4'Left'#3#20#1#6'Height'#2#23#3'Top'#2#6#5'Width'#3#151#0#0#0#0#9'TGro'
|
||||
+'upBox'#13'ScopeGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Ca'
|
||||
+'ption'#6#13'ScopeGroupBox'#12'ClientHeight'#3#211#0#11'ClientWidth'#3#179#1
|
||||
+#11'ParentColor'#9#8'TabOrder'#2#2#4'Left'#2#8#6'Height'#3#228#0#3'Top'#3#156
|
||||
+#0#5'Width'#3#183#1#0#9'TCheckBox'#21'ScopeCommentsCheckBox'#11'AllowGrayed'
|
||||
+#9#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#21'ScopeCommen'
|
||||
+'tsCheckBox'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2#24#3'Top'#3#181#0#5'Wid'
|
||||
+'th'#3#163#1#0#0#11'TRadioGroup'#15'ScopeRadioGroup'#7'Anchors'#11#5'akTop'#6
|
||||
+'akLeft'#7'akRight'#0#7'Caption'#6#15'ScopeRadioGroup'#13'Items.Strings'#1#6
|
||||
+#15'in current unit'#6#15'in main project'#6#30'in project/package owning fi'
|
||||
+'le'#6'!in all open projects and packages'#0#11'ParentColor'#9#4'Left'#2#6#6
|
||||
+'Height'#2'p'#3'Top'#2#5#5'Width'#3#163#1#0#0#9'TGroupBox'#18'ExtraFilesGrou'
|
||||
+'pBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#18'ExtraFi'
|
||||
+'lesGroupBox'#12'ClientHeight'#2#27#11'ClientWidth'#3#159#1#11'ParentColor'#9
|
||||
+#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2','#3'Top'#2'}'#5'Width'#3#163#1#0#5
|
||||
+'TEdit'#14'ExtraFilesEdit'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'T'
|
||||
+'abOrder'#2#0#4'Text'#6#14'ExtraFilesEdit'#4'Left'#2#6#6'Height'#2#23#5'Widt'
|
||||
+'h'#3#150#1#0#0#0#0#7'TButton'#18'FindOrRenameButton'#7'Anchors'#11#5'akTop'
|
||||
+#7'akRight'#0#7'Caption'#6#18'FindOrRenameButton'#7'OnClick'#7#23'FindOrRena'
|
||||
+'meButtonClick'#8'TabOrder'#2#3#4'Left'#2'Z'#6'Height'#2#25#3'Top'#3#144#1#5
|
||||
+'Width'#3#233#0#0#0#7'TButton'#12'CancelButton'#7'Anchors'#11#5'akTop'#7'akR'
|
||||
+'ight'#0#7'Caption'#6#12'CancelButton'#11'ModalResult'#2#2#8'TabOrder'#2#4#4
|
||||
+'Left'#3'R'#1#6'Height'#2#25#3'Top'#3#144#1#5'Width'#2'Y'#0#0#0
|
||||
'TPF0'#27'TFindRenameIdentifierDialog'#26'FindRenameIdentifierDialog'#11'Bord'
|
||||
+'erStyle'#7#13'bsSizeToolWin'#7'Caption'#6#26'FindRenameIdentifierDialog'#12
|
||||
+'ClientHeight'#3#179#1#11'ClientWidth'#3#196#1#7'OnClose'#7#31'FindRenameIde'
|
||||
+'ntifierDialogClose'#8'OnCreate'#7' FindRenameIdentifierDialogCreate'#13'Pix'
|
||||
+'elsPerInch'#2'`'#8'Position'#7#14'poScreenCenter'#18'HorzScrollBar.Page'#3
|
||||
+#195#1#18'VertScrollBar.Page'#3#178#1#4'Left'#3'#'#1#6'Height'#3#179#1#3'Top'
|
||||
+#3#163#0#5'Width'#3#196#1#0#9'TGroupBox'#15'CurrentGroupBox'#5'Align'#7#5'al'
|
||||
+'Top'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#22'BorderSpa'
|
||||
+'cing.OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6#15'CurrentGroup'
|
||||
+'Box'#12'ClientHeight'#2'8'#11'ClientWidth'#3#180#1#11'ParentColor'#9#8'TabO'
|
||||
+'rder'#2#0#4'Left'#2#6#6'Height'#2'J'#3'Top'#2#6#5'Width'#3#184#1#0#8'TListB'
|
||||
+'ox'#14'CurrentListBox'#5'Align'#7#8'alClient'#22'BorderSpacing.OnChange'#13
|
||||
+#20'BorderSpacing.Around'#2#6#16'ClickOnSelChange'#8#8'TabOrder'#2#0#4'Left'
|
||||
+#2#6#6'Height'#2','#3'Top'#2#6#5'Width'#3#168#1#0#0#0#9'TGroupBox'#11'NewGro'
|
||||
+'upBox'#5'Align'#7#5'alTop'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.A'
|
||||
+'round'#2#6#7'Caption'#6#11'NewGroupBox'#12'ClientHeight'#2':'#11'ClientWidt'
|
||||
+'h'#3#180#1#11'ParentColor'#9#8'TabOrder'#2#1#4'Left'#2#6#6'Height'#2'L'#3'T'
|
||||
+'op'#2'V'#5'Width'#3#184#1#0#5'TEdit'#7'NewEdit'#5'Align'#7#5'alTop'#22'Bord'
|
||||
+'erSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#0#4'Text'
|
||||
+#6#7'NewEdit'#4'Left'#2#6#6'Height'#2#23#3'Top'#2#6#5'Width'#3#168#1#0#0#9'T'
|
||||
+'CheckBox'#14'RenameCheckBox'#5'Align'#7#5'alTop'#11'AllowGrayed'#9#7'Anchor'
|
||||
+'s'#11#5'akTop'#7'akRight'#0#22'BorderSpacing.OnChange'#13#20'BorderSpacing.'
|
||||
+'Around'#2#6#7'Caption'#6#14'RenameCheckBox'#8'OnChange'#7#20'RenameCheckBox'
|
||||
+'Change'#8'TabOrder'#2#1#11'UseOnChange'#9#4'Left'#2#6#6'Height'#2#13#3'Top'
|
||||
+#2'#'#5'Width'#3#168#1#0#0#0#9'TGroupBox'#13'ScopeGroupBox'#5'Align'#7#5'alT'
|
||||
+'op'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6
|
||||
+#13'ScopeGroupBox'#12'ClientHeight'#3#206#0#11'ClientWidth'#3#180#1#11'Paren'
|
||||
+'tColor'#9#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#3#224#0#3'Top'#3#168#0#5'Wi'
|
||||
+'dth'#3#184#1#0#9'TCheckBox'#21'ScopeCommentsCheckBox'#5'Align'#7#5'alTop'#11
|
||||
+'AllowGrayed'#9#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6#7
|
||||
+'Caption'#6#21'ScopeCommentsCheckBox'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#2
|
||||
+#13#3'Top'#3#184#0#5'Width'#3#168#1#0#0#11'TRadioGroup'#15'ScopeRadioGroup'#5
|
||||
+'Align'#7#5'alTop'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6
|
||||
+#7'Caption'#6#15'ScopeRadioGroup'#13'Items.Strings'#1#6#15'in current unit'#6
|
||||
+#15'in main project'#6#30'in project/package owning file'#6'!in all open pro'
|
||||
+'jects and packages'#0#11'ParentColor'#9#4'Left'#2#6#6'Height'#2'p'#3'Top'#2
|
||||
+#6#5'Width'#3#168#1#0#0#9'TGroupBox'#18'ExtraFilesGroupBox'#5'Align'#7#5'alT'
|
||||
+'op'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6
|
||||
+#18'ExtraFilesGroupBox'#12'ClientHeight'#2'$'#11'ClientWidth'#3#164#1#11'Par'
|
||||
+'entColor'#9#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2'6'#3'Top'#2'|'#5'Width'
|
||||
+#3#168#1#0#5'TEdit'#14'ExtraFilesEdit'#5'Align'#7#5'alTop'#22'BorderSpacing.'
|
||||
+'OnChange'#13#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#0#4'Text'#6#14'Extr'
|
||||
+'aFilesEdit'#4'Left'#2#6#6'Height'#2#23#3'Top'#2#6#5'Width'#3#152#1#0#0#0#0#7
|
||||
+'TButton'#18'FindOrRenameButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#22'B'
|
||||
+'orderSpacing.OnChange'#13#7'Caption'#6#18'FindOrRenameButton'#7'OnClick'#7
|
||||
+#23'FindOrRenameButtonClick'#8'TabOrder'#2#3#4'Left'#2'x'#6'Height'#2#25#3'T'
|
||||
+'op'#3#144#1#5'Width'#3#233#0#0#0#7'TButton'#12'CancelButton'#7'Anchors'#11#7
|
||||
+'akRight'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#12'Cancel'
|
||||
+'Button'#11'ModalResult'#2#2#8'TabOrder'#2#4#4'Left'#3'e'#1#6'Height'#2#25#3
|
||||
+'Top'#3#144#1#5'Width'#2'Y'#0#0#0
|
||||
]);
|
||||
|
||||
@ -1,107 +1,117 @@
|
||||
object InstallPkgSetDialog: TInstallPkgSetDialog
|
||||
BorderStyle = bsSizeToolWin
|
||||
Caption = 'InstallPkgSetDialog'
|
||||
ClientHeight = 371
|
||||
ClientHeight = 373
|
||||
ClientWidth = 529
|
||||
OnCreate = InstallPkgSetDialogCreate
|
||||
OnDestroy = InstallPkgSetDialogDestroy
|
||||
OnResize = InstallPkgSetDialogResize
|
||||
PixelsPerInch = 96
|
||||
HorzScrollBar.Page = 528
|
||||
VertScrollBar.Page = 370
|
||||
VertScrollBar.Page = 372
|
||||
Left = 319
|
||||
Height = 371
|
||||
Height = 373
|
||||
Top = 178
|
||||
Width = 529
|
||||
object InstallPkgGroupBox: TGroupBox
|
||||
Anchors = [akTop, akLeft, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'InstallPkgGroupBox'
|
||||
ClientHeight = 285
|
||||
ClientWidth = 236
|
||||
ClientHeight = 307
|
||||
ClientWidth = 251
|
||||
ParentColor = True
|
||||
TabOrder = 0
|
||||
Left = 16
|
||||
Height = 303
|
||||
Top = 16
|
||||
Width = 240
|
||||
Left = 6
|
||||
Height = 325
|
||||
Top = 6
|
||||
Width = 255
|
||||
object InstallListBox: TListBox
|
||||
Align = alTop
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Align = alClient
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
ClickOnSelChange = False
|
||||
MultiSelect = True
|
||||
OnSelectionChange = InstallListBoxSelectionChange
|
||||
TabOrder = 0
|
||||
Height = 184
|
||||
Width = 236
|
||||
Left = 6
|
||||
Height = 202
|
||||
Top = 6
|
||||
Width = 239
|
||||
end
|
||||
object UninstallButton: TButton
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
Align = alBottom
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'UninstallButton'
|
||||
OnClick = UninstallButtonClick
|
||||
TabOrder = 1
|
||||
Left = 6
|
||||
Height = 25
|
||||
Top = 192
|
||||
Width = 224
|
||||
Top = 214
|
||||
Width = 239
|
||||
end
|
||||
object ImportButton: TButton
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
Align = alBottom
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ImportButton'
|
||||
OnClick = ImportButtonClick
|
||||
TabOrder = 2
|
||||
Left = 6
|
||||
Height = 25
|
||||
Top = 224
|
||||
Width = 224
|
||||
Top = 245
|
||||
Width = 239
|
||||
end
|
||||
object ExportButton: TButton
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
Align = alBottom
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ExportButton'
|
||||
OnClick = ExportButtonClick
|
||||
TabOrder = 3
|
||||
Left = 6
|
||||
Height = 25
|
||||
Top = 256
|
||||
Width = 224
|
||||
Top = 276
|
||||
Width = 239
|
||||
end
|
||||
end
|
||||
object AvailablePkgGroupBox: TGroupBox
|
||||
Anchors = [akTop, akLeft, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'AvailablePkgGroupBox'
|
||||
ClientHeight = 285
|
||||
ClientWidth = 236
|
||||
ClientHeight = 307
|
||||
ClientWidth = 251
|
||||
ParentColor = True
|
||||
TabOrder = 1
|
||||
Left = 272
|
||||
Height = 303
|
||||
Top = 16
|
||||
Width = 240
|
||||
Left = 267
|
||||
Height = 325
|
||||
Top = 6
|
||||
Width = 255
|
||||
object AvailableListBox: TListBox
|
||||
Align = alTop
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Align = alClient
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
ClickOnSelChange = False
|
||||
MultiSelect = True
|
||||
OnSelectionChange = AvailableListBoxSelectionChange
|
||||
TabOrder = 0
|
||||
Height = 249
|
||||
Width = 236
|
||||
Left = 6
|
||||
Height = 264
|
||||
Top = 6
|
||||
Width = 239
|
||||
end
|
||||
object AddToInstallButton: TButton
|
||||
Anchors = [akLeft, akRight, akBottom]
|
||||
Align = alBottom
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'AddToInstallButton'
|
||||
OnClick = AddToInstallButtonClick
|
||||
TabOrder = 1
|
||||
Left = 6
|
||||
Height = 25
|
||||
Top = 256
|
||||
Width = 224
|
||||
Top = 276
|
||||
Width = 239
|
||||
end
|
||||
end
|
||||
object CancelButton: TButton
|
||||
@ -112,33 +122,33 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
|
||||
Caption = 'CancelButton'
|
||||
ModalResult = 2
|
||||
TabOrder = 2
|
||||
Left = 16
|
||||
Height = 22
|
||||
Top = 336
|
||||
Width = 81
|
||||
Left = 6
|
||||
Height = 25
|
||||
Top = 338
|
||||
Width = 84
|
||||
end
|
||||
object SaveAndRebuildButton: TButton
|
||||
Anchors = [akLeft, akBottom]
|
||||
Anchors = [akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = 'SaveAndRebuildButton'
|
||||
OnClick = InstallButtonClick
|
||||
TabOrder = 3
|
||||
Left = 183
|
||||
Height = 22
|
||||
Top = 336
|
||||
Width = 73
|
||||
Left = 199
|
||||
Height = 25
|
||||
Top = 338
|
||||
Width = 130
|
||||
end
|
||||
object SaveAndExitButton: TButton
|
||||
Anchors = [akLeft, akBottom]
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = 'SaveAndExitButton'
|
||||
OnClick = SaveAndExitButtonClick
|
||||
TabOrder = 4
|
||||
Left = 328
|
||||
Height = 22
|
||||
Top = 336
|
||||
Left = 409
|
||||
Height = 25
|
||||
Top = 338
|
||||
Width = 113
|
||||
end
|
||||
end
|
||||
|
||||
@ -1,50 +1,50 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TInstallPkgSetDialog','FORMDATA',[
|
||||
'TPF0'#20'TInstallPkgSetDialog'#19'InstallPkgSetDialog'#7'Caption'#6#19'Insta'
|
||||
+'llPkgSetDialog'#12'ClientHeight'#3's'#1#11'ClientWidth'#3#17#2#8'OnCreate'#7
|
||||
+#25'InstallPkgSetDialogCreate'#9'OnDestroy'#7#26'InstallPkgSetDialogDestroy'
|
||||
+#8'OnResize'#7#25'InstallPkgSetDialogResize'#13'PixelsPerInch'#2'`'#18'HorzS'
|
||||
+'crollBar.Page'#3#16#2#18'VertScrollBar.Page'#3'r'#1#4'Left'#3'?'#1#6'Height'
|
||||
+#3's'#1#3'Top'#3#178#0#5'Width'#3#17#2#0#9'TGroupBox'#18'InstallPkgGroupBox'
|
||||
+#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#22'BorderSpacing.OnChange'#13
|
||||
+#7'Caption'#6#18'InstallPkgGroupBox'#12'ClientHeight'#3#29#1#11'ClientWidth'
|
||||
+#3#236#0#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#16#6'Height'#3'/'#1#3'T'
|
||||
+'op'#2#16#5'Width'#3#240#0#0#8'TListBox'#14'InstallListBox'#5'Align'#7#5'alT'
|
||||
+'op'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#22'BorderSpac'
|
||||
+'ing.OnChange'#13#16'ClickOnSelChange'#8#11'MultiSelect'#9#17'OnSelectionCha'
|
||||
+'nge'#7#29'InstallListBoxSelectionChange'#8'TabOrder'#2#0#6'Height'#3#184#0#5
|
||||
+'Width'#3#236#0#0#0#7'TButton'#15'UninstallButton'#7'Anchors'#11#6'akLeft'#7
|
||||
+'akRight'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#15'Uninst'
|
||||
+'allButton'#7'OnClick'#7#20'UninstallButtonClick'#8'TabOrder'#2#1#4'Left'#2#6
|
||||
+#6'Height'#2#25#3'Top'#3#192#0#5'Width'#3#224#0#0#0#7'TButton'#12'ImportButt'
|
||||
+'on'#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnCha'
|
||||
+'nge'#13#7'Caption'#6#12'ImportButton'#7'OnClick'#7#17'ImportButtonClick'#8
|
||||
+'TabOrder'#2#2#4'Left'#2#6#6'Height'#2#25#3'Top'#3#224#0#5'Width'#3#224#0#0#0
|
||||
+#7'TButton'#12'ExportButton'#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0
|
||||
+#22'BorderSpacing.OnChange'#13#7'Caption'#6#12'ExportButton'#7'OnClick'#7#17
|
||||
+'ExportButtonClick'#8'TabOrder'#2#3#4'Left'#2#6#6'Height'#2#25#3'Top'#3#0#1#5
|
||||
+'Width'#3#224#0#0#0#0#9'TGroupBox'#20'AvailablePkgGroupBox'#7'Anchors'#11#5
|
||||
+'akTop'#6'akLeft'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#20
|
||||
+'AvailablePkgGroupBox'#12'ClientHeight'#3#29#1#11'ClientWidth'#3#236#0#11'Pa'
|
||||
+'rentColor'#9#8'TabOrder'#2#1#4'Left'#3#16#1#6'Height'#3'/'#1#3'Top'#2#16#5
|
||||
+'Width'#3#240#0#0#8'TListBox'#16'AvailableListBox'#5'Align'#7#5'alTop'#7'Anc'
|
||||
+'hors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnCha'
|
||||
+'nge'#13#16'ClickOnSelChange'#8#11'MultiSelect'#9#17'OnSelectionChange'#7#31
|
||||
+'AvailableListBoxSelectionChange'#8'TabOrder'#2#0#6'Height'#3#249#0#5'Width'
|
||||
+#3#236#0#0#0#7'TButton'#18'AddToInstallButton'#7'Anchors'#11#6'akLeft'#7'akR'
|
||||
+'ight'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#18'AddToInst'
|
||||
+'allButton'#7'OnClick'#7#23'AddToInstallButtonClick'#8'TabOrder'#2#1#4'Left'
|
||||
+#2#6#6'Height'#2#25#3'Top'#3#0#1#5'Width'#3#224#0#0#0#0#7'TButton'#12'Cancel'
|
||||
+'Button'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#8'AutoSize'#9#22'BorderSpacin'
|
||||
+'g.OnChange'#13#6'Cancel'#9#7'Caption'#6#12'CancelButton'#11'ModalResult'#2#2
|
||||
+#8'TabOrder'#2#2#4'Left'#2#16#6'Height'#2#22#3'Top'#3'P'#1#5'Width'#2'Q'#0#0
|
||||
+#7'TButton'#20'SaveAndRebuildButton'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#8
|
||||
+'AutoSize'#9#22'BorderSpacing.OnChange'#13#7'Caption'#6#20'SaveAndRebuildBut'
|
||||
+'ton'#7'OnClick'#7#18'InstallButtonClick'#8'TabOrder'#2#3#4'Left'#3#183#0#6
|
||||
+'Height'#2#22#3'Top'#3'P'#1#5'Width'#2'I'#0#0#7'TButton'#17'SaveAndExitButto'
|
||||
+'n'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#8'AutoSize'#9#22'BorderSpacing.OnC'
|
||||
+'hange'#13#7'Caption'#6#17'SaveAndExitButton'#7'OnClick'#7#22'SaveAndExitBut'
|
||||
+'tonClick'#8'TabOrder'#2#4#4'Left'#3'H'#1#6'Height'#2#22#3'Top'#3'P'#1#5'Wid'
|
||||
+'th'#2'q'#0#0#0
|
||||
'TPF0'#20'TInstallPkgSetDialog'#19'InstallPkgSetDialog'#11'BorderStyle'#7#13
|
||||
+'bsSizeToolWin'#7'Caption'#6#19'InstallPkgSetDialog'#12'ClientHeight'#3'u'#1
|
||||
+#11'ClientWidth'#3#17#2#8'OnCreate'#7#25'InstallPkgSetDialogCreate'#9'OnDest'
|
||||
+'roy'#7#26'InstallPkgSetDialogDestroy'#8'OnResize'#7#25'InstallPkgSetDialogR'
|
||||
+'esize'#13'PixelsPerInch'#2'`'#18'HorzScrollBar.Page'#3#16#2#18'VertScrollBa'
|
||||
+'r.Page'#3't'#1#4'Left'#3'?'#1#6'Height'#3'u'#1#3'Top'#3#178#0#5'Width'#3#17
|
||||
+#2#0#9'TGroupBox'#18'InstallPkgGroupBox'#22'BorderSpacing.OnChange'#13#20'Bo'
|
||||
+'rderSpacing.Around'#2#6#7'Caption'#6#18'InstallPkgGroupBox'#12'ClientHeight'
|
||||
+#3'3'#1#11'ClientWidth'#3#251#0#11'ParentColor'#9#8'TabOrder'#2#0#4'Left'#2#6
|
||||
+#6'Height'#3'E'#1#3'Top'#2#6#5'Width'#3#255#0#0#8'TListBox'#14'InstallListBo'
|
||||
+'x'#5'Align'#7#8'alClient'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Ar'
|
||||
+'ound'#2#6#16'ClickOnSelChange'#8#11'MultiSelect'#9#17'OnSelectionChange'#7
|
||||
+#29'InstallListBoxSelectionChange'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#3
|
||||
+#202#0#3'Top'#2#6#5'Width'#3#239#0#0#0#7'TButton'#15'UninstallButton'#5'Alig'
|
||||
+'n'#7#8'alBottom'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6
|
||||
+#7'Caption'#6#15'UninstallButton'#7'OnClick'#7#20'UninstallButtonClick'#8'Ta'
|
||||
+'bOrder'#2#1#4'Left'#2#6#6'Height'#2#25#3'Top'#3#214#0#5'Width'#3#239#0#0#0#7
|
||||
+'TButton'#12'ImportButton'#5'Align'#7#8'alBottom'#22'BorderSpacing.OnChange'
|
||||
+#13#20'BorderSpacing.Around'#2#6#7'Caption'#6#12'ImportButton'#7'OnClick'#7
|
||||
+#17'ImportButtonClick'#8'TabOrder'#2#2#4'Left'#2#6#6'Height'#2#25#3'Top'#3
|
||||
+#245#0#5'Width'#3#239#0#0#0#7'TButton'#12'ExportButton'#5'Align'#7#8'alBotto'
|
||||
+'m'#22'BorderSpacing.OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6
|
||||
+#12'ExportButton'#7'OnClick'#7#17'ExportButtonClick'#8'TabOrder'#2#3#4'Left'
|
||||
+#2#6#6'Height'#2#25#3'Top'#3#20#1#5'Width'#3#239#0#0#0#0#9'TGroupBox'#20'Ava'
|
||||
+'ilablePkgGroupBox'#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#22'Border'
|
||||
+'Spacing.OnChange'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6#20'Available'
|
||||
+'PkgGroupBox'#12'ClientHeight'#3'3'#1#11'ClientWidth'#3#251#0#11'ParentColor'
|
||||
+#9#8'TabOrder'#2#1#4'Left'#3#11#1#6'Height'#3'E'#1#3'Top'#2#6#5'Width'#3#255
|
||||
+#0#0#8'TListBox'#16'AvailableListBox'#5'Align'#7#8'alClient'#22'BorderSpacin'
|
||||
+'g.OnChange'#13#20'BorderSpacing.Around'#2#6#16'ClickOnSelChange'#8#11'Multi'
|
||||
+'Select'#9#17'OnSelectionChange'#7#31'AvailableListBoxSelectionChange'#8'Tab'
|
||||
+'Order'#2#0#4'Left'#2#6#6'Height'#3#8#1#3'Top'#2#6#5'Width'#3#239#0#0#0#7'TB'
|
||||
+'utton'#18'AddToInstallButton'#5'Align'#7#8'alBottom'#22'BorderSpacing.OnCha'
|
||||
+'nge'#13#20'BorderSpacing.Around'#2#6#7'Caption'#6#18'AddToInstallButton'#7
|
||||
+'OnClick'#7#23'AddToInstallButtonClick'#8'TabOrder'#2#1#4'Left'#2#6#6'Height'
|
||||
+#2#25#3'Top'#3#20#1#5'Width'#3#239#0#0#0#0#7'TButton'#12'CancelButton'#7'Anc'
|
||||
+'hors'#11#6'akLeft'#8'akBottom'#0#8'AutoSize'#9#22'BorderSpacing.OnChange'#13
|
||||
+#6'Cancel'#9#7'Caption'#6#12'CancelButton'#11'ModalResult'#2#2#8'TabOrder'#2
|
||||
+#2#4'Left'#2#6#6'Height'#2#25#3'Top'#3'R'#1#5'Width'#2'T'#0#0#7'TButton'#20
|
||||
+'SaveAndRebuildButton'#7'Anchors'#11#8'akBottom'#0#8'AutoSize'#9#22'BorderSp'
|
||||
+'acing.OnChange'#13#7'Caption'#6#20'SaveAndRebuildButton'#7'OnClick'#7#18'In'
|
||||
+'stallButtonClick'#8'TabOrder'#2#3#4'Left'#3#199#0#6'Height'#2#25#3'Top'#3'R'
|
||||
+#1#5'Width'#3#130#0#0#0#7'TButton'#17'SaveAndExitButton'#7'Anchors'#11#7'akR'
|
||||
+'ight'#8'akBottom'#0#8'AutoSize'#9#22'BorderSpacing.OnChange'#13#7'Caption'#6
|
||||
+#17'SaveAndExitButton'#7'OnClick'#7#22'SaveAndExitButtonClick'#8'TabOrder'#2
|
||||
+#4#4'Left'#3#153#1#6'Height'#2#25#3'Top'#3'R'#1#5'Width'#2'q'#0#0#0
|
||||
]);
|
||||
|
||||
@ -292,15 +292,15 @@ end;
|
||||
|
||||
procedure TInstallPkgSetDialog.InstallPkgSetDialogResize(Sender: TObject);
|
||||
var
|
||||
x: Integer;
|
||||
w: Integer;
|
||||
x: Integer;
|
||||
begin
|
||||
x:=10;
|
||||
w:=(ClientWidth-3*x) div 2;
|
||||
with InstallPkgGroupBox do
|
||||
SetBounds(x,Top,w,Height);
|
||||
with AvailablePkgGroupBox do
|
||||
SetBounds(x+w+x,Top,w,Height);
|
||||
x := 6;
|
||||
w := (ClientWidth - 3 * x) div 2;
|
||||
InstallPkgGroupBox.SetBounds(x, x, w, Height - 48);
|
||||
AvailablePkgGroupBox.SetBounds(2 * x + w, x, w, Height - 48);
|
||||
|
||||
SaveAndRebuildButton.Left := (Width - SaveAndRebuildButton.Width) div 2 ;
|
||||
end;
|
||||
|
||||
procedure TInstallPkgSetDialog.SaveAndExitButtonClick(Sender: TObject);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user