Chip 2003 February/Chip_2003-02_cd1.bin/tema/windgps/WinDGPS.exe/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1999-02-22 | 5KB | 206 lines

object MainForm: TMainForm
  Left = 459
  Top = 127
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'WinDGPS'
  ClientHeight = 127
  ClientWidth = 302
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 8
    Width = 31
    Height = 13
    Caption = '&Server'
    FocusControl = Server
  end
  object Label2: TLabel
    Left = 152
    Top = 8
    Width = 19
    Height = 13
    Caption = '&Port'
    FocusControl = IPPort
  end
  object Label3: TLabel
    Left = 16
    Top = 56
    Width = 61
    Height = 13
    Caption = 'Data-Monitor'
  end
  object Button1: TButton
    Left = 216
    Top = 22
    Width = 72
    Height = 25
    Caption = 'Connect'
    Default = True
    TabOrder = 0
    OnClick = ConnectMenuItemClick
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 108
    Width = 302
    Height = 19
    Panels = <
      item
        Width = 50
      end
      item
        Width = 70
      end
      item
        Width = 50
      end>
    SimplePanel = False
    SizeGrip = False
  end
  object Server: TEdit
    Left = 16
    Top = 24
    Width = 121
    Height = 21
    TabOrder = 2
    Text = 'dgps.wsrcc.com'
  end
  object IPPort: TFloatEdit
    Left = 152
    Top = 24
    Width = 49
    Height = 21
    MaxLength = 4
    TabOrder = 3
    Text = '2101'
    Precision = 0
    Value = 2101.000000000000000000
    MinValue_ = 0.000000000000000000
  end
  object DataMonitor: TPanel
    Left = 16
    Top = 72
    Width = 273
    Height = 25
    Alignment = taLeftJustify
    BevelInner = bvLowered
    Color = clWindow
    TabOrder = 4
  end
  object MainMenu: TMainMenu
    Left = 200
    Top = 65512
    object FileMenu: TMenuItem
      Caption = '&File'
      object CaptureDGPSDataMenuItem: TMenuItem
        Caption = '&Capture &DGPS Data'
        OnClick = CaptureDGPSDataMenuItemClick
      end
      object CaptureNMEADataMenuItem: TMenuItem
        Caption = 'Capture &NMEA Data'
        OnClick = CaptureNMEADataMenuItemClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object ExitMenuItem: TMenuItem
        Caption = 'E&xit'
        OnClick = ExitMenuItemClick
      end
    end
    object ComPortMenu: TMenuItem
      Caption = '&Com-Port'
      object Com1MenuItem: TMenuItem
        Tag = 1
        Caption = 'COM&1:'
        GroupIndex = 1
        RadioItem = True
        OnClick = ComPortMenuItemClick
      end
      object Com2MenuItem: TMenuItem
        Tag = 2
        Caption = 'COM&2:'
        GroupIndex = 1
        RadioItem = True
        OnClick = ComPortMenuItemClick
      end
      object COM3MenuItem: TMenuItem
        Tag = 3
        Caption = 'COM&3:'
        GroupIndex = 1
        RadioItem = True
        OnClick = ComPortMenuItemClick
      end
      object COM4MenuItem: TMenuItem
        Tag = 4
        Caption = 'COM&4:'
        GroupIndex = 1
        RadioItem = True
        OnClick = ComPortMenuItemClick
      end
      object N1: TMenuItem
        Caption = '-'
        GroupIndex = 1
      end
      object N9600BaudMenuItem: TMenuItem
        Tag = 9600
        Caption = '&9600 Baud'
        GroupIndex = 2
        RadioItem = True
        OnClick = BaudRateClick
      end
      object N4800BaudMenuItem: TMenuItem
        Tag = 4800
        Caption = '4&800 Baud'
        GroupIndex = 2
        RadioItem = True
        OnClick = BaudRateClick
      end
      object N1200BaudMenuItem: TMenuItem
        Tag = 1200
        Caption = '12&00 Baud'
        GroupIndex = 2
        RadioItem = True
        OnClick = BaudRateClick
      end
    end
    object InternetMenu: TMenuItem
      Caption = '&Internet'
      object ConnectMenuItem: TMenuItem
        Caption = '&Connect'
        OnClick = ConnectMenuItemClick
      end
      object DefaultServerMenuItem: TMenuItem
        Caption = 'Default &Server'
        OnClick = DefaultServerMenuItemClick
      end
    end
    object InfoMenu: TMenuItem
      Caption = 'I&nfo'
      OnClick = InfoMenuClick
    end
  end
  object PollTimer: TTimer
    Interval = 100
    OnTimer = PollTimerTimer
    Left = 256
    Top = 65512
  end
  object SaveDialog: TSaveDialog
    Options = [ofOverwritePrompt, ofHideReadOnly, ofFileMustExist, ofNoReadOnlyReturn]
    Left = 88
    Top = 65512
  end
end