-
Notifications
You must be signed in to change notification settings - Fork 8
Expand file tree
/
Copy pathUnit1.lfm
More file actions
372 lines (372 loc) · 9.16 KB
/
Unit1.lfm
File metadata and controls
372 lines (372 loc) · 9.16 KB
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
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
object Form1: TForm1
Left = 324
Height = 363
Top = 107
Width = 645
ActiveControl = Button14
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Form1'
ClientHeight = 363
ClientWidth = 645
Font.Height = -11
Font.Name = 'MS Sans Serif'
LCLVersion = '4.99.0.0'
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
object Label1: TLabel
Left = 8
Height = 16
Top = 8
Width = 91
Caption = 'Actuall database :'
ParentColor = False
end
object Label2: TLabel
Left = 120
Height = 16
Top = 8
Width = 34
Caption = 'Label2'
ParentColor = False
end
object Button1: TButton
Left = 8
Height = 25
Top = 328
Width = 625
Caption = '&Close'
TabOrder = 0
OnClick = Button1Click
end
object GroupBox1: TGroupBox
Left = 8
Height = 105
Top = 32
Width = 305
Caption = ' Database editor '
ClientHeight = 88
ClientWidth = 303
TabOrder = 1
object Button2: TButton
Left = 8
Height = 25
Top = 5
Width = 129
Caption = '&New'
TabOrder = 0
OnClick = Button2Click
end
object Button3: TButton
Left = 158
Height = 25
Top = 5
Width = 129
Caption = '&Load'
TabOrder = 1
OnClick = Button3Click
end
object Button4: TButton
Left = 8
Height = 25
Top = 45
Width = 129
Caption = '&Save'
TabOrder = 2
OnClick = Button4Click
end
object Button13: TButton
Left = 158
Height = 25
Top = 45
Width = 129
Caption = 'Save &as'
TabOrder = 3
OnClick = Button13Click
end
end
object GroupBox2: TGroupBox
Left = 8
Height = 168
Top = 144
Width = 305
Caption = 'Datensatz Editor '
ClientHeight = 151
ClientWidth = 303
TabOrder = 2
object Label3: TLabel
Left = 8
Height = 16
Top = 88
Width = 80
Caption = 'Episode Name :'
ParentColor = False
end
object Label4: TLabel
Left = 8
Height = 16
Top = 56
Width = 43
Caption = 'Season :'
ParentColor = False
end
object Label5: TLabel
Left = 8
Height = 16
Top = 24
Width = 37
Caption = 'Series :'
ParentColor = False
end
object Edit1: TEdit
Left = 142
Height = 26
Top = 16
Width = 145
TabOrder = 0
Text = 'Edit1'
OnKeyPress = Edit1KeyPress
end
object Edit2: TEdit
Left = 142
Height = 26
Top = 48
Width = 145
TabOrder = 1
Text = 'Edit2'
OnKeyPress = Edit1KeyPress
end
object Edit3: TEdit
Left = 142
Height = 26
Top = 80
Width = 145
TabOrder = 2
Text = 'Edit3'
OnKeyPress = Edit1KeyPress
end
object Button5: TButton
Left = 142
Height = 25
Top = 112
Width = 145
Caption = '&Insert dataset'
TabOrder = 3
OnClick = Button5Click
end
object Button6: TButton
Left = 8
Height = 25
Top = 112
Width = 110
Caption = '&Empty fields'
TabOrder = 4
OnClick = Button6Click
end
end
object GroupBox3: TGroupBox
Left = 328
Height = 280
Top = 32
Width = 305
Caption = ' Work with the database '
ClientHeight = 263
ClientWidth = 303
TabOrder = 3
object Label6: TLabel
Left = 16
Height = 16
Top = 72
Width = 37
Caption = 'Series :'
ParentColor = False
end
object Label7: TLabel
Left = 198
Height = 16
Top = 69
Width = 43
Caption = 'Season :'
ParentColor = False
end
object Button7: TButton
Left = 16
Height = 25
Top = 40
Width = 272
Caption = '&Show random entry'
TabOrder = 0
OnClick = Button7Click
end
object Button8: TButton
Left = 14
Height = 25
Top = 193
Width = 49
Caption = '&All'
TabOrder = 1
OnClick = Button8Click
end
object Button9: TButton
Left = 70
Height = 25
Top = 193
Width = 49
Caption = '&None'
TabOrder = 2
OnClick = Button9Click
end
object Button12: TButton
Left = 14
Height = 25
Top = 224
Width = 272
Caption = 'Show selected database parts'
TabOrder = 3
OnClick = Button12Click
end
object CheckBox1: TCheckBox
Left = 14
Height = 22
Hint = 'nutze auch als gesehen markierte Einträge'
Top = 5
Width = 97
Caption = 'U&se all entries'
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
object CheckListBox1: TCheckListBox
Left = 16
Height = 97
Top = 88
Width = 174
ItemHeight = 0
TabOrder = 5
TopIndex = -1
end
object CheckListBox2: TCheckListBox
Left = 198
Height = 97
Top = 88
Width = 90
ItemHeight = 0
TabOrder = 6
TopIndex = -1
end
object Button10: TButton
Left = 198
Height = 25
Top = 193
Width = 35
Caption = 'A&ll'
TabOrder = 7
OnClick = Button10Click
end
object Button11: TButton
Left = 237
Height = 25
Top = 193
Width = 49
Caption = 'N&one'
TabOrder = 8
OnClick = Button11Click
end
end
object Button14: TButton
Left = 320
Height = 25
Top = 0
Width = 75
Caption = 'Sort'
TabOrder = 4
Visible = False
OnClick = Button14Click
end
object SpeedButton1: TSpeedButton
Left = 560
Height = 24
Top = 1
Width = 24
Images = ImageList1
ImageIndex = 0
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 609
Height = 24
Top = 1
Width = 24
Images = ImageList1
ImageIndex = 2
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 528
Height = 24
Top = 2
Width = 24
Images = ImageList1
ImageIndex = 1
OnClick = SpeedButton3Click
end
object OpenDialog1: TOpenDialog
DefaultExt = '.edb'
Filter = 'Episoden Datenbank|*.edb|Alle|*.*'
Left = 112
Top = 80
end
object SaveDialog1: TSaveDialog
DefaultExt = '.edb'
Filter = 'Episoden Datenbank|*.edb|Alle|*.*'
Left = 272
Top = 80
end
object ImageList1: TImageList
Left = 543
Top = 60
Bitmap = {
4C7A030000001000000010000000E30400000000000078DAED55D94F637518BD
C6185F7DD217A3D1C4441F26C618E3C48C4FEA447CC0003112201A100781B025
0402A3C81A6413907D91A19402B2842D2DB48596EE50762C0C1D7606246CC27F
70FC9D5F32CD30D35130CE9B0F374DEFBDE7FB9DEF7CDF39178082FFF89A9D9D
C5D4D414EC763B26262660341AA1D3E9303030809E9E1E3C09B7B0B0A0CCCCCC
607D7D1D7FDCBF8F9DCD756CADF35AC3E6DA1AFE3C398146A3F18B9F9F9F57A6
A7A7B1B5B585A3A323CCBBA730ED74C06DB761D26681CB62C1BA77152D2D2D7E
F1C41E1E1ECA6B77674760EDA8AFAB436D4D0DAAABAAF04B6525D6EEAEA0BEBE
DE2FDEE974E2ECEC0C3B02BBB1B121CEB462D26A81D36286C36C826DDC887B2B
CBA81475FCE1A9D389E86F7B7B1B1BA2679765429E595E5E8EB2B23214171743
F9F10D949494F8C55363E2D9FF3DAF174E71A6DD3406DB981116A31ECF17BE87
1BAD11507E78CD2F5EABD54AFCE6E626BCABAB92AFD56880C5A0C74BE59FE0A6
E63BE459EBF1A9E696A8F1EA6335FAFBFB717C7C2C7BBFBBBC2CCF9CD08FE2CD
FA2FF1794F2A8A5D2AC46873916BADC34D751494DB176B747575C9B911BFECF9
5D6047F0CE9D6F11369C83CAE96EA48E552072381B71BA02645B6AF191EA6B3C
7BFB155F8DB6B6369C9F9F4BFD3C4B4B30E9B4F8509384EBAA187CD1FF3D2AA6
BB704B607F72B4E0833B5FE1B9DC6B17B4686A6AC2F0F0303C1E0F7684860EF3
38C6B5C3D00F0EE0ED5F232587F8D122143B5578A1E4865F0DC5AC14CE49AD56
C3E9B0C32BFAF0CCCFE15DC1A17AB60F49869F5136A9C18BE51FE3EFFC939595
A564646420353515C9C9C9B8AE4E44EDDC80AC51E1FE0D2F577E86ABF8913ABC
AF8E177A7E83B79AC2F17A5D30F0147CFFBFFF9F8EFF392FCE8DF3E31C39CFAB
F89FFBC2BDE1FE708FB84F57F13FF7957BCBFD650DEEF365FD6F1AD549BFD037
F40F7D443F3D8AF7E77FFA933EA55FE95BFA973EA69FE9EB8775F0E77FE60373
8279C1DC607E3047C881B9C27CF927FF33A79857CC2DE617738C79C65CBBACFF
9997CC4DE6277394797A15FFC7C7C74B2D98DFCCF17FEB4B7E3F9EC9BB7629BC
F083E272B9A487CD66F3A5EA2F2E2E2A7373733EECFEFE3EF6F6F6D0DBDB4BFF
2B4343434A5F5FDF93B01058B8DD6E082F2956AB55EE22F741E0303838A8B04E
6767A7D4F7D1DC60669C9E9E624DE404B12693092B2B2B729ECC1D62E9F18383
038C8C8CF03BEAC38B3315F6C91A7CDF2BFCC33A0FF0FCBF24768AF8C9C94970
3629292917F83B1C0EF92EF38BD9673018D0DCDC0C954A25F9301F2C22837876
5151918F3FEB3DC8C955E13B66E7D8D818727373919E9E2E77811960B3D9641D
3E2F2D2D45616121F2F2F224969945AE3C971A3223F3F3F37DDC1A1B1BA5767C
97BCC885BA72AFC46CB1BBBB2BFBE37DD6175AA3AAAACA87AFA9A991FEE4F9E4
4FAE7C3F323252CE82FC5A5B5B213258D6A006CCD9868606A5BABA5AF267EFEC
4BAFD7233A3A1AA1A1A1080909F1E9407ED490EFF197FBD3DDDD2DE7CD7B9C27
338AF76263632FCC5F7C53948E8E0E2C8BDC219673E23E510FD6211FDE1F1F1F
97CF121313111313E3C3B7B7B72BE4C67D631DEA5A505020F562CF09090912C3
67EC3B3B3B1BC1C1C117E69F939383A4A424D95B5A5A9AC21A3C8BE747454521
2C2C4C61CF818181080808F0EB418157E2E2E294CCCC4C598F7CB9FBE1E1E112
1F1111A108FCA5BC2838CBF38282821EE3FAF0F51720AEC9FE
}
end
end