|
|
1.1 root 1: object TelnetForm: TTelnetForm
2: Left = 596
3: Top = 341
4: Width = 350
5: Height = 214
6: Caption = 'Telnet Server'
7: Color = clBtnFace
8: UseDockManager = True
9: DragKind = dkDock
10: DragMode = dmAutomatic
11: Font.Charset = DEFAULT_CHARSET
12: Font.Color = clWindowText
13: Font.Height = -14
14: Font.Name = 'MS Sans Serif'
15: Font.Style = []
16: OldCreateOrder = False
17: Position = poDefault
18: OnHide = FormHide
19: PixelsPerInch = 120
20: TextHeight = 16
21: object ToolBar: TToolBar
22: Left = 0
23: Top = 0
24: Width = 342
25: Height = 25
26: Caption = 'ToolBar'
27: EdgeBorders = []
28: Flat = True
29: Images = MainForm.ImageList
30: ParentShowHint = False
31: ShowHint = True
32: TabOrder = 0
33: object StartButton: TToolButton
34: Left = 0
35: Top = 0
36: Action = MainForm.TelnetStart
37: Grouped = True
38: ParentShowHint = False
39: ShowHint = True
40: end
41: object StopButton: TToolButton
42: Left = 23
43: Top = 0
44: Action = MainForm.TelnetStop
45: Grouped = True
46: ParentShowHint = False
47: ShowHint = True
48: end
49: object RecycleButton: TToolButton
50: Left = 46
51: Top = 0
52: Action = MainForm.TelnetRecycle
53: end
54: object ToolButton1: TToolButton
55: Left = 69
56: Top = 0
57: Width = 8
58: Caption = 'ToolButton1'
59: ImageIndex = 1
60: Style = tbsSeparator
61: end
62: object ConfigureButton: TToolButton
63: Left = 77
64: Top = 0
65: Action = MainForm.TelnetConfigure
66: ParentShowHint = False
67: ShowHint = True
68: end
69: object ToolButton2: TToolButton
70: Left = 100
71: Top = 0
72: Width = 8
73: Caption = 'ToolButton2'
74: ImageIndex = 5
75: Style = tbsSeparator
76: end
77: object Status: TStaticText
78: Left = 108
79: Top = 0
80: Width = 150
81: Height = 22
82: Hint = 'Telnet Server Status'
83: Align = alClient
84: AutoSize = False
85: BorderStyle = sbsSunken
86: Caption = 'Down'
87: TabOrder = 0
88: end
89: object ToolButton3: TToolButton
90: Left = 258
91: Top = 0
92: Width = 8
93: Caption = 'ToolButton3'
94: ImageIndex = 6
95: Style = tbsSeparator
96: end
97: object ProgressBar: TProgressBar
98: Left = 266
99: Top = 0
100: Width = 75
101: Height = 22
102: Hint = 'Telnet Server Utilization'
103: Min = 0
104: Max = 100
105: Smooth = True
106: Step = 1
107: TabOrder = 1
108: end
109: end
110: object Log: TMemo
111: Left = 0
112: Top = 25
113: Width = 342
114: Height = 156
115: Align = alClient
116: ReadOnly = True
117: ScrollBars = ssBoth
118: TabOrder = 1
119: end
120: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.