improved layout of ide help options dlg

git-svn-id: trunk@9096 -
This commit is contained in:
mattias 2006-04-09 20:08:59 +00:00
parent b88178d606
commit 07be3924e1
3 changed files with 152 additions and 89 deletions

View File

@ -1,118 +1,162 @@
object HelpOptionsDialog: THelpOptionsDialog
ActiveControl = ViewersListBox
BorderIcons = [biSystemMenu]
Caption = 'HelpOptionsDialog'
ClientHeight = 300
ClientWidth = 500
OnClose = HelpOptionsDialogClose
OnCreate = HelpOptionsDialogCreate
PixelsPerInch = 90
PixelsPerInch = 96
Position = poScreenCenter
HorzScrollBar.Page = 499
VertScrollBar.Page = 299
Left = 291
AnchorSideBottom.Side = asrBottom
Left = 312
Height = 300
Top = 163
Top = 358
Width = 500
object OkButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.InnerBorder = 2
Caption = 'OkButton'
OnClick = OkButtonClick
TabOrder = 0
Left = 292
Height = 25
Top = 264
Width = 75
end
object CancelButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.InnerBorder = 2
Caption = 'CancelButton'
OnClick = CancelButtonClick
TabOrder = 1
Left = 388
Height = 25
Top = 264
Width = 75
end
object MainNotebook: TNotebook
Align = alTop
Anchors = [akTop, akLeft, akBottom]
PageIndex = 1
Height = 256
Width = 500
BorderSpacing.Around = 6
PageIndex = 0
AnchorSideBottom.Control = OkButton
Left = 6
Height = 248
Top = 6
Width = 488
object ViewersPage: TPage
Caption = 'ViewersPage'
ClientWidth = 492
ClientHeight = 230
Height = 230
Width = 492
ClientWidth = 480
ClientHeight = 222
Height = 222
Width = 480
object ViewersLabel: TLabel
Caption = 'ViewersLabel'
Color = clNone
ParentColor = False
AnchorSideTop.Control = ViewerPropsGroupBox
Left = 6
Height = 14
Top = 10
Top = 6
Width = 63
end
object ViewersListBox: TListBox
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
ClickOnSelChange = False
OnSelectionChange = ViewersListBoxSelectionChange
TabOrder = 0
AnchorSideLeft.Control = ViewersPage
AnchorSideTop.Control = ViewersLabel
AnchorSideTop.Side = asrBottom
Left = 6
Height = 190
Top = 36
Height = 192
Top = 26
Width = 152
end
object ViewerPropsGroupBox: TGroupBox
Align = alRight
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Caption = 'ViewerPropsGroupBox'
ClientHeight = 198
ClientWidth = 315
ClientHeight = 192
ClientWidth = 306
TabOrder = 1
Left = 166
Height = 216
Top = 10
Width = 319
AnchorSideLeft.Control = ViewersListBox
AnchorSideLeft.Side = asrBottom
Left = 164
Height = 210
Top = 6
Width = 310
end
end
object DataBasePage: TPage
Caption = 'DataBasePage'
ClientWidth = 492
ClientHeight = 230
Height = 230
Width = 492
ClientWidth = 480
ClientHeight = 222
Height = 222
Width = 480
object DatabasesLabel: TLabel
Caption = 'DatabasesLabel'
Color = clNone
ParentColor = False
AnchorSideTop.Control = DataBasesPropsGroupBox
Left = 6
Height = 14
Top = 10
Top = 6
Width = 77
end
object DatabasesListBox: TListBox
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
ClickOnSelChange = False
OnSelectionChange = DatabasesListBoxSelectionChange
TabOrder = 0
AnchorSideLeft.Control = DataBasePage
AnchorSideTop.Control = DatabasesLabel
AnchorSideTop.Side = asrBottom
Left = 6
Height = 190
Top = 36
Top = 26
Width = 152
end
object DataBasesPropsGroupBox: TGroupBox
Align = alRight
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Caption = 'DataBasesPropsGroupBox'
ClientHeight = 198
ClientWidth = 315
ClientHeight = 192
ClientWidth = 306
TabOrder = 1
Left = 166
Height = 216
Top = 10
Width = 319
AnchorSideLeft.Control = DatabasesListBox
AnchorSideLeft.Side = asrBottom
Left = 164
Height = 210
Top = 6
Width = 310
end
end
end
object OkButton: TBitBtn
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 2
Caption = '&OK'
Default = True
Kind = bkOK
ModalResult = 1
NumGlyphs = 0
TabOrder = 1
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 432
Height = 34
Top = 260
Width = 62
end
object CancelButton: TBitBtn
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 6
BorderSpacing.InnerBorder = 2
Cancel = True
Caption = 'Cancel'
Kind = bkCancel
ModalResult = 2
NumGlyphs = 0
TabOrder = 2
AnchorSideRight.Control = OkButton
AnchorSideBottom.Control = OkButton
AnchorSideBottom.Side = asrBottom
Left = 346
Height = 34
Top = 260
Width = 80
end
end

View File

@ -1,39 +1,58 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('THelpOptionsDialog','FORMDATA',[
'TPF0'#18'THelpOptionsDialog'#17'HelpOptionsDialog'#7'Caption'#6#17'HelpOptio'
+'nsDialog'#12'ClientHeight'#3','#1#11'ClientWidth'#3#244#1#7'OnClose'#7#22'H'
+'elpOptionsDialogClose'#8'OnCreate'#7#23'HelpOptionsDialogCreate'#13'PixelsP'
+'erInch'#2'Z'#8'Position'#7#14'poScreenCenter'#18'HorzScrollBar.Page'#3#243#1
+#18'VertScrollBar.Page'#3'+'#1#4'Left'#3'#'#1#6'Height'#3','#1#3'Top'#3#163#0
+#5'Width'#3#244#1#0#7'TButton'#8'OkButton'#7'Anchors'#11#7'akRight'#8'akBott'
+'om'#0#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#8'OkButton'#7'OnClick'
+#7#13'OkButtonClick'#8'TabOrder'#2#0#4'Left'#3'$'#1#6'Height'#2#25#3'Top'#3#8
+#1#5'Width'#2'K'#0#0#7'TButton'#12'CancelButton'#7'Anchors'#11#7'akRight'#8
+'akBottom'#0#25'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#12'CancelButton'
+#7'OnClick'#7#17'CancelButtonClick'#8'TabOrder'#2#1#4'Left'#3#132#1#6'Height'
+#2#25#3'Top'#3#8#1#5'Width'#2'K'#0#0#9'TNotebook'#12'MainNotebook'#5'Align'#7
+#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#9'PageIndex'#2#1#6
+'Height'#3#0#1#5'Width'#3#244#1#0#5'TPage'#11'ViewersPage'#7'Caption'#6#11'V'
+'iewersPage'#11'ClientWidth'#3#236#1#12'ClientHeight'#3#230#0#6'Height'#3#230
+#0#5'Width'#3#236#1#0#6'TLabel'#12'ViewersLabel'#7'Caption'#6#12'ViewersLabe'
+'l'#5'Color'#7#6'clNone'#11'ParentColor'#8#4'Left'#2#6#6'Height'#2#14#3'Top'
+#2#10#5'Width'#2'?'#0#0#8'TListBox'#14'ViewersListBox'#7'Anchors'#11#5'akTop'
+#6'akLeft'#8'akBottom'#0#16'ClickOnSelChange'#8#17'OnSelectionChange'#7#29'V'
+'iewersListBoxSelectionChange'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#3#190#0
+#3'Top'#2'$'#5'Width'#3#152#0#0#0#9'TGroupBox'#19'ViewerPropsGroupBox'#7'Anc'
+'hors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'Caption'#6#19'Viewer'
+'PropsGroupBox'#12'ClientHeight'#3#198#0#11'ClientWidth'#3';'#1#8'TabOrder'#2
+#1#4'Left'#3#166#0#6'Height'#3#216#0#3'Top'#2#10#5'Width'#3'?'#1#0#0#0#5'TPa'
+'ge'#12'DataBasePage'#7'Caption'#6#12'DataBasePage'#11'ClientWidth'#3#236#1
+#12'ClientHeight'#3#230#0#6'Height'#3#230#0#5'Width'#3#236#1#0#6'TLabel'#14
+'DatabasesLabel'#7'Caption'#6#14'DatabasesLabel'#5'Color'#7#6'clNone'#11'Par'
+'entColor'#8#4'Left'#2#6#6'Height'#2#14#3'Top'#2#10#5'Width'#2'M'#0#0#8'TLis'
+'tBox'#16'DatabasesListBox'#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#16
'TPF0'#18'THelpOptionsDialog'#17'HelpOptionsDialog'#13'ActiveControl'#7#14'Vi'
+'ewersListBox'#11'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#17'HelpOpt'
+'ionsDialog'#12'ClientHeight'#3','#1#11'ClientWidth'#3#244#1#7'OnClose'#7#22
+'HelpOptionsDialogClose'#8'OnCreate'#7#23'HelpOptionsDialogCreate'#13'Pixels'
+'PerInch'#2'`'#8'Position'#7#14'poScreenCenter'#18'HorzScrollBar.Page'#3#243
+#1#18'VertScrollBar.Page'#3'+'#1#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
+'Left'#3'8'#1#6'Height'#3','#1#3'Top'#3'f'#1#5'Width'#3#244#1#0#9'TNotebook'
+#12'MainNotebook'#5'Align'#7#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#8'akB'
+'ottom'#0#20'BorderSpacing.Around'#2#6#9'PageIndex'#2#0#24'AnchorSideBottom.'
+'Control'#7#8'OkButton'#4'Left'#2#6#6'Height'#3#248#0#3'Top'#2#6#5'Width'#3
+#232#1#0#5'TPage'#11'ViewersPage'#7'Caption'#6#11'ViewersPage'#11'ClientWidt'
+'h'#3#224#1#12'ClientHeight'#3#222#0#6'Height'#3#222#0#5'Width'#3#224#1#0#6
+'TLabel'#12'ViewersLabel'#7'Caption'#6#12'ViewersLabel'#5'Color'#7#6'clNone'
+#11'ParentColor'#8#21'AnchorSideTop.Control'#7#19'ViewerPropsGroupBox'#4'Lef'
+'t'#2#6#6'Height'#2#14#3'Top'#2#6#5'Width'#2'?'#0#0#8'TListBox'#14'ViewersLi'
+'stBox'#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#18'BorderSpacing.Left'
+#2#6#17'BorderSpacing.Top'#2#6#16'ClickOnSelChange'#8#17'OnSelectionChange'#7
+#29'ViewersListBoxSelectionChange'#8'TabOrder'#2#0#22'AnchorSideLeft.Control'
+#7#11'ViewersPage'#21'AnchorSideTop.Control'#7#12'ViewersLabel'#18'AnchorSid'
+'eTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#192#0#3'Top'#2#26#5'Width'
+#3#152#0#0#0#9'TGroupBox'#19'ViewerPropsGroupBox'#5'Align'#7#7'alRight'#7'An'
+'chors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#20'BorderSpacing.Arou'
+'nd'#2#6#7'Caption'#6#19'ViewerPropsGroupBox'#12'ClientHeight'#3#192#0#11'Cl'
+'ientWidth'#3'2'#1#8'TabOrder'#2#1#22'AnchorSideLeft.Control'#7#14'ViewersLi'
+'stBox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'#3#164#0#6'Height'#3
+#210#0#3'Top'#2#6#5'Width'#3'6'#1#0#0#0#5'TPage'#12'DataBasePage'#7'Caption'
+#6#12'DataBasePage'#11'ClientWidth'#3#224#1#12'ClientHeight'#3#222#0#6'Heigh'
+'t'#3#222#0#5'Width'#3#224#1#0#6'TLabel'#14'DatabasesLabel'#7'Caption'#6#14
+'DatabasesLabel'#5'Color'#7#6'clNone'#11'ParentColor'#8#21'AnchorSideTop.Con'
+'trol'#7#22'DataBasesPropsGroupBox'#4'Left'#2#6#6'Height'#2#14#3'Top'#2#6#5
+'Width'#2'M'#0#0#8'TListBox'#16'DatabasesListBox'#7'Anchors'#11#5'akTop'#6'a'
+'kLeft'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#16
+'ClickOnSelChange'#8#17'OnSelectionChange'#7#31'DatabasesListBoxSelectionCha'
+'nge'#8'TabOrder'#2#0#4'Left'#2#6#6'Height'#3#190#0#3'Top'#2'$'#5'Width'#3
+#152#0#0#0#9'TGroupBox'#22'DataBasesPropsGroupBox'#7'Anchors'#11#5'akTop'#6
+'akLeft'#7'akRight'#8'akBottom'#0#7'Caption'#6#22'DataBasesPropsGroupBox'#12
+'ClientHeight'#3#198#0#11'ClientWidth'#3';'#1#8'TabOrder'#2#1#4'Left'#3#166#0
+#6'Height'#3#216#0#3'Top'#2#10#5'Width'#3'?'#1#0#0#0#0#0
+'nge'#8'TabOrder'#2#0#22'AnchorSideLeft.Control'#7#12'DataBasePage'#21'Ancho'
+'rSideTop.Control'#7#14'DatabasesLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'
+#4'Left'#2#6#6'Height'#3#190#0#3'Top'#2#26#5'Width'#3#152#0#0#0#9'TGroupBox'
+#22'DataBasesPropsGroupBox'#5'Align'#7#7'alRight'#7'Anchors'#11#5'akTop'#6'a'
+'kLeft'#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#22
+'DataBasesPropsGroupBox'#12'ClientHeight'#3#192#0#11'ClientWidth'#3'2'#1#8'T'
+'abOrder'#2#1#22'AnchorSideLeft.Control'#7#16'DatabasesListBox'#19'AnchorSid'
+'eLeft.Side'#7#9'asrBottom'#4'Left'#3#164#0#6'Height'#3#210#0#3'Top'#2#6#5'W'
+'idth'#3'6'#1#0#0#0#0#7'TBitBtn'#8'OkButton'#7'Anchors'#11#7'akRight'#8'akBo'
+'ttom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#25'BorderSpacing.InnerBo'
+'rder'#2#2#7'Caption'#6#3'&OK'#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'
+#2#1#9'NumGlyphs'#2#0#8'TabOrder'#2#1#23'AnchorSideRight.Control'#7#5'Owner'
+#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Ow'
+'ner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#176#1#6'Height'#2'"'
+#3'Top'#3#4#1#5'Width'#2'>'#0#0#7'TBitBtn'#12'CancelButton'#7'Anchors'#11#7
+'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#6#25'BorderS'
+'pacing.InnerBorder'#2#2#6'Cancel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCa'
+'ncel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#2#23'AnchorSideRig'
+'ht.Control'#7#8'OkButton'#24'AnchorSideBottom.Control'#7#8'OkButton'#21'Anc'
+'horSideBottom.Side'#7#9'asrBottom'#4'Left'#3'Z'#1#6'Height'#2'"'#3'Top'#3#4
+#1#5'Width'#2'P'#0#0#0
]);

View File

@ -65,6 +65,8 @@ type
{ THelpOptionsDialog }
THelpOptionsDialog = class(TForm)
OkButton: TBitBtn;
CancelButton: TBitBtn;
DataBasePage: TPage;
DatabasesLabel: TLabel;
DataBasesPropsGroupBox: TGroupBox;
@ -73,8 +75,6 @@ type
ViewersLabel: TLabel;
ViewersListBox: TListBox;
MainNotebook: TNotebook;
OkButton: TButton;
CancelButton: TButton;
ViewersPage: TPage;
procedure CancelButtonClick(Sender: TObject);
procedure DatabasesListBoxSelectionChange(Sender: TObject; User: boolean);