home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2005 June
/
ccd0605.iso
/
Software
/
Shareware
/
Comunicatii
/
xns
/
xns53p_setup.exe
/
xns5.exe
/
0
/
RCDATA
/
TFRMWEBSERV
/
TFRMWEBSERV.txt
Wrap
Text File
|
2005-05-02
|
3KB
|
116 lines
object frmWebServ: TfrmWebServ
Left = 296
Top = 253
BorderStyle = bsSingle
Caption = 'XNS Webserver'
ClientHeight = 192
ClientWidth = 412
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
KeyPreview = True
Menu = MainMenu1
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
OnKeyPress = FormKeyPress
PixelsPerInch = 96
TextHeight = 13
object Memo1: TMemo
Left = 0
Top = 0
Width = 412
Height = 149
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
OnChange = Memo1Change
end
object stat: TStatusBar
Left = 0
Top = 173
Width = 412
Height = 19
Panels = <>
SimplePanel = True
end
object Panel1: TPanel
Left = 0
Top = 149
Width = 412
Height = 24
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object Label1: TLabel
Left = 8
Top = 6
Width = 121
Height = 13
Caption = 'Server is not running.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 248
Top = 6
Width = 60
Height = 13
Caption = '0 requests'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
end
object wserve: TIdHTTPServer
OnStatus = wserveStatus
Bindings = <>
CommandHandlers = <>
DefaultPort = 11131
Greeting.NumericCode = 0
MaxConnectionReply.NumericCode = 0
ReplyExceptionCode = 0
ReplyTexts = <>
ReplyUnknownCommand.NumericCode = 0
AutoStartSession = True
ServerSoftware = 'X-NetStat 5.0 Professional'
SessionTimeOut = 1200000
OnCommandGet = wserveCommandGet
Left = 328
Top = 136
end
object MainMenu1: TMainMenu
Left = 88
Top = 8
object StopServer1: TMenuItem
Caption = 'Stop Server'
OnClick = StopServer1Click
end
object ShowReport1: TMenuItem
Caption = 'Show Report'
OnClick = ShowReport1Click
end
object HideThisWindow1: TMenuItem
Caption = 'Hide This Window'
OnClick = HideThisWindow1Click
end
end
end