home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Trailer Life - RV Campground Finder 2001
/
BIN+CUE.zip
/
TLUSAMAPS.bin
/
MAPPRO40.OC_
/
MAPPRO40.OC
/
0
/
RCDATA
/
TQSTREET
/
TQSTREET.txt
Wrap
Text File
|
2000-08-09
|
8KB
|
354 lines
object Qstreet: TQstreet
Left = 103
Top = 49
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Find Street'
ClientHeight = 337
ClientWidth = 406
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnActivate = FormActivate
OnCreate = FormCreate
OnDestroy = FormDestroy
OnDeactivate = FormDeactivate
PixelsPerInch = 96
TextHeight = 13
object Panel3: TPanel
Left = 0
Top = 306
Width = 406
Height = 31
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object BtFind: TButton
Left = 16
Top = 3
Width = 60
Height = 24
Hint = 'Search For Street Name'
Caption = '&Find'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = BtFindClick
end
object BtGoto: TButton
Left = 80
Top = 3
Width = 60
Height = 24
Caption = '&Goto'
TabOrder = 1
OnClick = BtGotoClick
end
object BtQuit: TButton
Left = 144
Top = 3
Width = 60
Height = 24
Hint = 'Exit from Dialog'
Caption = '&Cancel'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = BtQuitClick
end
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 406
Height = 306
Align = alClient
BevelInner = bvRaised
BevelOuter = bvNone
BorderWidth = 4
Caption = 'Panel4'
TabOrder = 0
object pn2: TPanel
Left = 5
Top = 117
Width = 396
Height = 184
Align = alBottom
BevelOuter = bvNone
BorderWidth = 4
Caption = 'pn2'
TabOrder = 2
object lb1: TListBox
Left = 4
Top = 25
Width = 388
Height = 130
Align = alClient
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
IntegralHeight = True
ItemHeight = 16
ParentCtl3D = False
ParentFont = False
Style = lbOwnerDrawFixed
TabOrder = 2
OnClick = lb1Click
OnDblClick = lb1DblClick
OnDrawItem = lb1DrawItem
OnMeasureItem = lb1MeasureItem
end
object hd1: THeader
Left = 4
Top = 4
Width = 388
Height = 21
Align = alTop
Sections.Sections = (
#0'8'#0
#0'87'#0'Street '
#0'44'#0'Block'
#0'107'#0'City,State '
#0'29'#0'Zip'
#0'31'#0'Dist')
TabOrder = 0
OnSizing = hd1Sizing
end
object Panel2: TPanel
Left = 4
Top = 157
Width = 388
Height = 23
Align = alBottom
Alignment = taLeftJustify
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
object Panel1: TPanel
Left = 216
Top = 1
Width = 171
Height = 21
Align = alRight
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 0
object spS1: TSpeedButton
Tag = 1
Left = 42
Top = 0
Width = 41
Height = 20
GroupIndex = 1
Caption = 'Name'
OnClick = SpS3Click
end
object Sps2: TSpeedButton
Tag = 2
Left = 82
Top = 0
Width = 41
Height = 20
GroupIndex = 1
Caption = 'City'
OnClick = SpS3Click
end
object SpS3: TSpeedButton
Tag = 5
Left = 122
Top = 0
Width = 45
Height = 20
GroupIndex = 1
Down = True
Caption = 'Dist'
OnClick = SpS3Click
end
object Label5: TLabel
Left = 0
Top = 3
Width = 37
Height = 13
Caption = 'Sort By:'
end
end
end
end
object GroupBox1: TGroupBox
Left = 316
Top = 8
Width = 77
Height = 105
Caption = ' Constraints '
TabOrder = 1
object Label4: TLabel
Left = 18
Top = 16
Width = 27
Height = 13
Caption = '&Zoom'
FocusControl = cb1
end
object Label2: TLabel
Left = 16
Top = 60
Width = 33
Height = 13
Caption = '&Radius'
end
object cb1: TComboBox
Tag = 3
Left = 12
Top = 32
Width = 49
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'0.1'
'0.2'
'0.5'
'1'
'2')
TabOrder = 0
end
object cb2: TComboBox
Tag = 2
Left = 12
Top = 76
Width = 49
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'2'
'4'
'8'
'10'
'20'
'50')
TabOrder = 1
end
end
object GroupBox2: TGroupBox
Left = 8
Top = 8
Width = 301
Height = 105
Caption = ' Search Info '
TabOrder = 0
object lb2: TLabel
Left = 12
Top = 16
Width = 31
Height = 13
Caption = '&Street:'
FocusControl = Edit1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 188
Top = 16
Width = 25
Height = 13
Caption = 'S&tate'
FocusControl = cb3
end
object lb3: TLabel
Left = 244
Top = 16
Width = 43
Height = 13
Caption = 'Zi&p Code'
FocusControl = Edit3
end
object lb4: TLabel
Left = 12
Top = 56
Width = 96
Height = 13
Caption = 'Cr&oss Street (If Any):'
FocusControl = Edit2
end
object Label6: TLabel
Left = 215
Top = 76
Width = 3
Height = 13
Caption = '.'
end
object Edit1: TEdit
Tag = 1
Left = 12
Top = 32
Width = 169
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnKeyDown = Edit1KeyDown
end
object cb3: TComboBox
Tag = 1
Left = 188
Top = 32
Width = 49
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 1
end
object Edit3: TEdit
Tag = 4
Left = 244
Top = 32
Width = 49
Height = 21
MaxLength = 5
TabOrder = 2
OnExit = Edit3Exit
OnKeyDown = Edit1KeyDown
end
object Edit2: TEdit
Tag = 3
Left = 12
Top = 72
Width = 169
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnKeyDown = Edit1KeyDown
end
end
end
end