group-comunity/MainUnit.~dfm at master · djsmentya/group-comunity · GitHub

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
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
object FormChat: TFormChat
  Left = 457
  Top = 190
  Align = alClient
  BorderStyle = bsNone
  Caption = #1063#1072#1090
  ClientHeight = 382
  ClientWidth = 909
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label4: TLabel
    Left = 0
    Top = 359
    Width = 769
    Height = 26
    Alignment = taCenter
    AutoSize = False
    Caption = #1058#1077#1082#1089#1090' '#1089#1086#1086#1073#1097#1077#1085#1080#1103
    Color = 16744576
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
  end
  object Label6: TLabel
    Left = 768
    Top = 0
    Width = 144
    Height = 25
    Align = alCustom
    Alignment = taCenter
    AutoSize = False
    Caption = #1055#1086#1083#1100#1079#1086#1074#1072#1090#1077#1083#1080
    Color = 16744576
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
  end
  object Label1: TLabel
    Left = 128
    Top = -1
    Width = 65
    Height = 17
    Alignment = taCenter
    AutoSize = False
    Caption = #1055#1086#1088#1090
    Color = 16744576
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
  end
  object Label2: TLabel
    Left = 0
    Top = -1
    Width = 113
    Height = 17
    Alignment = taCenter
    AutoSize = False
    Caption = #1040#1076#1088#1077#1089
    Color = 16744576
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
  end
  object Label3: TLabel
    Left = 224
    Top = -1
    Width = 81
    Height = 17
    Alignment = taCenter
    AutoSize = False
    Caption = #1053#1080#1082
    Color = 16744576
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
  end
  object PortEdit: TEdit
    Left = 128
    Top = 16
    Width = 65
    Height = 21
    TabOrder = 1
    Text = 'PortEdit'
  end
  object NikEdit: TEdit
    Left = 224
    Top = 16
    Width = 81
    Height = 21
    TabOrder = 5
    Text = 'NikEdit'
  end
  object TextEdit: TEdit
    Left = 8
    Top = 336
    Width = 609
    Height = 21
    TabOrder = 0
    Text = 'TextEdit'
  end
  object ChatMemo: TMemo
    Left = 0
    Top = 40
    Width = 761
    Height = 289
    TabStop = False
    Lines.Strings = (
      'ChatMemo')
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 7
  end
  object HostEdit: TEdit
    Left = 0
    Top = 16
    Width = 113
    Height = 21
    TabOrder = 2
    Text = 'HostEdit'
  end
  object ServerBtn: TButton
    Left = 496
    Top = 8
    Width = 129
    Height = 21
    Caption = #1057#1086#1079#1076#1072#1090#1100' '#1089#1077#1088#1074#1077#1088
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = ServerBtnClick
  end
  object ClientBtn: TButton
    Left = 368
    Top = 8
    Width = 113
    Height = 21
    Caption = #1055#1086#1076#1082#1083#1102#1095#1080#1090#1100#1089#1103
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    OnClick = ClientBtnClick
  end
  object SendBtn: TButton
    Left = 624
    Top = 336
    Width = 137
    Height = 21
    Caption = #1054#1090#1087#1088#1072#1074#1080#1090#1100
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 6
    OnClick = SendBtnClick
  end
  object UserListView: TListView
    Left = 767
    Top = 24
    Width = 145
    Height = 361
    Align = alCustom
    Columns = <
      item
        Caption = #1050#1083#1080#1077#1085#1090
        Width = 115
      end>
    ReadOnly = True
    ShowColumnHeaders = False
    SmallImages = ImageList
    TabOrder = 8
    ViewStyle = vsReport
  end
  object ServerSocket: TServerSocket
    Active = False
    Port = 0
    ServerType = stNonBlocking
    OnClientConnect = ServerSocketClientConnect
    OnClientDisconnect = ServerSocketClientDisconnect
    Left = 672
  end
  object ClientSocket: TClientSocket
    Active = False
    ClientType = ctNonBlocking
    Port = 0
    OnConnect = ClientSocketConnect
    OnDisconnect = ClientSocketDisconnect
    OnRead = ClientSocketRead
    OnError = ClientSocketError
    Left = 704
  end
  object ImageList: TImageList
    Left = 736
    Bitmap = {
      494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000001000000001002000000000000010
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000EFEFEF00CFCF
      CF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBF
      BF00CFCFCF00EFEFEF000000000000000000000000000000000000000000EFEF
      EF00CFCFCF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBF
      BF00BFBFBF00CFCFCF00EFEFEF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000CFCFCF007070
      7000404040004040400040404000404040004040400040404000404040004040
      400070707000CFCFCF000000000000000000000000000000000000000000CFCF
      CF00707070004040400040404000404040004040400040404000404040004040
      40004040400070707000CFCFCF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003F3FDF000B0B
      FF000000B70000009C000000E6000000E6000000A1000000AC000000D6000000
      910040404000BFBFBF000000000000000000000000000000000000000000D8D8
      D800F7F7FF00B2B2B2009C9C9C00E2E2E200E2E2E2009C9C9C00B2B2B200C8C8
      C8008E8E8E0040404000BFBFBF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003F3FDF000B0B
      FF000000B2000000A3000000FD000000FF000000A8000000A6000000D6000000
      910040404000BFBFBF000000000000000000000000000000000000000000D8D8
      D800F7F7FF00B2B2B2009C9C9C00F7F7FF00F7F7FF009C9C9C00B2B2B200C8C8
      C8008E8E8E0040404000BFBFBF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003F3FDF000B0B
      FE000000D7000000D6000000FF000000F4000000CD000000CE000000D1000000
      910046464600C2C2C2000000000000000000000000000000000000000000D8D8
      D800F7F7FF00E2E2E200E2E2E200F7F7FF00F7F7FF00E2E2E200E2E2E200C8C8
      C8008E8E8E0046464600C2C2C200000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003F3FDF000A0A
      FD000000FC000000E6000000BD000000A9000000E0000000F8000000CC000000
      91006F6F6F00D5D5D5000000000000000000000000000000000000000000D8D8
      D800F7F7FF00F7F7FF00D8D8D800B8B8B800A8A8A800D8D8D800F7F7FF00C8C8
      C8008E8E8E006F6F6F00D5D5D500000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000006363E3000F0F
      F2000000F9000305DC00171F9300182096000607E1000502FC000D0DCA001313
      8600B7B7B700F1F1F1000000000000000000000000000000000000000000E4E4
      E400D8D8D800F7F7FF00DBDBDB008E8E8E008E8E8E00D8D8D800F7F7FF00C8C8
      C8008E8E8E00B7B7B700F1F1F100000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000F8F8FD003737
      DF000000D900222EE700739AFF00739AFF00202CE8001915E0003F3FBB00A6A6
      AA00EBEBEB00FEFEFE000000000000000000000000000000000000000000F8F8
      FD00E1E1E100DBDBDB00B8C7EE00739AFF00739AFF00B8C7EE00D8D8D800BCBC
      BC00A6A6AA00EBEBEB0000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000000000000000000000000000D2D2
      F7006872D50082B2E5008DCAFF00779DFF003572D2002740930067658100D3D3
      D300FCFCFC000000000000000000000000000000000000000000000000000000
      000000000000B8C9DB0082B2E5008DCAFF00779DFF003572D2005D78A4006765
      8100D3D3D3000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00009EB1D7009BD5E40091D6FF007398FF003D86CC00244E730075757500DADA
      DA00000000000000000000000000000000000000000000000000000000000000
      0000000000009EB1D7009BD5E40091D6FF007398FF003D86CC00244E73007575
      7500DADADA000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000ABC4D90089BDE60090D3FF007297FF003C7BD1002960810090909000E2E2
      E200000000000000000000000000000000000000000000000000000000000000
      000000000000ABC4D90089BDE60090D3FF007297FF003C7BD100296081009090
      9000E2E2E2000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000B5CBE2008DBEE3008ECFFD00749AFD003E7BCA00507FA000CBCBCB00F4F4
      F400000000000000000000000000000000000000000000000000000000000000
      000000000000B5CBE2008DBEE3008ECFFD00749AFD003E7BCA00507FA000CBCB
      CB00F4F4F4000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000F4F8FB00C3D6E90085B2DD0086AEDF008EACC700D1D8DD00F5F5F500FEFE
      FE00000000000000000000000000000000000000000000000000000000000000
      000000000000F4F8FB00C3D6E90085B2DD0086AEDF008EACC700D1D8DD00F5F5
      F500000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000100000000100010000000000800000000000000000000000
      000000000000000000000000FFFFFF00FFFFFFFF00000000C003E00100000000
      C003E00100000000C003E00100000000C003E00100000000C003E00100000000
      C003E00100000000C003E00100000000C003E00300000000E007F80700000000
      F00FF80700000000F00FF80700000000F00FF80700000000F00FF80F00000000
      FFFFFFFF00000000FFFFFFFF0000000000000000000000000000000000000000
      000000000000}
  end
  object ServerTimer: TTimer
    Enabled = False
    Interval = 500
    OnTimer = ServerTimerTimer
    Left = 384
    Top = 136
  end
  object QueryCurrentU: TZQuery
    Connection = DM.conDB
    Active = True
    SQL.Strings = (
      'SELECT * from users where id =:id')
    Params = <
      item
        DataType = ftUnknown
        Name = 'id'
        ParamType = ptUnknown
      end>
    Left = 640
    Top = 8
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'id'
        ParamType = ptUnknown
      end>
    object QueryCurrentUcathedra: TStringField
      FieldName = 'cathedra'
      Size = 1020
    end
    object QueryCurrentUInstitute: TStringField
      FieldName = 'Institute'
      Size = 1020
    end
    object QueryCurrentUdate: TStringField
      FieldName = 'date'
      Size = 1020
    end
    object QueryCurrentUfaculty: TStringField
      FieldName = 'faculty'
      Size = 1020
    end
    object QueryCurrentUcity: TStringField
      FieldName = 'city'
      Size = 1020
    end
    object QueryCurrentUschool: TStringField
      FieldName = 'school'
      Size = 1020
    end
    object QueryCurrentUTelephone: TStringField
      FieldName = 'Telephone'
      Size = 1020
    end
    object QueryCurrentUaddresses: TStringField
      FieldName = 'addresses'
      Size = 1020
    end
    object QueryCurrentUkurs: TStringField
      FieldName = 'kurs'
      Size = 1020
    end
    object QueryCurrentUid: TIntegerField
      FieldName = 'id'
    end
    object QueryCurrentUrole: TStringField
      FieldName = 'role'
      Size = 1020
    end
    object QueryCurrentUklass: TStringField
      FieldName = 'klass'
      Size = 1020
    end
    object QueryCurrentUpatronymic: TStringField
      FieldName = 'patronymic'
      Size = 1020
    end
    object QueryCurrentUsurname: TStringField
      FieldName = 'surname'
      Size = 1020
    end
    object QueryCurrentUname: TStringField
      FieldName = 'name'
      Size = 1020
    end
  end
end