mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Autosize controls in mask input form.

Browse source
This commit is contained in:
cobines 2011-03-21 05:06:04 +00:00
commit dc4ef04f08
1 changed files with 30 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

58
src/fmaskinputdlg.lfm
View file

@ -19,11 +19,10 @@ object frmMaskInputDlg: TfrmMaskInputDlg
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10
Height = 28
Height = 1
Top = 10
Width = 319
Anchors = [akTop, akLeft, akRight]
AutoSize = False
BorderSpacing.Left = 10
BorderSpacing.Right = 10
ParentColor = False
@ -33,14 +32,10 @@ object frmMaskInputDlg: TfrmMaskInputDlg
AnchorSideLeft.Control = cmbMask
AnchorSideTop.Control = cmbMask
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = cmbMask
AnchorSideRight.Side = asrBottom
Left = 10
Height = 16
Top = 71
Width = 319
Anchors = [akTop, akLeft, akRight]
AutoSize = False
Height = 22
Top = 52
Width = 238
BorderSpacing.Top = 6
Caption = 'Or select predefined selection type:'
ParentColor = False
@ -53,29 +48,32 @@ object frmMaskInputDlg: TfrmMaskInputDlg
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10
Height = 21
Top = 44
Height = 29
Top = 17
Width = 319
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 10
BorderSpacing.Top = 6
BorderSpacing.Right = 10
DropDownCount = 10
ItemHeight = 13
ItemHeight = 21
TabOrder = 0
end
object btnOK: TBitBtn
AnchorSideTop.Control = lbxSearchTemplate
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = btnCancel
Left = 143
Height = 32
Top = 192
Width = 90
Left = 123
Height = 35
Top = 179
Width = 100
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.InnerBorder = 2
Caption = '&OK'
Constraints.MinWidth = 100
Default = True
Kind = bkOK
ModalResult = 1
@ -86,15 +84,18 @@ object frmMaskInputDlg: TfrmMaskInputDlg
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 239
Height = 32
Top = 192
Width = 90
Left = 229
Height = 35
Top = 179
Width = 100
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Top = 6
BorderSpacing.Right = 10
BorderSpacing.InnerBorder = 2
Cancel = True
Caption = 'Cancel'
Constraints.MinWidth = 100
Kind = bkCancel
ModalResult = 2
TabOrder = 2
@ -107,7 +108,7 @@ object frmMaskInputDlg: TfrmMaskInputDlg
AnchorSideRight.Side = asrBottom
Left = 10
Height = 93
Top = 93
Top = 80
Width = 319
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 10
@ -122,15 +123,16 @@ object frmMaskInputDlg: TfrmMaskInputDlg
object btnDefineTemplate: TBitBtn
AnchorSideTop.Control = btnOK
AnchorSideRight.Control = btnOK
AnchorSideBottom.Control = btnOK
AnchorSideBottom.Side = asrBottom
Left = 47
Height = 32
Top = 194
Width = 90
Anchors = [akTop, akRight, akBottom]
Left = 17
Height = 35
Top = 179
Width = 100
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Right = 6
BorderSpacing.InnerBorder = 2
Caption = 'Define...'
Constraints.MinWidth = 100
OnClick = btnDefineTemplateClick
TabOrder = 4
end