-
-
Notifications
You must be signed in to change notification settings - Fork 4
/
Copy pathSpecialsForm.dfm
134 lines (134 loc) · 2.81 KB
/
SpecialsForm.dfm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
object fSpecialsForm: TfSpecialsForm
Left = 471
Top = 136
BorderStyle = bsDialog
Caption = 'Special functions'
ClientHeight = 432
ClientWidth = 776
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
DesignSize = (
776
432)
PixelsPerInch = 96
TextHeight = 13
object lblFunctions: TLabel
Left = 8
Top = 88
Width = 129
Height = 13
Caption = 'Available special functions:'
end
object lblDescription: TLabel
Left = 392
Top = 88
Width = 155
Height = 13
Caption = 'Description of selected function:'
end
object pnlWarning: TPanel
Left = 8
Top = 8
Width = 761
Height = 33
Anchors = [akLeft, akTop, akRight]
BevelInner = bvLowered
Caption =
'WARNING - All functions here are affecting entire list immediate' +
'ly, no warnings or prompts are issued!'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object leParam_1: TLabeledEdit
Left = 8
Top = 64
Width = 249
Height = 21
EditLabel.Width = 63
EditLabel.Height = 13
EditLabel.Caption = 'Parameter 1:'
TabOrder = 0
end
object leParam_2: TLabeledEdit
Left = 264
Top = 64
Width = 249
Height = 21
EditLabel.Width = 63
EditLabel.Height = 13
EditLabel.Caption = 'Parameter 2:'
TabOrder = 1
end
object cbCloseWhenDone: TCheckBox
Left = 392
Top = 404
Width = 105
Height = 17
Caption = 'Close when done'
Checked = True
ParentShowHint = False
ShowHint = False
State = cbChecked
TabOrder = 5
end
object leParam_3: TLabeledEdit
Left = 520
Top = 64
Width = 249
Height = 21
EditLabel.Width = 63
EditLabel.Height = 13
EditLabel.Caption = 'Parameter 3:'
TabOrder = 2
end
object lbFunctions: TListBox
Left = 8
Top = 104
Width = 377
Height = 319
Style = lbOwnerDrawFixed
IntegralHeight = True
ItemHeight = 35
TabOrder = 3
OnClick = lbFunctionsClick
OnDrawItem = lbFunctionsDrawItem
end
object btnRunSelected: TButton
Left = 640
Top = 400
Width = 129
Height = 25
Caption = 'Run selected function'
TabOrder = 6
OnClick = btnRunSelectedClick
end
object meDescription: TMemo
Left = 392
Top = 104
Width = 377
Height = 289
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 4
end
end