-
Notifications
You must be signed in to change notification settings - Fork 0
/
dlgPickSeason.dfm
179 lines (179 loc) · 4.73 KB
/
dlgPickSeason.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
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
object PickSeason: TPickSeason
Left = 0
Top = 0
BorderStyle = bsDialog
Caption = 'Select the Swimming Season'
ClientHeight = 237
ClientWidth = 441
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poOwnerFormCenter
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 21
object RelativePanel1: TRelativePanel
Left = 0
Top = 0
Width = 441
Height = 237
ControlCollection = <
item
Control = CalendarPicker1
AlignBottomWithPanel = False
AlignHorizontalCenterWithPanel = True
AlignLeftWithPanel = False
AlignRightWithPanel = False
AlignTopWithPanel = False
AlignVerticalCenterWithPanel = False
Below = lblTitle
end
item
Control = lblTitle
AlignBottomWithPanel = False
AlignHorizontalCenterWithPanel = True
AlignLeftWithPanel = False
AlignRightWithPanel = False
AlignTopWithPanel = False
AlignVerticalCenterWithPanel = False
end
item
Control = btnOk
AlignBottomWithPanel = True
AlignHorizontalCenterWithPanel = True
AlignLeftWithPanel = False
AlignRightWithPanel = False
AlignTopWithPanel = False
AlignVerticalCenterWithPanel = False
end
item
Control = sedtSeasonLength
AlignBottomWithPanel = False
AlignHorizontalCenterWithPanel = False
AlignLeftWithPanel = False
AlignRightWith = CalendarPicker1
AlignRightWithPanel = False
AlignTopWithPanel = False
AlignVerticalCenterWithPanel = False
Below = CalendarPicker1
end
item
Control = lblSeasonLength
AlignBottomWithPanel = False
AlignHorizontalCenterWithPanel = False
AlignLeftWithPanel = False
AlignRightWithPanel = False
AlignTopWithPanel = False
AlignVerticalCenterWith = sedtSeasonLength
AlignVerticalCenterWithPanel = False
LeftOf = sedtSeasonLength
end
item
Control = lblUnits
AlignBottomWithPanel = False
AlignHorizontalCenterWithPanel = False
AlignLeftWithPanel = False
AlignRightWithPanel = False
AlignTopWithPanel = False
AlignVerticalCenterWith = sedtSeasonLength
AlignVerticalCenterWithPanel = False
RightOf = sedtSeasonLength
end>
Align = alClient
TabOrder = 0
ExplicitLeft = 224
ExplicitTop = 272
ExplicitWidth = 185
ExplicitHeight = 41
DesignSize = (
441
237)
object CalendarPicker1: TCalendarPicker
AlignWithMargins = True
Left = 149
Top = 59
Height = 32
Margins.Top = 14
Anchors = []
CalendarHeaderInfo.DaysOfWeekFont.Charset = DEFAULT_CHARSET
CalendarHeaderInfo.DaysOfWeekFont.Color = clWindowText
CalendarHeaderInfo.DaysOfWeekFont.Height = -13
CalendarHeaderInfo.DaysOfWeekFont.Name = 'Segoe UI'
CalendarHeaderInfo.DaysOfWeekFont.Style = []
CalendarHeaderInfo.Font.Charset = DEFAULT_CHARSET
CalendarHeaderInfo.Font.Color = clWindowText
CalendarHeaderInfo.Font.Height = -20
CalendarHeaderInfo.Font.Name = 'Segoe UI'
CalendarHeaderInfo.Font.Style = []
Color = clWindow
Font.Charset = DEFAULT_CHARSET
Font.Color = clGray
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = []
ParentFont = False
TabOrder = 0
TextHint = 'select a date'
end
object lblTitle: TLabel
Left = 60
Top = 24
Width = 318
Height = 21
Alignment = taRightJustify
Anchors = []
Caption = 'Select the start date for the swimming season.'
end
object btnOk: TButton
AlignWithMargins = True
Left = 180
Top = 188
Width = 79
Height = 34
Margins.Bottom = 14
Anchors = []
Caption = 'Ok'
TabOrder = 1
OnClick = btnOkClick
end
object sedtSeasonLength: TSpinEdit
AlignWithMargins = True
Left = 241
Top = 108
Width = 48
Height = 31
Margins.Top = 14
Anchors = []
MaxValue = 12
MinValue = 1
TabOrder = 2
Value = 6
end
object lblSeasonLength: TLabel
AlignWithMargins = True
Left = 126
Top = 113
Width = 102
Height = 21
Margins.Right = 10
Alignment = taRightJustify
Anchors = []
Caption = 'Season length '
end
object lblUnits: TLabel
AlignWithMargins = True
Left = 302
Top = 113
Width = 53
Height = 21
Margins.Left = 10
Anchors = []
Caption = 'months'
end
end
end