home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Trailer Life - RV Campground Finder 2001
/
BIN+CUE.zip
/
TLUSAMAPS.bin
/
MAPPRO40.OC_
/
MAPPRO40.OC
/
0
/
RCDATA
/
TPCODE
/
TPCODE.txt
Wrap
Text File
|
2000-08-09
|
4KB
|
177 lines
object Pcode: TPcode
Left = 137
Top = 80
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Locate Postal Code'
ClientHeight = 308
ClientWidth = 247
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnActivate = FormActivate
OnCreate = FormCreate
OnDeactivate = FormDeactivate
PixelsPerInch = 96
TextHeight = 13
object Panel3: TPanel
Left = 0
Top = 278
Width = 247
Height = 30
Align = alBottom
BevelOuter = bvNone
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
object Button1: TButton
Left = 12
Top = 2
Width = 60
Height = 24
Caption = '&Find'
Default = True
TabOrder = 0
OnClick = Button1Click
end
object Button3: TButton
Left = 76
Top = 2
Width = 60
Height = 24
Caption = '&Goto'
TabOrder = 1
OnClick = Button3Click
end
object Button2: TButton
Left = 140
Top = 2
Width = 60
Height = 24
Caption = '&Cancel'
TabOrder = 2
OnClick = Button2Click
end
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 247
Height = 278
Align = alClient
BevelInner = bvRaised
BevelOuter = bvNone
BorderWidth = 4
TabOrder = 1
object Bevel1: TBevel
Left = 5
Top = 5
Width = 237
Height = 50
Align = alTop
Shape = bsFrame
end
object Label14: TLabel
Left = 12
Top = 12
Width = 60
Height = 13
Caption = '&Postal Code:'
FocusControl = Edit1
end
object Label1: TLabel
Left = 100
Top = 12
Width = 30
Height = 13
Caption = 'Z&oom:'
FocusControl = cb1
end
object Edit1: TEdit
Left = 12
Top = 28
Width = 61
Height = 21
MaxLength = 5
TabOrder = 0
Text = 'T8A 2B9'
end
object cb1: TComboBox
Left = 100
Top = 28
Width = 57
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'0.1'
'0.5'
'1'
'2'
'5'
'10')
TabOrder = 1
end
object Panel1: TPanel
Left = 5
Top = 55
Width = 237
Height = 218
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel1'
TabOrder = 2
object Header1: THeader
Left = 2
Top = 2
Width = 233
Height = 25
Align = alTop
BorderStyle = bsNone
Sections.Sections = (
#0'65'#0'Postal Code'
#0'30'#0'City'
#0'50'#0'Province')
TabOrder = 0
OnSizing = Header1Sizing
end
object Lb1: TListBox
Left = 2
Top = 27
Width = 233
Height = 161
Align = alClient
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
ParentCtl3D = False
ParentFont = False
Style = lbOwnerDrawFixed
TabOrder = 2
OnClick = Lb1Click
OnDblClick = Lb1DblClick
OnDrawItem = Lb1DrawItem
end
object Panel2: TPanel
Left = 2
Top = 188
Width = 233
Height = 28
Align = alBottom
Alignment = taLeftJustify
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 3
TabOrder = 1
end
end
end
end