gpspr.dfm

gps参数计算

object Form1: TForm1
  Left = 493
  Top = 264
  Hint = #30005#35805':0771-2263384;e-mail:[e-mail]'
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #25163#25345'GPS'#22352#26631#31995#32479#36716#25442#21442#25968#27714#35299#31243#24207
  ClientHeight = 256
  ClientWidth = 281
  Color = 16039822
  Font.Charset = ANSI_CHARSET
  Font.Color = clBlue
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF009999
    99999999999999999999999999999EEDDDDDEEEEEEEEEDDDDEEDDDDEEDD99EED
    EEEEDDDDEEEEEDEEEDDEEDEDDEE99EEDEEEEEEEDDDEEEDEEEEEEEDEEEEE99EEE
    DDDDEEEEEDEEEEDEEEEEDDEEEED99EDDEEEEDDEEEDDDEDEEEEEEDDEEEDD99DEE
    DDDDEEDDDEEDEDEEEDEEEDEEEDE99DEEDEEEDDEDEEEDEDEEEEEEEDEEEDE99EDE
    EDDDEEDEEDDEEDDDDDDDDDEEEED99DEEEEEEDDEEEEEDEDEEEEDEDDEDEED99DEE
    EEEEEEEEEEEDEDEEEEEEEDEDEED99EDDDDDEEDDDDDDDEDEEEEEEEDEEEED99EDE
    EEEDDDEEEEDEEDDDDDDDEDEEEEE99EEDEEEEEEEEEEDEEDEEDDEEDDEEEEE99EEE
    DEEEDDEEEDEEEDEDEEDEEDEEDDD99EEEEDDDDDDDDEEEEEDEDDDDDDDDDEE99EEE
    EEEEEEEECCCCCEEEEEEEEEEEEEE99EEEEEEEEEEECEEECEEEEEEEEEEEEEE99EEE
    EEEEEEEECEEECCEEEEEEEEEEEEE99EEEEECCCCCECEEECECEECCCCCEEEEE99EEE
    ECCEEECCCEEECEECECEEECCEEEE99EEECEEEEEEECEEECEEECCEEEECCEEE99EEE
    CEECCEEECEEECCEECCCCEEECEEE99EECEECCEEEECEEECCEECCECEEECEEE99EEC
    EECCEEECCEEEEEEECECEEEECEEE99EECEECCCCCCECEEEEECCECEEECCEEE99EEC
    EEECCCCEECCEEECCEECEEECCEEE99EECCEEEEECEEECCCCCEEECEEEECEEE99EEE
    CEEEEECEEEEEEEEEEECCEEECEEE99EEEECEEEECEEEEEEEEEEEECEEECEEE99EEE
    EECCCCCEEEEEEEEEEEEECCCCEEE9999999999999999999999999999999990000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  OldCreateOrder = False
  ShowHint = True
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 16
    Top = 64
    Width = 49
    Height = 14
    Caption = #32463'  '#24230':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 16
    Top = 88
    Width = 49
    Height = 14
    Caption = #32428'  '#24230':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 16
    Top = 112
    Width = 49
    Height = 14
    Caption = #39640'  '#31243':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 152
    Top = 64
    Width = 49
    Height = 14
    Caption = #32463'  '#24230':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 152
    Top = 88
    Width = 49
    Height = 14
    Caption = #32428'  '#24230':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 152
    Top = 112
    Width = 49
    Height = 14
    Caption = #39640'  '#31243':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 96
    Top = 136
    Width = 105
    Height = 14
    Caption = #35813#22320#39640#31243#24322#24120#20540':'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 16
    Top = 24
    Width = 70
    Height = 14
    Caption = '1.GPS'#22352#26631':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 152
    Top = 24
    Width = 105
    Height = 14
    Caption = '2.'#29992#25143#22320#22270#22352#26631':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 4
    Top = 192
    Width = 21
    Height = 14
    Caption = 'DX:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 96
    Top = 192
    Width = 21
    Height = 14
    Caption = 'DY:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 4
    Top = 216
    Width = 21
    Height = 14
    Caption = 'DA:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel
    Left = 96
    Top = 216
    Width = 21
    Height = 14
    Caption = 'DF:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label15: TLabel
    Left = 192
    Top = 192
    Width = 21
    Height = 14
    Caption = 'DZ:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object EBw: TEdit
    Left = 64
    Top = 64
    Width = 65
    Height = 18
    Hint = #36755#20837#32463#24230#22352#26631#65292#22914'108'#176'12'#8217'15'#8217#8217#24212#36755#20837'108.1215'#12290
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
  end
  object ELw: TEdit
    Left = 64
    Top = 88
    Width = 65
    Height = 18
    Hint = #36755#20837#32428#24230#22352#26631#65292#22914'28'#176'12'#8217'15'#8217#8217#24212#36755#20837'28.1215'#12290
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
  end
  object EHw: TEdit
    Left = 64
    Top = 112
    Width = 65
    Height = 18
    Hint = #35831#36755#20837'WGS'#39640#31243
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
  end
  object EBg: TEdit
    Left = 200
    Top = 64
    Width = 65
    Height = 18
    Hint = #36755#20837#32463#24230#22352#26631#65292#22914'108'#176'12'#8217'15'#8217#8217#24212#36755#20837'108.1215'#12290
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
  end
  object ELg: TEdit
    Left = 200
    Top = 88
    Width = 65
    Height = 18
    Hint = #36755#20837#32428#24230#22352#26631#65292#22914'28'#176'12'#8217'15'#8217#8217#24212#36755#20837'28.1215'#12290
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 6
  end
  object EHg: TEdit
    Left = 200
    Top = 112
    Width = 65
    Height = 18
    Hint = #35831#36755#20837#25105#22269#39640#31243#31995#32479#30340#35813#28857#39640#31243#20540
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 7
  end
  object EDX: TEdit
    Left = 24
    Top = 192
    Width = 65
    Height = 18
    Hint = 'DX'#21442#25968
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 10
  end
  object EDY: TEdit
    Left = 116
    Top = 192
    Width = 65
    Height = 18
    Hint = 'DY'#21442#25968
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 11
  end
  object Ehy: TEdit
    Left = 200
    Top = 136
    Width = 65
    Height = 18
    Hint = #35831#36755#20837#35813#28857#39640#31243#24322#24120#20540
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 8
    Text = '0'
  end
  object ComboBoxGPS: TComboBox
    Left = 16
    Top = 40
    Width = 113
    Height = 22
    BevelInner = bvSpace
    BevelOuter = bvNone
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 14
    ItemIndex = 1
    ParentFont = False
    TabOrder = 0
    Text = 'WGS84'#22352#26631#31995
    Items.Strings = (
      'WGS72'#22352#26631#31995
      'WGS84'#22352#26631#31995)
  end
  object ComboBoxGS: TComboBox
    Left = 152
    Top = 40
    Width = 113
    Height = 22
    BevelInner = bvSpace
    BevelOuter = bvNone
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 14
    ItemIndex = 1
    ParentFont = False
    TabOrder = 1
    Text = #35199#23433'80'#22352#26631#31995
    Items.Strings = (
      #21271#20140'54'#22352#26631#31995
      #35199#23433'80'#22352#26631#31995)
  end
  object StartDo: TBitBtn
    Left = 104
    Top = 158
    Width = 75
    Height = 25
    Caption = #24320#22987#35745#31639
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    OnClick = StartDoClick
  end
  object EDZ: TEdit
    Left = 212
    Top = 192
    Width = 65
    Height = 18
    Hint = 'DZ'#21442#25968
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 12
  end
  object EDA: TEdit
    Left = 24
    Top = 216
    Width = 65
    Height = 18
    Hint = 'DA'#21442#25968
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 13
  end
  object EDF: TEdit
    Left = 116
    Top = 216
    Width = 160
    Height = 18
    Hint = 'DF'#21442#25968
    AutoSize = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 14
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 281
    Height = 21
    Align = alTop
    Caption = 'Panel1'
    Color = 16039822
    TabOrder = 15
    object Label1: TLabel
      Left = 40
      Top = 1
      Width = 200
      Height = 19
      Caption = #25628#38598#24037#20316#21306#22495#26576#28857#22352#26631
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -19
      Font.Name = #38582#20070
      Font.Style = []
      ParentFont = False
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 236
    Width = 281
    Height = 20
    Align = alBottom
    Caption = #32534#31243#35774#35745':'#21016#21319#24179' (C)2005'#24180'3'#26376'-'
    Color = 16039822
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -14
    Font.Name = #40657#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 16
  end
end