-
Notifications
You must be signed in to change notification settings - Fork 11
/
YOTM.Form.Notify.Task.dfm
239 lines (239 loc) · 6.54 KB
/
YOTM.Form.Notify.Task.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
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
inherited FormNotifyTask: TFormNotifyTask
Caption = 'FormNotifyTask'
ClientHeight = 193
ClientWidth = 400
FormStyle = fsStayOnTop
Position = poDefault
Visible = True
ExplicitWidth = 400
ExplicitHeight = 193
PixelsPerInch = 96
TextHeight = 19
object Shape4: TShape [0]
Left = 2
Top = 148
Width = 396
Height = 2
Align = alBottom
Brush.Color = 3026478
Pen.Color = 3026478
ExplicitLeft = -226
ExplicitTop = 0
ExplicitWidth = 627
end
object LabelTime: TLabel [1]
Left = 200
Top = 112
Width = 185
Height = 19
Alignment = taRightJustify
AutoSize = False
Caption = #1057#1077#1075#1086#1076#1085#1103', '#1074' 14:00'
end
inherited DragBarTop: TDragPanel
Width = 396
ExplicitWidth = 396
inherited LabelCaption: TLabel
Width = 97
Caption = 'YOT Manager'
ExplicitWidth = 97
end
inherited ButtonFlatClose: TButtonFlat
Left = 358
ExplicitLeft = 358
end
end
object Panel1: TPanel
Left = 2
Top = 150
Width = 396
Height = 41
Align = alBottom
BevelOuter = bvNone
ParentColor = True
TabOrder = 1
ExplicitTop = 117
object ButtonFlatHoldOverMore: TButtonFlat
AlignWithMargins = True
Left = 177
Top = 10
Width = 20
Height = 21
Margins.Left = 0
Margins.Top = 10
Margins.Bottom = 10
Align = alLeft
Caption = ''
ColorNormal = clGray
ColorOver = 6381921
ColorPressed = 3815994
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
FontOver.Charset = DEFAULT_CHARSET
FontOver.Color = clWhite
FontOver.Height = -13
FontOver.Name = 'Tahoma'
FontOver.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWhite
FontDown.Height = -13
FontDown.Name = 'Tahoma'
FontDown.Style = []
GroupItemKind = giRight
IgnorBounds = True
ImageIndentLeft = -3
ImageIndex = 10
Images = FormMain.ImageList24
OnClick = ButtonFlatHoldOverMoreClick
RoundRectParam = 10
Shape = stRoundRect
ShowFocusRect = False
TabOrder = 0
TabStop = True
TextFormat = [tfCenter, tfSingleLine, tfVerticalCenter]
SubTextFont.Charset = DEFAULT_CHARSET
SubTextFont.Color = clWhite
SubTextFont.Height = -13
SubTextFont.Name = 'Tahoma'
SubTextFont.Style = []
end
object ButtonFlatHoldOverDefault: TButtonFlat
AlignWithMargins = True
Left = 10
Top = 10
Width = 167
Height = 21
Margins.Left = 10
Margins.Top = 10
Margins.Right = 0
Margins.Bottom = 10
Align = alLeft
Caption = #1053#1072#1087#1086#1084#1085#1080#1090#1100' '#1095#1077#1088#1077#1079' 10 '#1084#1080#1085#1091#1090
ColorNormal = clGray
ColorOver = 6381921
ColorPressed = 3815994
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
FontOver.Charset = DEFAULT_CHARSET
FontOver.Color = clWhite
FontOver.Height = -13
FontOver.Name = 'Tahoma'
FontOver.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWhite
FontDown.Height = -13
FontDown.Name = 'Tahoma'
FontDown.Style = []
GroupItemKind = giLeft
IgnorBounds = True
OnClick = MenuItemHO10Click
RoundRectParam = 10
Shape = stRoundRect
ShowFocusRect = False
TabOrder = 1
TabStop = True
TextFormat = [tfSingleLine, tfVerticalCenter]
SubTextFont.Charset = DEFAULT_CHARSET
SubTextFont.Color = clWhite
SubTextFont.Height = -13
SubTextFont.Name = 'Tahoma'
SubTextFont.Style = []
Popup = PopupMenuHoldOver
end
end
object ButtonFlatTaskState: TButtonFlat
AlignWithMargins = True
Left = 20
Top = 64
Width = 34
Height = 34
Caption = ''
ColorNormal = 3684408
ColorOver = 6381921
ColorPressed = 3815994
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
FontOver.Charset = DEFAULT_CHARSET
FontOver.Color = clWhite
FontOver.Height = -13
FontOver.Name = 'Tahoma'
FontOver.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWhite
FontDown.Height = -13
FontDown.Name = 'Tahoma'
FontDown.Style = []
IgnorBounds = True
ImageIndentLeft = 4
ImageIndentRight = 2
ImageIndex = 19
Images = FormMain.ImageList24
OnClick = ButtonFlatTaskStateClick
RoundRectParam = 0
ShowFocusRect = False
TabOrder = 2
TabStop = True
TextFormat = [tfSingleLine, tfVerticalCenter]
SubTextFont.Charset = DEFAULT_CHARSET
SubTextFont.Color = clWhite
SubTextFont.Height = -13
SubTextFont.Name = 'Tahoma'
SubTextFont.Style = []
end
object EditTaskName: TEdit
AlignWithMargins = True
Left = 60
Top = 64
Width = 325
Height = 34
BevelInner = bvNone
BevelKind = bkSoft
BevelOuter = bvSpace
BevelWidth = 6
BorderStyle = bsNone
Font.Charset = DEFAULT_CHARSET
Font.Color = 15921906
Font.Height = -16
Font.Name = 'Tahoma'
Font.Style = []
ParentColor = True
ParentFont = False
ReadOnly = True
TabOrder = 3
Text = #1050#1088#1072#1090#1082#1086#1077' '#1086#1087#1080#1089#1072#1085#1080#1077' '#1079#1072#1076#1072#1095#1080
StyleElements = []
end
object PopupMenuHoldOver: TPopupMenu
Left = 296
Top = 152
object MenuItemHO5: TMenuItem
Caption = #1053#1072#1087#1086#1084#1085#1080#1090#1100' '#1095#1077#1088#1077#1079' 5 '#1084#1080#1085#1091#1090
OnClick = MenuItemHO5Click
end
object MenuItemHO10: TMenuItem
Caption = #1053#1072#1087#1086#1084#1085#1080#1090#1100' '#1095#1077#1088#1077#1079' 10 '#1084#1080#1085#1091#1090
OnClick = MenuItemHO10Click
end
object MenuItemHO15: TMenuItem
Caption = #1053#1072#1087#1086#1084#1085#1080#1090#1100' '#1095#1077#1088#1077#1079' 15 '#1084#1080#1085#1091#1090
OnClick = MenuItemHO15Click
end
object MenuItemHO20: TMenuItem
Caption = #1053#1072#1087#1086#1084#1085#1080#1090#1100' '#1095#1077#1088#1077#1079' 20 '#1084#1080#1085#1091#1090
OnClick = MenuItemHO20Click
end
object MenuItemHO25: TMenuItem
Caption = #1053#1072#1087#1086#1084#1085#1080#1090#1100' '#1095#1077#1088#1077#1079' 25 '#1084#1080#1085#1091#1090
OnClick = MenuItemHO25Click
end
end
end