|
|
1.1 root 1: object WebForm: TWebForm
2: Left = 548
3: Top = 684
4: Width = 462
5: Height = 229
6: Caption = 'Web Server'
7: Color = clBtnFace
8: DragKind = dkDock
9: DragMode = dmAutomatic
10: Font.Charset = DEFAULT_CHARSET
11: Font.Color = clWindowText
12: Font.Height = -14
13: Font.Name = 'MS Sans Serif'
14: Font.Style = []
15: OldCreateOrder = False
16: PixelsPerInch = 120
17: TextHeight = 16
18: object ToolBar: TToolBar
19: Left = 0
20: Top = 0
21: Width = 454
22: Height = 25
23: Caption = 'ToolBar'
24: EdgeBorders = []
25: Flat = True
26: Images = MainForm.ImageList
27: ParentShowHint = False
28: ShowHint = True
29: TabOrder = 0
30: object StartButton: TToolButton
31: Left = 0
32: Top = 0
33: Action = MainForm.WebStart
34: Grouped = True
35: ParentShowHint = False
36: ShowHint = True
37: end
1.1.1.2 ! root 38: object LogPauseButton: TToolButton
1.1 root 39: Left = 23
40: Top = 0
1.1.1.2 ! root 41: Action = MainForm.WebPause
! 42: Style = tbsCheck
! 43: end
! 44: object StopButton: TToolButton
! 45: Left = 46
! 46: Top = 0
1.1 root 47: Action = MainForm.WebStop
48: Grouped = True
49: ParentShowHint = False
50: ShowHint = True
51: end
52: object RecycleButton: TToolButton
1.1.1.2 ! root 53: Left = 69
1.1 root 54: Top = 0
55: Action = MainForm.WebRecycle
56: end
57: object ToolButton1: TToolButton
1.1.1.2 ! root 58: Left = 92
1.1 root 59: Top = 0
60: Width = 8
61: Caption = 'ToolButton1'
62: ImageIndex = 1
63: Style = tbsSeparator
64: end
65: object ConfigureButton: TToolButton
1.1.1.2 ! root 66: Left = 100
1.1 root 67: Top = 0
68: Action = MainForm.WebConfigure
69: ParentShowHint = False
70: ShowHint = True
71: end
72: object ToolButton2: TToolButton
1.1.1.2 ! root 73: Left = 123
1.1 root 74: Top = 0
75: Width = 8
76: Caption = 'ToolButton2'
77: ImageIndex = 5
78: Style = tbsSeparator
79: end
80: object Status: TStaticText
1.1.1.2 ! root 81: Left = 131
1.1 root 82: Top = 0
83: Width = 150
84: Height = 22
85: Hint = 'Web Server Status'
86: Align = alClient
87: AutoSize = False
88: BorderStyle = sbsSunken
89: Caption = 'Down'
90: TabOrder = 0
91: end
92: object ToolButton3: TToolButton
1.1.1.2 ! root 93: Left = 281
1.1 root 94: Top = 0
95: Width = 8
96: Caption = 'ToolButton3'
97: ImageIndex = 6
98: Style = tbsSeparator
99: end
100: object ProgressBar: TProgressBar
1.1.1.2 ! root 101: Left = 289
1.1 root 102: Top = 0
103: Width = 75
104: Height = 22
105: Hint = 'Web Server Utilization'
106: Min = 0
107: Max = 100
108: Smooth = True
109: Step = 1
110: TabOrder = 1
111: end
1.1.1.2 ! root 112: object ToolButton4: TToolButton
! 113: Left = 364
! 114: Top = 0
! 115: Width = 8
! 116: Caption = 'ToolButton4'
! 117: ImageIndex = 7
! 118: Style = tbsSeparator
! 119: end
! 120: object LogLevelText: TStaticText
! 121: Left = 372
! 122: Top = 0
! 123: Width = 75
! 124: Height = 22
! 125: Hint = 'Log Level'
! 126: AutoSize = False
! 127: BorderStyle = sbsSunken
! 128: TabOrder = 2
! 129: end
! 130: object LogLevelUpDown: TUpDown
! 131: Left = 447
! 132: Top = 0
! 133: Width = 16
! 134: Height = 22
! 135: Hint = 'Log Level Adjustment'
! 136: Min = 0
! 137: Max = 7
! 138: Position = 0
! 139: TabOrder = 3
! 140: Wrap = False
! 141: OnChangingEx = LogLevelUpDownChangingEx
! 142: end
1.1 root 143: end
1.1.1.2 ! root 144: object Log: TRichEdit
1.1 root 145: Left = 0
146: Top = 25
147: Width = 454
148: Height = 171
149: Align = alClient
1.1.1.2 ! root 150: Font.Charset = DEFAULT_CHARSET
! 151: Font.Color = clWindowText
! 152: Font.Height = -14
! 153: Font.Name = 'MS Sans Serif'
! 154: Font.Style = []
! 155: HideScrollBars = False
! 156: ParentFont = False
1.1 root 157: ReadOnly = True
158: ScrollBars = ssBoth
159: TabOrder = 1
1.1.1.2 ! root 160: WordWrap = False
1.1 root 161: end
162: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.