object Tbar: TTbar Left = 4 Top = 159 BorderIcons = [] BorderStyle = bsNone Caption = 'Toolbar' ClientHeight = 43 ClientWidth = 571 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ShowHint = True OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 571 Height = 43 Align = alClient BorderWidth = 1 TabOrder = 0 OnResize = Panel1Resize object PTN1: TPanel Left = 2 Top = 18 Width = 567 Height = 23 Align = alBottom BevelOuter = bvNone TabOrder = 0 OnMouseDown = PTN1MouseDown OnResize = PTN1Resize object Panel2: TPanel Left = 376 Top = 0 Width = 71 Height = 23 Align = alRight BevelOuter = bvNone Caption = 'Panel1' TabOrder = 4 object ComboBox4: TComboBox Left = 3 Top = 2 Width = 64 Height = 19 Hint = 'Magnitude' Style = csOwnerDrawFixed Color = clBtnFace Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentCtl3D = False ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 OnChange = ComboBox4Change OnDrawItem = ComboBox4DrawItem end end object pnt2: TPanel Left = 447 Top = 0 Width = 120 Height = 23 Align = alRight BevelInner = bvLowered BevelOuter = bvNone BorderWidth = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object DcPanel1: TDcPanel Left = 24 Top = 0 Width = 148 Height = 23 Align = alLeft BevelOuter = bvNone TabOrder = 1 Edge = edright object spdbtn3: Tspdbtn Tag = 14 Left = 97 Top = 1 Width = 24 Height = 22 Parentwindow = 0 Flat = True Glyph.Data = { 5A010000424D5A01000000000000760000002800000013000000130000000100 040000000000E400000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777000007777778444447777777000007777744444444887777000007778 4444444444887770000077744C444444448287700000774CCCCCC44448788770 000077CCCCCCCCC442788870000078CCCCCCCCC44777287000007CCCCCCCCCCC 2477447000007CCCCCCCCC774444447000007CC2CC7CC76CC444447000007CCC CCFC2777C4444470000077CCCCCCF77774444870000077CCCCCCF77774444770 0000777CCCCCF7787644777000007777CC22777744487770000077777CC7676C 44877770000077777777CC48777777700000777777777777777777700000} OnClick = spdbtn3Click Rep = False Mode = None end object Asp1: Tspdbtn Tag = 1 Left = 0 Top = 1 Width = 23 Height = 22 Hint = 'Zoom In' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000007777777777777708F7000000777777777777708FF70000007777 7777777708FF770000007777778888708FF777000000777780000008FF777700 000077780777777FF8777700000077807777077708777700000077087F770777 80877700000078077FF707777087770000007807F00000007087770000007807 7FF7077770877700000077087FF70777807777000000778077FF077708777700 0000777808777780877777000000777780000008777777000000777777888877 777777000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end object altsp2: Tspdbtn Tag = 2 Left = 23 Top = 1 Width = 23 Height = 22 Hint = 'Zoom Out' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000007777777777777708F7000000777777777777708FF70000007777 7777777708FF770000007777778888708FF777000000777780000008FF777700 000077780777777FF8777700000077807777777708777700000077087F777777 8087770000007807FFF777777087770000007807F00000007087770000007807 FF77777770877700000077087FF77777807777000000778077FF777708777700 0000777808777780877777000000777780000008777777000000777777888877 777777000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end object altsp3: Tspdbtn Tag = 3 Left = 46 Top = 1 Width = 23 Height = 22 Hint = 'Zoom Last' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 5A010000424D5A01000000000000760000002800000013000000130000000100 040000000000E400000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777000007777777777707777777000007777777777090077777000007777 0007709999007770000077709907099999990770000077099907099999999070 0000770999077099009990700000770990077709770990700000770007777770 7770007000007707777777777777007000007700777770777777007000007701 0000010770001070000077011111111077011070000077011111111107010770 0000777011111111070107700000777700001110770077700000777777770107 700777700000777777777077777777700000777777777777777777700000} OnClick = sp2Click Rep = False Mode = None end object Altsp4: Tspdbtn Tag = 4 Left = 69 Top = 1 Width = 28 Height = 22 Hint = 'Zoom USA' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { A6010000424DA601000000000000760000002800000019000000130000000100 0400000000003001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777000000077777777780087777777777770000000777777788070 8877880087777000000077778880077708888080877770000000777000077888 7000087877777000000077777778888887777878877770000000770888888888 8888888088777000000070F8888888888888888708877000000070F888888888 888888887087700000000F8888888888888888887087700000000F8888888888 888888887087700000000F888888888888870F888708700000000FF888888888 88700F8788777000000070F88888888888700F70F8777000000070F888888888 887770F70F80700000000FF8888888888700770770F070000000000FFFFFFFFF 8077777777087000000077000000000000777777777770000000777777777777 77777777777770000000} OnClick = sp2Click Rep = False Mode = None end object AltspG: Tspdbtn Tag = 14 Left = 121 Top = 1 Width = 23 Height = 22 Hint = 'Grid: On/Off' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777776777777 7777077776777777777707007677777777770077767777777777777776777777 7777007076777777777707007677777777770777767777777777770076777777 7777077776777777777766666666666666667777767777777777777776770770 7777777776770707077777777677070707777777767707707707} OnClick = sp2Click Rep = False Mode = None end end object DcPanel2: TDcPanel Left = 172 Top = 0 Width = 120 Height = 23 Align = alLeft BevelOuter = bvNone TabOrder = 2 Edge = edright object altsp6: Tspdbtn Tag = 6 Left = 24 Top = 1 Width = 23 Height = 22 Hint = 'Find Place' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777000000777 777777000000770FFFFFF077777777000000770F0F0FF0777777770000007770 0F00077777777700000077770F07777777777700000077770F07777777777700 000077770F08777777777700000077770F00087777777700000077770F0B3008 77777700000077770F0BBB3008777700000077770F0BBBBB3008770000007777 0F0BBBBBBBB00700000077770F0BBBBBB3008700000077770F0BBBB300877700 000077770F0BB30087777700000077770F030087777777000000777700008777 777777000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end object altsp7: Tspdbtn Tag = 7 Left = 1 Top = 1 Width = 23 Height = 22 Hint = 'Find Street' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000007777777F00877777770000007777777F00877777770000007777 777F08877777770000007777777F00877777770000007777777F008777777700 00007777777F0887777777000000700000000000000007000000702222222222 222207000000F022F22FF222F22207000000F022F2222F22F22207000000F022 F222F222F22207000000F022F22F2222F22207000000F022F222FF2FFF220700 0000F02222222222222207000000F00000000000000007000000FFFFFFFFFFFF FFFF77000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end object sp5: Tspdbtn Tag = 5 Left = 47 Top = 1 Width = 23 Height = 22 Hint = 'Find Area Code' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00707777777777 7777770000007007777777777777770000007770777777777777770000007707 7777777777777700000077700007777777777700000077000000777777777700 000077F000007777777777000000770F00007777777777000000777000077777 7777770000007770000077777777770000007770F00007777777770000007777 0F000077700077000000777770F000070000070000007777770F000000000700 000077777770F0000F00070000007777777700000F0007000000777777777700 000077000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end object altsp8: Tspdbtn Tag = 8 Left = 70 Top = 1 Width = 23 Height = 22 Hint = 'Find Zipcode' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000007777777777777777770000007777777777777777770000007777 7777777777777700000077777777777777777700000070000000000000000700 000070FFFFFFFFFFFFFF0700000070FF0F0FFFFFFFFF0700000070FFFFF0FFFF FFFF0700000070FF0F0F0FFF111F0700000070FFFFFFFFFF111F0700000070FF FFFFFFFF111F0700000070FFFFFFFFFFFFFF0700000070000000000000000700 0000777777777777777777000000777777777777777777000000777777777777 777777000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end object Altsp9: Tspdbtn Tag = 9 Left = 93 Top = 1 Width = 23 Height = 22 Hint = 'Find Lon/Lat' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777777000000777777777777777777000000787FFFFFFFFFFFFFF7000000778F FFFFF0FFFFFF770000007778FFFFF0FFFFF77700000077778888808888777700 0000777777777077777777000000777777777077777777000000777777777077 7777770000007777777700077777770000007777779999999777770000007777 7799999997777700000077777777999777777700000077777777999777777700 0000777777779997777777000000777777779997777777000000777777799999 777777000000777777777777777777000000} OnClick = sp2Click Rep = False Mode = None end end object DcPanel3: TDcPanel Left = 292 Top = 0 Width = 54 Height = 23 Align = alLeft BevelOuter = bvNone TabOrder = 3 Edge = edright object AltspPr: Tspdbtn Tag = 13 Left = 1 Top = 1 Width = 25 Height = 22 Hint = 'Print Map' ShowHint = True ParentShowhint = False Parentwindow = 0 Flat = True Glyph.Data = { 5A010000424D5A01000000000000760000002800000015000000130000000100 040000000000E4000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777770007777777770007777777770007777777007880077777770007777 7007700088007777700077700770078800880077700077077007778888008807 7000778007777788888800077000700777777F8888888800700078F7777FF777 88888880700078F77FF77777778888807000787FF77799777777888070007887 77AA777777077780700077788F777777FF07887770007777788F78FFFFF07777 70007777777888FFFFFF0777700077777777788FFFFFF0077000777777777778 FFF887777000777777777777888777777000777777777777777777777000} OnClick = sp2Click Rep = False Mode = None end object Altspx: Tspdbtn Tag = 10 Left = 26 Top = 1 Width = 25 Height = 22 Hint = 'Find Route' Parentwindow = 0 Flat = True Glyph.Data = { 06010000424D06010000000000007600000028000000120000000C0000000100 0400000000009000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000000B000000FF000000B30000000B30000000000003B000000070B0 0000FF00000B3700000070B30000FF00003B07000000770B0000000000B37700 0000770B3000000000B0770000007770B000FF000B37770000007770B300FF00 3B077700000077770B000000B3777700000077770B300003B077770000007777 70B0FF0B377777000000} OnClick = sp2Click Rep = False Mode = None end end object DPanel1: TDPanel Left = 0 Top = 0 Width = 24 Height = 23 Align = alLeft BevelOuter = bvNone Caption = 'DPanel1' TabOrder = 5 OnMouseDown = DPanel1MouseDown OnMouseMove = DPanel1MouseMove OnMouseUp = DPanel1MouseUp end object Panel4: TPanel Left = 346 Top = 0 Width = 27 Height = 23 Align = alLeft BevelOuter = bvNone TabOrder = 6 object spdhelp: Tspdbtn Left = 1 Top = 1 Width = 24 Height = 22 Hint = 'About MapPro' Parentwindow = 0 Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000007777777777770777770000007777777777700777770000007777 8888880B0877770000007770000000FF008777000000770FFFBFBFBFFF087700 0000770FBFFF44FFBF0877000000770FFFBFFFBFFF0877000000770FBFFF48FF BF0877000000770FFFBF847FFF0877000000770FBFFFB848BF0877000000770F FF48FF44FF0877000000770FBF44B744BF0877000000770FFF744447FF087700 0000770FBFFFBFFFBF0877000000770FFFBFFFBFFF0777000000777000000000 007777000000777777777777777777000000} OnClick = spdhelpClick Rep = False Mode = None end end end object Panel3: TPanel Left = 2 Top = 2 Width = 567 Height = 16 Align = alTop Alignment = taLeftJustify BevelOuter = bvNone Caption = ' Toolbar' Color = clActiveCaption Ctl3D = True Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 1 OnDblClick = Label1DblClick OnMouseDown = DPanel1MouseDown OnMouseMove = DPanel1MouseMove OnMouseUp = DPanel1MouseUp object SpAnchor: TSpeedButton Tag = 255 Left = 460 Top = 0 Width = 18 Height = 15 Glyph.Data = { BE000000424DBE0000000000000076000000280000000C000000090000000100 0400000000004800000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777000000777 0000780000000087000080877007780800000777700777700000777770077777 0000777780087777000077770770777700007777077077770000777780087777 0000} OnClick = AnchorClick end object spClose: TSpeedButton Tag = 255 Left = 480 Top = 0 Width = 18 Height = 15 Glyph.Data = { 92000000424D9200000000000000760000002800000007000000070000000100 0400000000001C00000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777700077 70007007007077000770770007707007007000777000} OnClick = Close1Click end end end object PopupMenu1: TPopupMenu OnPopup = PopupMenu1Popup Left = 502 Top = 2 object Uanchor: TMenuItem Caption = '&Unanchor' OnClick = UanchorClick end object Anchor: TMenuItem Caption = '&Anchor' OnClick = AnchorClick end object Close1: TMenuItem Caption = '&Close' OnClick = Close1Click end end end