home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 5
/
ctrom5b.zip
/
ctrom5b
/
PROGRAM
/
DELPHI
/
LCSIPPT
/
SAMPLES
/
MAINFRM.DFM
/
MAINFRM.txt
Wrap
Text File
|
1995-04-11
|
2KB
|
101 lines
object MainForm: TMainForm
Left = 264
Top = 153
Width = 510
Height = 342
Caption = 'Sample TIPPort program'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
FormStyle = fsMDIForm
Menu = MainMenu
PixelsPerInch = 96
OnCreate = FormCreate
TextHeight = 13
object StatusBar: TPanel
Left = 0
Top = 273
Width = 502
Height = 23
Align = alBottom
Alignment = taLeftJustify
BorderWidth = 2
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Memo1: TMemo
Left = 0
Top = 36
Width = 502
Height = 237
Align = alClient
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
ScrollBars = ssVertical
TabOrder = 1
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 502
Height = 36
Align = alTop
TabOrder = 2
object FName: TEdit
Left = 18
Top = 9
Width = 274
Height = 20
TabOrder = 0
end
object Btn1: TButton
Left = 299
Top = 5
Width = 89
Height = 24
Caption = 'Finger'
TabOrder = 1
OnClick = Btn1Click
end
object Btn2: TButton
Left = 394
Top = 5
Width = 89
Height = 24
Caption = 'Get Time'
TabOrder = 2
OnClick = Btn2Click
end
end
object MainMenu: TMainMenu
Left = 331
Top = 169
object FileMenu: TMenuItem
Caption = '&File'
object FileExitItem: TMenuItem
Caption = 'E&xit'
Hint = 'Exit this application'
OnClick = FileExit
end
end
end
object IPPort1: TIPPort
OnDataAvailable = IPPort1DataAvailable
OnSocketClose = IPPort1SocketClose
OnSocketConnect = IPPort1SocketConnect
OnDataReady = IPPort1DataReady
OnTimeOut = IPPort1TimeOut
LocalPort = '0'
Left = 368
Top = 169
end
end