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
141 lines
3.2 KiB
Plaintext
141 lines
3.2 KiB
Plaintext
object RangeSelectFrm: TRangeSelectFrm
|
|
Left = 583
|
|
Height = 111
|
|
Top = 344
|
|
Width = 344
|
|
AutoSize = True
|
|
BorderStyle = bsDialog
|
|
Caption = 'Select Cases for a Range of Cases'
|
|
ClientHeight = 111
|
|
ClientWidth = 344
|
|
OnActivate = FormActivate
|
|
OnShow = FormShow
|
|
Position = poMainFormCenter
|
|
LCLVersion = '2.1.0.0'
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = FirstCaseEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 16
|
|
Height = 15
|
|
Top = 33
|
|
Width = 101
|
|
BorderSpacing.Left = 16
|
|
Caption = 'Select Cases From: '
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
AnchorSideLeft.Control = FirstCaseEdit
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = Owner
|
|
Left = 124
|
|
Height = 15
|
|
Top = 12
|
|
Width = 81
|
|
BorderSpacing.Top = 12
|
|
Caption = 'First Case Label'
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel
|
|
AnchorSideLeft.Control = LastCaseEdit
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = Owner
|
|
Left = 229
|
|
Height = 15
|
|
Top = 12
|
|
Width = 80
|
|
BorderSpacing.Top = 12
|
|
Caption = 'Last Case Label'
|
|
ParentColor = False
|
|
end
|
|
object Label4: TLabel
|
|
AnchorSideLeft.Control = FirstCaseEdit
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = FirstCaseEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 211
|
|
Height = 15
|
|
Top = 33
|
|
Width = 11
|
|
BorderSpacing.Left = 8
|
|
Caption = 'to'
|
|
ParentColor = False
|
|
end
|
|
object FirstCaseEdit: TEdit
|
|
AnchorSideLeft.Control = Label1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Label2
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 125
|
|
Height = 23
|
|
Top = 29
|
|
Width = 78
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 2
|
|
TabOrder = 0
|
|
Text = 'FirstCaseEdit'
|
|
end
|
|
object LastCaseEdit: TEdit
|
|
AnchorSideLeft.Control = Label4
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = FirstCaseEdit
|
|
Left = 230
|
|
Height = 23
|
|
Top = 29
|
|
Width = 78
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Right = 16
|
|
TabOrder = 1
|
|
Text = 'Edit1'
|
|
end
|
|
object CancelBtn: TButton
|
|
AnchorSideTop.Control = Bevel1
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = OKBtn
|
|
Left = 220
|
|
Height = 25
|
|
Top = 72
|
|
Width = 62
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Right = 12
|
|
BorderSpacing.Bottom = 8
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
TabOrder = 2
|
|
end
|
|
object OKBtn: TButton
|
|
AnchorSideTop.Control = Bevel1
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 294
|
|
Height = 25
|
|
Top = 72
|
|
Width = 42
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Right = 8
|
|
BorderSpacing.Bottom = 8
|
|
Caption = 'OK'
|
|
ModalResult = 1
|
|
TabOrder = 3
|
|
end
|
|
object Bevel1: TBevel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = FirstCaseEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 12
|
|
Top = 52
|
|
Width = 344
|
|
Anchors = [akTop, akLeft, akRight]
|
|
Shape = bsBottomLine
|
|
end
|
|
end
|