unit1.dfm

ADS-B接收机DIY全套资料

    object ToolButton5: TToolButton
      Left = 92
      Top = 2
      Hint = 'zoom in'
      Caption = 'ToolButton5'
      ImageIndex = 8
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton5Click
    end
    object ToolButton6: TToolButton
      Left = 115
      Top = 2
      Hint = 'zoom out'
      Caption = 'ToolButton6'
      ImageIndex = 10
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton6Click
    end
    object ToolButton8: TToolButton
      Left = 138
      Top = 2
      Width = 8
      Caption = 'ToolButton8'
      ImageIndex = 13
      Style = tbsSeparator
    end
    object ToolButton7: TToolButton
      Left = 146
      Top = 2
      Hint = 'generate osm map'
      Caption = 'ToolButton7'
      ImageIndex = 12
      ParentShowHint = False
      ShowHint = True
      OnClick = OSMmap1Click
    end
    object ToolButton9: TToolButton
      Left = 169
      Top = 2
      Width = 8
      Caption = 'ToolButton9'
      ImageIndex = 13
      Style = tbsSeparator
    end
    object ToolButton10: TToolButton
      Left = 177
      Top = 2
      Hint = 'start and stop server at port 30003'
      Caption = 'ToolButton10'
      ImageIndex = 15
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButton10Click
    end
  end
  object ComPort1: TComPort
    BaudRate = br115200
    Port = 'COM4'
    Parity.Bits = prNone
    StopBits = sbOneStopBit
    DataBits = dbEight
    Events = [evRxChar, evTxEmpty, evRxFlag, evRing, evBreak, evCTS, evDSR, evError, evRLSD, evRx80Full]
    FlowControl.OutCTSFlow = False
    FlowControl.OutDSRFlow = False
    FlowControl.ControlDTR = dtrDisable
    FlowControl.ControlRTS = rtsDisable
    FlowControl.XonXoffOut = False
    FlowControl.XonXoffIn = False
    Timeouts.ReadTotalConstant = 100
    Left = 920
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 16
    OnTimer = Timer1Timer
    Left = 952
  end
  object MainMenu1: TMainMenu
    Left = 984
    object File1: TMenuItem
      Caption = 'File'
      object load1: TMenuItem
        Caption = 'load'
        OnClick = load1Click
      end
      object loaddefault1: TMenuItem
        Caption = 'load default'
        OnClick = loaddefault1Click
      end
      object save1: TMenuItem
        Caption = 'save as..'
        OnClick = save1Click
      end
      object savedef: TMenuItem
        Caption = 'save default'
        OnClick = savedefClick
      end
      object TMenuItem
      end
      object End1: TMenuItem
        Caption = 'End'
        OnClick = End1Click
      end
    end
    object view1: TMenuItem
      Caption = 'View'
      object Aircraft1: TMenuItem
        Caption = 'Aircraft'
        Checked = True
        OnClick = Aircraft1Click
      end
      object Grid1: TMenuItem
        Caption = 'Lat/Long.-Grid'
        Checked = True
        OnClick = Grid1Click
      end
      object Crosshair1: TMenuItem
        Caption = 'Crosshair'
        Checked = True
        OnClick = Crosshair1Click
      end
      object States1: TMenuItem
        Caption = 'States'
        Checked = True
        OnClick = States1Click
      end
      object Statenames1: TMenuItem
        Caption = 'State Names'
        Checked = True
        OnClick = Statenames1Click
      end
      object Towns1: TMenuItem
        Caption = 'Towns'
        Checked = True
        OnClick = Towns1Click
      end
      object detailedmaps1: TMenuItem
        Caption = 'detailed maps only'
        OnClick = detailedmaps1Click
      end
      object Airports1: TMenuItem
        Caption = 'Airports'
        Checked = True
        OnClick = Airports1Click
      end
      object AirportILS1: TMenuItem
        Caption = 'Airport ILS'
        OnClick = AirportILS1Click
      end
      object AirportAltitude1: TMenuItem
        Caption = 'Airport Altitude'
        Checked = True
        OnClick = AirportAltitude1Click
      end
      object RangeCircles1: TMenuItem
        Caption = 'Range Rings'
        OnClick = RangeCircles1Click
      end
      object GroundRADAR1: TMenuItem
        Caption = 'Ground RADAR'
        OnClick = GroundRADAR1Click
      end
      object ATSRoutes1: TMenuItem
        Caption = 'ATS-Routes'
        OnClick = ATSRoutes1Click
      end
      object OSMbackground1: TMenuItem
        Caption = 'OSM-background'
        OnClick = OSMbackground1Click
      end
    end
    object Colors1: TMenuItem
      Caption = 'Colors'
      object Grid2: TMenuItem
        Caption = 'Grid'
        OnClick = Grid2Click
      end
      object Crosshair2: TMenuItem
        Caption = 'Crosshair'
        OnClick = Crosshair2Click
      end
      object Borders1: TMenuItem
        Caption = 'Borders'
        OnClick = Borders1Click
      end
      object Statenames2: TMenuItem
        Caption = 'State names'
        OnClick = Statenames2Click
      end
      object Towns2: TMenuItem
        Caption = 'Towns'
        OnClick = Towns2Click
      end
      object Airports2: TMenuItem
        Caption = 'Airports'
        OnClick = Airports2Click
      end
      object ATSRoutes2: TMenuItem
        Caption = 'ATS-Routes'
        OnClick = ATSRoutes2Click
      end
      object OSmap1: TMenuItem
        Caption = 'Open Street Map'
        object fullcolor1: TMenuItem
          Caption = 'full color'
          GroupIndex = 4
          RadioItem = True
          OnClick = fullcolor1Click
        end
        object pale1: TMenuItem
          Caption = 'lessl color'
          GroupIndex = 4
          RadioItem = True
          OnClick = pale1Click
        end
        object pale2: TMenuItem
          Caption = 'pale'
          Checked = True
          GroupIndex = 4
          RadioItem = True
          OnClick = pale2Click
        end
        object gray1: TMenuItem
          Caption = 'gray'
          GroupIndex = 4
          RadioItem = True
          OnClick = gray1Click
        end
      end
      object GroundRADAR2: TMenuItem
        Caption = 'Ground RADAR'
        OnClick = GroundRADAR2Click
      end
      object rangering1: TMenuItem
        Caption = 'Range Ring'
        OnClick = rangering1Click
      end
    end
    object loadmaps1: TMenuItem
      Caption = 'load Maps'
      object default1: TMenuItem
        Caption = 'default'
        OnClick = default1Click
      end
      object Europewest1: TMenuItem
        Caption = 'Europe West'
        OnClick = load_Eu_west
      end
      object EuropeUK1: TMenuItem
        Caption = 'Europe UK'
        OnClick = load_Eu_UK
      end
      object EuropeNorth1: TMenuItem
        Caption = 'Europe North'
        OnClick = load_Eu_North
      end
      object EuropeSouth1: TMenuItem
        Caption = 'Europe South'
        OnClick = load_Eu_South
      end
      object EuropeEast1: TMenuItem
        Caption = 'Europe East'
        OnClick = load_Eu_East
      end
      object EuropeBalkan1: TMenuItem
        Caption = 'Europe Balkan'
        OnClick = load_Eu_balkan
      end
      object Russia1: TMenuItem
        Caption = 'Russia'
        Enabled = False
        OnClick = load_Russia
      end
      object Afrika1: TMenuItem
        Caption = 'Africa'
        OnClick = Afrika1Click
      end
      object Asiawest1: TMenuItem
        Caption = 'Asia west'
        OnClick = Asiawest1Click
      end
      object Asiacentral1: TMenuItem
        Caption = 'Asia central'
        OnClick = Asiacentral1Click
      end
      object Asia1: TMenuItem
        Caption = 'Asia east'
        OnClick = Asia1Click
      end
      object Antarctika1: TMenuItem
        Caption = 'Antarctika'
        OnClick = Antarctika1Click
      end
      object Northamerica1: TMenuItem
        Caption = 'Northamerica'
        OnClick = Northamerica1Click
      end