|
|
1.1 root 1: object UserListForm: TUserListForm 1.1.1.2 ! root 2: Left = 185 ! 3: Top = 233 1.1 root 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 1.1.1.2 ! root 15: Position = poDefault 1.1 root 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.