You've already forked lazarus-ccr
2f33dc9f7b
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7345 8e941d3f-bd1b-0410-a28a-d453659cc2b4
241 lines
6.1 KiB
Plaintext
241 lines
6.1 KiB
Plaintext
object OptionsFrm: TOptionsFrm
|
|
Left = 510
|
|
Height = 320
|
|
Top = 266
|
|
Width = 352
|
|
AutoSize = True
|
|
Caption = 'Options'
|
|
ClientHeight = 320
|
|
ClientWidth = 352
|
|
OnActivate = FormActivate
|
|
OnShow = FormShow
|
|
Position = poMainFormCenter
|
|
LCLVersion = '2.1.0.0'
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = JustificationGrp
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 8
|
|
Height = 15
|
|
Top = 218
|
|
Width = 108
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 12
|
|
Caption = 'Default File Location'
|
|
ParentColor = False
|
|
end
|
|
object FractionTypeGrp: TRadioGroup
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 8
|
|
Height = 72
|
|
Top = 8
|
|
Width = 336
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoFill = True
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Right = 8
|
|
Caption = 'Decimal Fraction Usage'
|
|
ChildSizing.LeftRightSpacing = 12
|
|
ChildSizing.TopBottomSpacing = 6
|
|
ChildSizing.VerticalSpacing = 2
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 1
|
|
ClientHeight = 52
|
|
ClientWidth = 332
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'English (default) period separator'
|
|
'European (comma) separator'
|
|
)
|
|
TabOrder = 0
|
|
end
|
|
object MissValsGrp: TRadioGroup
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = FractionTypeGrp
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 8
|
|
Height = 51
|
|
Top = 92
|
|
Width = 336
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoFill = True
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 12
|
|
BorderSpacing.Right = 8
|
|
Caption = 'Default Missing Values'
|
|
ChildSizing.LeftRightSpacing = 12
|
|
ChildSizing.TopBottomSpacing = 6
|
|
ChildSizing.HorizontalSpacing = 12
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 4
|
|
ClientHeight = 31
|
|
ClientWidth = 332
|
|
Columns = 4
|
|
ItemIndex = 3
|
|
Items.Strings = (
|
|
'Blank '
|
|
'Period '
|
|
'Zero (0) '
|
|
'99999'
|
|
)
|
|
TabOrder = 1
|
|
end
|
|
object JustificationGrp: TRadioGroup
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = MissValsGrp
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 8
|
|
Height = 51
|
|
Top = 155
|
|
Width = 336
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoFill = True
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 12
|
|
BorderSpacing.Right = 8
|
|
Caption = 'Justification'
|
|
ChildSizing.LeftRightSpacing = 12
|
|
ChildSizing.TopBottomSpacing = 6
|
|
ChildSizing.HorizontalSpacing = 12
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 3
|
|
ClientHeight = 31
|
|
ClientWidth = 332
|
|
Columns = 3
|
|
ItemIndex = 2
|
|
Items.Strings = (
|
|
'Left'
|
|
'Center'
|
|
'Right'
|
|
)
|
|
TabOrder = 2
|
|
end
|
|
object FilePathEdit: TEdit
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Label1
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 8
|
|
Height = 23
|
|
Top = 235
|
|
Width = 336
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 8
|
|
TabOrder = 3
|
|
end
|
|
object CancelBtn: TButton
|
|
AnchorSideTop.Control = HelpBtn
|
|
AnchorSideRight.Control = SaveBtn
|
|
Left = 169
|
|
Height = 25
|
|
Top = 281
|
|
Width = 62
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 8
|
|
BorderSpacing.Bottom = 8
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
OnClick = CancelBtnClick
|
|
TabOrder = 4
|
|
end
|
|
object SaveBtn: TButton
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = HelpBtn
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 239
|
|
Height = 25
|
|
Top = 281
|
|
Width = 105
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 8
|
|
BorderSpacing.Bottom = 8
|
|
Caption = 'Save and Close'
|
|
ModalResult = 1
|
|
OnClick = SaveBtnClick
|
|
TabOrder = 5
|
|
end
|
|
object BrowseBtn: TButton
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = HelpBtn
|
|
AnchorSideRight.Control = CancelBtn
|
|
Left = 88
|
|
Height = 25
|
|
Top = 281
|
|
Width = 73
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 8
|
|
BorderSpacing.Bottom = 8
|
|
Caption = 'Browse...'
|
|
OnClick = BrowseBtnClick
|
|
TabOrder = 6
|
|
end
|
|
object HelpBtn: TButton
|
|
Tag = 135
|
|
AnchorSideTop.Control = Bevel1
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = BrowseBtn
|
|
Left = 29
|
|
Height = 25
|
|
Top = 281
|
|
Width = 51
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Right = 8
|
|
BorderSpacing.Bottom = 8
|
|
Caption = 'Help'
|
|
OnClick = HelpBtnClick
|
|
TabOrder = 7
|
|
end
|
|
object Bevel1: TBevel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = FilePathEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 3
|
|
Top = 270
|
|
Width = 352
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 12
|
|
Shape = bsBottomLine
|
|
end
|
|
object SelDir: TSelectDirectoryDialog
|
|
left = 184
|
|
top = 184
|
|
end
|
|
end
|