|
|
1.1 root 1: object ClientForm: TClientForm
2: Left = 476
3: Top = 436
4: Width = 631
5: Height = 345
6: Caption = 'Clients'
7: Color = clBtnFace
8: DragKind = dkDock
9: DragMode = dmAutomatic
10: Font.Charset = DEFAULT_CHARSET
11: Font.Color = clWindowText
12: Font.Height = -13
13: Font.Name = 'MS Sans Serif'
14: Font.Style = []
15: OldCreateOrder = False
16: OnHide = FormHide
17: PixelsPerInch = 120
18: TextHeight = 16
19: object ListView: TListView
20: Left = 0
21: Top = 0
22: Width = 623
23: Height = 312
24: Align = alClient
25: Columns = <
26: item
27: Caption = 'Socket'
28: Width = 60
29: end
30: item
31: Caption = 'Protocol'
32: Width = 65
33: end
34: item
35: Caption = 'User'
36: Width = 90
37: end
38: item
39: Caption = 'Address'
40: Width = 100
41: end
42: item
43: Caption = 'Host Name'
44: Width = 100
45: end
46: item
47: Caption = 'Port'
48: Width = 55
49: end
50: item
51: AutoSize = True
52: Caption = 'Time'
53: end>
54: ColumnClick = False
55: MultiSelect = True
56: ReadOnly = True
57: RowSelect = True
58: PopupMenu = PopupMenu
59: TabOrder = 0
60: ViewStyle = vsReport
61: end
62: object Timer: TTimer
63: Interval = 5000
64: OnTimer = TimerTimer
65: Left = 168
66: Top = 128
67: end
68: object PopupMenu: TPopupMenu
69: Left = 344
70: Top = 200
71: object CloseSocketMenuItem: TMenuItem
72: Caption = '&Close Socket'
73: OnClick = CloseSocketMenuItemClick
74: end
75: object FilterIpMenuItem: TMenuItem
76: Caption = '&Filter IP Address'
77: OnClick = FilterIpMenuItemClick
78: end
79: end
80: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.