Files
lazarus-ccr/applications/lazstats/source/forms/options/optionsunit.lfm

257 lines
6.6 KiB
Plaintext
Raw Normal View History

object OptionsFrm: TOptionsFrm
Left = 510
Height = 364
Top = 266
Width = 349
AutoSize = True
Caption = 'Options'
ClientHeight = 364
ClientWidth = 349
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 = 135
BorderSpacing.Left = 8
BorderSpacing.Top = 12
Caption = 'Default Data 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 = 333
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 = 329
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 = 333
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 = 329
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 = 333
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 = 329
Columns = 3
ItemIndex = 2
Items.Strings = (
'Left'
'Center'
'Right'
)
TabOrder = 2
end
object CancelBtn: TButton
AnchorSideTop.Control = HelpBtn
AnchorSideRight.Control = SaveBtn
Left = 166
Height = 25
Top = 329
Width = 62
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Cancel = True
Caption = 'Cancel'
ModalResult = 2
OnClick = CancelBtnClick
TabOrder = 3
end
object SaveBtn: TButton
AnchorSideTop.Control = HelpBtn
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 236
Height = 25
Top = 329
Width = 105
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Caption = 'Save and Close'
ModalResult = 1
OnClick = SaveBtnClick
TabOrder = 4
end
object HelpBtn: TButton
Tag = 135
AnchorSideTop.Control = Bevel1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = CancelBtn
Left = 107
Height = 25
Top = 329
Width = 51
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Top = 8
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Caption = 'Help'
OnClick = HelpBtnClick
TabOrder = 5
end
object Bevel1: TBevel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = LHelpPathEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 0
Height = 3
Top = 318
Width = 349
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 12
Shape = bsBottomLine
end
object Label2: TLabel
AnchorSideLeft.Control = LHelpPathEdit
AnchorSideTop.Control = DataFilePathEdit
AnchorSideTop.Side = asrBottom
Left = 8
Height = 15
Top = 266
Width = 149
BorderSpacing.Top = 8
Caption = 'Path to help viewer (LHelp):'
ParentColor = False
end
object LHelpPathEdit: TFileNameEdit
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 8
Height = 23
Top = 283
Width = 333
FilterIndex = 0
HideDirectories = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 8
BorderSpacing.Top = 2
BorderSpacing.Right = 8
MaxLength = 0
TabOrder = 6
end
object DataFilePathEdit: TDirectoryEdit
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 8
Height = 23
Top = 235
Width = 333
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 8
BorderSpacing.Top = 2
BorderSpacing.Right = 8
MaxLength = 0
TabOrder = 7
end
end