gpstestu.dfm

根据水潭改编

object Form1: TForm1
  Left = 258
  Top = 119
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsToolWindow
  Caption = 'GPS'#23548#33322#36719#20214#35774#35745
  ClientHeight = 402
  ClientWidth = 674
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 382
    Width = 674
    Height = 20
    DragMode = dmAutomatic
    Panels = <
      item
        Text = #31995#32479#25552#31034':'
        Width = 60
      end
      item
        Width = 260
      end
      item
        Width = 188
      end
      item
        Width = 92
      end
      item
        Width = 89
      end>
  end
  object PageControl1: TPageControl
    Left = 176
    Top = 8
    Width = 489
    Height = 369
    ActivePage = TabSheet1
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #19978#28023#22320#22270
      object Map1: TMap
        Left = 0
        Top = 0
        Width = 481
        Height = 337
        ParentColor = False
        TabOrder = 0
        OnMouseDown = Map1MouseDown
        ControlData = {
          00000200B6310000D4220000E1000000FFFFFF00000001000001102700000100
          00000000000000000000000000000000FFFFFF0000270100000500FFFF01000D
          00434175746F4D61704C6179657217443A5C70726F6A6563745C6D6170646174
          615C30323031000000000672697665726C0000FF020300010000000100000006
          72697665726C018017443A5C70726F6A6563745C6D6170646174615C30323031
          00000000047261696CAAA47C0203000100000001000000047261696C01801744
          3A5C70726F6A6563745C6D6170646174615C3032303100000000047061726B76
          FB750205000000000001000000047061726B018017443A5C70726F6A6563745C
          6D6170646174615C303230310000000005626F756E6400FF0002050000000000
          0100000005626F756E64018017443A5C70726F6A6563745C6D6170646174615C
          303230310000000004726F61647B877A020300010000000100000004726F6164}
      end
      object BitBtn7: TBitBtn
        Left = 8
        Top = 8
        Width = 49
        Height = 25
        Caption = 'full'
        TabOrder = 1
        OnClick = BitBtn7Click
      end
      object BitBtn8: TBitBtn
        Left = 8
        Top = 40
        Width = 49
        Height = 25
        Caption = 'zoomout'
        TabOrder = 2
        OnClick = BitBtn8Click
      end
      object BitBtn9: TBitBtn
        Left = 8
        Top = 72
        Width = 49
        Height = 25
        Caption = 'zoomin'
        TabOrder = 3
        OnClick = BitBtn9Click
      end
      object WebLink1: TWebLink
        Left = 64
        Top = 8
        Width = 28
        Height = 28
        ControlData = {00000100E5020000E5020000000000000000000000}
      end
    end
    object TabSheet2: TTabSheet
      Caption = #23450#20301#20449#24687
      ImageIndex = 1
      object Memo1: TMemo
        Left = 0
        Top = 8
        Width = 481
        Height = 97
        Lines.Strings = (
          #35831#31245#21518'...')
        ScrollBars = ssBoth
        TabOrder = 0
      end
      object StringGrid1: TStringGrid
        Left = 0
        Top = 96
        Width = 481
        Height = 113
        RowCount = 2
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSizing, goEditing, goAlwaysShowEditor]
        TabOrder = 1
        ColWidths = (
          64
          105
          114
          98
          133)
      end
      object GroupBox4: TGroupBox
        Left = 0
        Top = 216
        Width = 481
        Height = 121
        Caption = #20854#20182#20449#24687
        TabOrder = 2
        object Label8: TLabel
          Left = 32
          Top = 23
          Width = 33
          Height = 13
          AutoSize = False
          Caption = #36895#24230
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label22: TLabel
          Left = 320
          Top = 47
          Width = 81
          Height = 13
          AutoSize = False
          Caption = #26368#22823#36317#31163
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label12: TLabel
          Left = 184
          Top = 23
          Width = 27
          Height = 13
          Caption = #29366#24577
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label15: TLabel
          Left = 8
          Top = 71
          Width = 105
          Height = 13
          AutoSize = False
          Caption = #19996#32463#26368#22823#20540
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label16: TLabel
          Left = 176
          Top = 71
          Width = 81
          Height = 13
          AutoSize = False
          Caption = #26368#23567#20540
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label17: TLabel
          Left = 320
          Top = 71
          Width = 81
          Height = 13
          AutoSize = False
          Caption = #26368#22823#38388#36317
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label18: TLabel
          Left = 8
          Top = 95
          Width = 105
          Height = 13
          AutoSize = False
          Caption = #21271#32428#26368#22823#20540
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label19: TLabel
          Left = 176
          Top = 95
          Width = 73
          Height = 13
          AutoSize = False
          Caption = #26368#23567#20540
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label20: TLabel
          Left = 320
          Top = 95
          Width = 73
          Height = 13
          AutoSize = False
          Caption = #26368#22823#38388#36317
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label21: TLabel
          Left = 24
          Top = 47
          Width = 57
          Height = 13
          AutoSize = False
          Caption = #26102#38388#24046
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label23: TLabel
          Left = 184
          Top = 47
          Width = 33
          Height = 13
          AutoSize = False
          Caption = #26041#21521
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Edit3: TEdit
          Left = 88
          Top = 20
          Width = 81
          Height = 21
          TabOrder = 0
          Text = #31561#24453#25509#25910'...'
        end
        object Edit16: TEdit
          Left = 384
          Top = 44
          Width = 89
          Height = 21
          TabOrder = 1
          Text = #31561#24453#25509#25910'...'
        end
        object Edit7: TEdit
          Left = 224
          Top = 20
          Width = 89
          Height = 21
          TabOrder = 2
          Text = #31561#24453#25509#25910'...'
        end
        object Edit9: TEdit
          Left = 88
          Top = 68
          Width = 81
          Height = 21
          TabOrder = 3