|
|
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.