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