|
|
1.1 root 1: object UserListForm: TUserListForm
2: Left = 185
3: Top = 233
4: Width = 870
5: Height = 640
6: Caption = 'Synchronet User List'
7: Color = clBtnFace
8: Font.Charset = DEFAULT_CHARSET
9: Font.Color = clWindowText
10: Font.Height = -13
11: Font.Name = 'MS Sans Serif'
12: Font.Style = []
13: FormStyle = fsStayOnTop
14: OldCreateOrder = False
15: Position = poDefault
16: OnClose = FormClose
17: OnShow = FormShow
18: PixelsPerInch = 120
19: TextHeight = 16
20: object ListView: TListView
21: Left = 0
22: Top = 0
23: Width = 862
24: Height = 608
25: Align = alClient
26: Columns = <
27: item
28: Caption = 'Num'
29: Width = 40
30: end
31: item
32: Caption = 'Alias'
33: Width = 100
34: end
35: item
36: Caption = 'Name'
37: Width = 100
38: end
39: item
40: Caption = 'Lev'
41: Width = 40
42: end
43: item
44: Caption = 'Age'
45: Width = 40
46: end
47: item
48: Caption = 'Sex'
49: Width = 40
50: end
51: item
52: Caption = 'Location'
53: Width = 100
54: end
55: item
56: Caption = 'Protocol'
57: Width = 70
58: end
59: item
60: Caption = 'Address'
61: Width = 100
62: end
63: item
64: Caption = 'Host Name'
65: Width = 100
66: end
67: item
68: Caption = 'Phone'
69: Width = 100
70: end
71: item
72: Caption = 'Email'
73: Width = 100
74: end
75: item
76: Caption = 'Logons'
77: Width = 60
78: end
79: item
80: Caption = 'First On'
81: Width = 70
82: end
83: item
84: Caption = 'Last On'
85: Width = 70
86: end>
87: PopupMenu = PopupMenu
88: TabOrder = 0
89: ViewStyle = vsReport
90: OnColumnClick = ListViewColumnClick
91: OnCompare = ListViewCompare
92: end
93: object PopupMenu: TPopupMenu
94: Left = 232
95: Top = 96
96: object EditUserPopup: TMenuItem
97: Caption = 'Edit User'
98: OnClick = EditUserPopupClick
99: end
100: end
101: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.