You've already forked lazarus-ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7345 8e941d3f-bd1b-0410-a28a-d453659cc2b4
227 lines
5.5 KiB
Plaintext
227 lines
5.5 KiB
Plaintext
object GenSeqFrm: TGenSeqFrm
|
|
Left = 390
|
|
Height = 192
|
|
Top = 114
|
|
Width = 367
|
|
AutoSize = True
|
|
Caption = 'Generation of Sequential Values'
|
|
ClientHeight = 192
|
|
ClientWidth = 367
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
Position = poMainFormCenter
|
|
LCLVersion = '2.1.0.0'
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideRight.Control = Label2
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 47
|
|
Height = 15
|
|
Top = 96
|
|
Width = 99
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Left = 12
|
|
Caption = 'Start Sequence At: '
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideRight.Control = IncrEdit
|
|
Left = 34
|
|
Height = 15
|
|
Top = 127
|
|
Width = 112
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Left = 12
|
|
BorderSpacing.Right = 8
|
|
Caption = 'Increment Values By: '
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideRight.Control = Label2
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 41
|
|
Height = 15
|
|
Top = 160
|
|
Width = 105
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Left = 12
|
|
Caption = 'New Variable Label: '
|
|
ParentColor = False
|
|
end
|
|
object RadioGroup1: TRadioGroup
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
Left = 8
|
|
Height = 74
|
|
Top = 8
|
|
Width = 236
|
|
AutoFill = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Generate for:'
|
|
ChildSizing.LeftRightSpacing = 12
|
|
ChildSizing.TopBottomSpacing = 6
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclTopToBottomThenLeftToRight
|
|
ChildSizing.ControlsPerLine = 2
|
|
ClientHeight = 54
|
|
ClientWidth = 232
|
|
Items.Strings = (
|
|
'All Current Cases'
|
|
'Number of Cases = '
|
|
)
|
|
OnClick = RadioGroup1Click
|
|
TabOrder = 0
|
|
object StaticText1: TStaticText
|
|
Left = 140
|
|
Height = 19
|
|
Top = 6
|
|
Width = 80
|
|
Caption = ' '
|
|
TabOrder = 2
|
|
end
|
|
object NoCasesEdit: TEdit
|
|
Left = 140
|
|
Height = 23
|
|
Top = 25
|
|
Width = 80
|
|
Alignment = taRightJustify
|
|
BorderSpacing.Left = 3
|
|
OnExit = NoCasesEditExit
|
|
TabOrder = 3
|
|
Text = 'NoCasesEdit'
|
|
end
|
|
end
|
|
object StartAtEdit: TEdit
|
|
AnchorSideLeft.Control = LabelEdit
|
|
AnchorSideTop.Control = RadioGroup1
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 154
|
|
Height = 23
|
|
Top = 90
|
|
Width = 78
|
|
Alignment = taRightJustify
|
|
BorderSpacing.Top = 8
|
|
TabOrder = 1
|
|
Text = 'StartAtEdit'
|
|
end
|
|
object IncrEdit: TEdit
|
|
AnchorSideLeft.Control = LabelEdit
|
|
AnchorSideTop.Control = StartAtEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 154
|
|
Height = 23
|
|
Top = 121
|
|
Width = 78
|
|
Alignment = taRightJustify
|
|
BorderSpacing.Top = 8
|
|
TabOrder = 2
|
|
Text = 'IncrEdit'
|
|
end
|
|
object LabelEdit: TEdit
|
|
AnchorSideTop.Control = IncrEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = RadioGroup1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 154
|
|
Height = 23
|
|
Top = 152
|
|
Width = 78
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Right = 12
|
|
BorderSpacing.Bottom = 8
|
|
TabOrder = 3
|
|
Text = 'LabelEdit'
|
|
end
|
|
object Panel1: TPanel
|
|
AnchorSideLeft.Control = RadioGroup1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideBottom.Control = LabelEdit
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 260
|
|
Height = 136
|
|
Top = 39
|
|
Width = 76
|
|
Anchors = [akLeft, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 16
|
|
BorderSpacing.Right = 8
|
|
BevelOuter = bvNone
|
|
ChildSizing.VerticalSpacing = 12
|
|
ClientHeight = 136
|
|
ClientWidth = 76
|
|
TabOrder = 4
|
|
object ResetBtn: TButton
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 25
|
|
Top = 0
|
|
Width = 76
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
Caption = 'Reset'
|
|
OnClick = ResetBtnClick
|
|
TabOrder = 0
|
|
end
|
|
object CancelBtn: TButton
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = ResetBtn
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 25
|
|
Top = 37
|
|
Width = 76
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
TabOrder = 1
|
|
end
|
|
object ComputeBtn: TButton
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = CancelBtn
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 25
|
|
Top = 74
|
|
Width = 76
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Compute'
|
|
OnClick = ComputeBtnClick
|
|
TabOrder = 2
|
|
end
|
|
object ReturnBtn: TButton
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = ComputeBtn
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 25
|
|
Top = 111
|
|
Width = 76
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Return'
|
|
ModalResult = 1
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
end
|