|
|
1.1 root 1: object FtpForm: TFtpForm
2: Left = 322
3: Top = 143
4: Width = 350
5: Height = 150
6: Caption = 'FTP Server'
7: Color = clBtnFace
8: DragKind = dkDock
9: DragMode = dmAutomatic
10: Font.Charset = DEFAULT_CHARSET
11: Font.Color = clWindowText
12: Font.Height = -10
13: Font.Name = 'MS Sans Serif'
14: Font.Style = []
15: OldCreateOrder = False
16: OnHide = FormHide
17: OnShow = FormShow
18: PixelsPerInch = 96
19: TextHeight = 13
20: object ToolBar: TToolBar
21: Left = 0
22: Top = 0
23: Width = 342
24: Height = 25
25: Caption = 'ToolBar'
26: EdgeBorders = []
27: EdgeInner = esLowered
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.FtpStart
37: end
38: object StopButton: TToolButton
39: Left = 23
40: Top = 0
41: Action = MainForm.FtpStop
42: end
43: object ToolButton1: TToolButton
44: Left = 46
45: Top = 0
46: Width = 8
47: Caption = 'ToolButton1'
48: ImageIndex = 3
49: Style = tbsSeparator
50: end
51: object ConfigureButton: TToolButton
52: Left = 54
53: Top = 0
54: Action = MainForm.FtpConfigure
55: end
56: object ToolButton2: TToolButton
57: Left = 77
58: Top = 0
59: Width = 8
60: Caption = 'ToolButton2'
61: ImageIndex = 5
62: Style = tbsSeparator
63: end
64: object Status: TStaticText
65: Left = 85
66: Top = 0
67: Width = 150
68: Height = 22
69: Hint = 'FTP Server Status'
70: AutoSize = False
71: BorderStyle = sbsSunken
72: Caption = 'Status'
73: ParentShowHint = False
74: ShowHint = True
75: TabOrder = 0
76: end
77: object ToolButton3: TToolButton
78: Left = 235
79: Top = 0
80: Width = 8
81: Caption = 'ToolButton3'
82: ImageIndex = 6
83: Style = tbsSeparator
84: end
85: object ProgressBar: TProgressBar
86: Left = 243
87: Top = 0
88: Width = 75
89: Height = 22
90: Hint = 'FTP Server Utilization'
91: Min = 0
92: Max = 100
93: Smooth = True
94: Step = 1
95: TabOrder = 1
96: end
97: end
98: object Log: TMemo
99: Left = 0
100: Top = 25
101: Width = 342
102: Height = 98
103: Align = alClient
104: ReadOnly = True
105: ScrollBars = ssBoth
106: TabOrder = 1
107: end
108: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.