Main.dfm

object Form1: TForm1
  Left = 0
  Top = 0
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'LoRa Serial/Bluetooth Gateway V1.3'
  ClientHeight = 614
  ClientWidth = 606
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 19
  object Label1: TLabel
    Left = 24
    Top = 24
    Width = 79
    Height = 19
    Alignment = taRightJustify
    Caption = 'Serial Port:'
  end
  object Label6: TLabel
    Left = 8
    Top = 120
    Width = 98
    Height = 19
    Alignment = taRightJustify
    Caption = 'Current RSSI:'
  end
  object Label14: TLabel
    Left = 25
    Top = 176
    Width = 78
    Height = 19
    Alignment = taRightJustify
    Caption = 'Frequency:'
  end
  object Label15: TLabel
    Left = 211
    Top = 176
    Width = 30
    Height = 19
    Caption = 'MHz'
  end
  object Label2: TLabel
    Left = 282
    Top = 176
    Width = 44
    Height = 19
    Alignment = taRightJustify
    Caption = 'Mode:'
  end
  object Label3: TLabel
    Left = 270
    Top = 209
    Width = 56
    Height = 19
    Alignment = taRightJustify
    Caption = 'Coding:'
  end
  object Label4: TLabel
    Left = 249
    Top = 242
    Width = 77
    Height = 19
    Alignment = taRightJustify
    Caption = 'Spreading:'
  end
  object Label5: TLabel
    Left = 23
    Top = 209
    Width = 80
    Height = 19
    Alignment = taRightJustify
    Caption = 'Bandwidth:'
  end
  object Label7: TLabel
    Left = 47
    Top = 242
    Width = 56
    Height = 19
    Alignment = taRightJustify
    Caption = 'Header:'
  end
  object Label8: TLabel
    Left = 27
    Top = 295
    Width = 76
    Height = 19
    Alignment = taRightJustify
    Caption = 'Sentences:'
  end
  object Label9: TLabel
    Left = 20
    Top = 328
    Width = 83
    Height = 19
    Alignment = taRightJustify
    Caption = 'Freq. Error:'
  end
  object Label10: TLabel
    Left = 221
    Top = 328
    Width = 90
    Height = 19
    Alignment = taRightJustify
    Caption = 'Packet RSSI:'
  end
  object Label11: TLabel
    Left = 451
    Top = 328
    Width = 36
    Height = 19
    Alignment = taRightJustify
    Caption = 'SNR:'
  end
  object Label12: TLabel
    Left = 42
    Top = 64
    Width = 61
    Height = 19
    Alignment = taRightJustify
    Caption = 'Callsign:'
  end
  object Label13: TLabel
    Left = 266
    Top = 295
    Width = 45
    Height = 19
    Alignment = taRightJustify
    Caption = 'SSDV:'
  end
  object Label16: TLabel
    Left = 425
    Top = 295
    Width = 62
    Height = 19
    Alignment = taRightJustify
    Caption = 'SSDV Q:'
  end
  object lstCommands: TListBox
    Left = 476
    Top = 209
    Width = 121
    Height = 57
    ItemHeight = 19
    TabOrder = 6
    Visible = False
  end
  object ComboBox1: TComboBox
    Left = 120
    Top = 21
    Width = 181
    Height = 27
    Style = csDropDownList
    ItemHeight = 19
    TabOrder = 0
    OnCloseUp = ComboBox1CloseUp
  end
  object pnlCommStatus: TPanel
    Left = 332
    Top = 20
    Width = 265
    Height = 27
    BevelOuter = bvLowered
    Caption = 'Please choose serial port'
    TabOrder = 1
  end
  object pnlRSSI: TPanel
    Left = 120
    Top = 116
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 2
  end
  object btnSet: TButton
    Left = 477
    Top = 174
    Width = 121
    Height = 92
    Caption = 'Set'
    TabOrder = 3
    OnClick = btnSetClick
  end
  object edtFrequency: TEdit
    Left = 120
    Top = 173
    Width = 85
    Height = 27
    TabOrder = 4
    Text = '434.450'
  end
  object Panel1: TPanel
    Left = 13
    Top = 155
    Width = 585
    Height = 5
    BevelOuter = bvLowered
    TabOrder = 5
  end
  object cmbMode: TComboBox
    Left = 332
    Top = 173
    Width = 112
    Height = 27
    ItemHeight = 19
    ItemIndex = 1
    TabOrder = 7
    Text = '1 - Fast'
    Items.Strings = (
      '0 - Slow'
      '1 - Fast'
      '2 - Repeater'
      '3 - Turbo'
      '4 - TurboX'
      '5 - Calling'
      '6 - Uplink'
      '7 - Telnet')
  end
  object Panel2: TPanel
    Left = 8
    Top = 280
    Width = 585
    Height = 5
    BevelOuter = bvLowered
    TabOrder = 8
  end
  object lstPackets: TListBox
    Left = 8
    Top = 368
    Width = 590
    Height = 237
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 18
    ParentFont = False
    TabOrder = 9
  end
  object cmbCoding: TComboBox
    Left = 332
    Top = 206
    Width = 85
    Height = 27
    ItemHeight = 19
    ItemIndex = 0
    TabOrder = 10
    Text = '(default)'
    Items.Strings = (
      '(default)'
      '5'
      '6'
      '7'
      '8')
  end
  object cmbSpreading: TComboBox
    Left = 332
    Top = 239
    Width = 85
    Height = 27
    ItemHeight = 19
    ItemIndex = 0
    TabOrder = 11
    Text = '(default)'
    Items.Strings = (
      '(default)'
      '6'
      '7'
      '8'
      '9'
      '10'
      '11'
      '12')
  end
  object cmbBandwidth: TComboBox
    Left = 120
    Top = 206
    Width = 85
    Height = 27
    ItemHeight = 19
    TabOrder = 12
    Text = '(default)'
    Items.Strings = (
      '(default)'
      '7K8'
      '10K4'
      '15K6'
      '20K8'
      '31K25'
      '42K7'
      '62K5'
      '125K'
      '250K'
      '500K')
  end
  object cmbImplicit: TComboBox
    Left = 120
    Top = 239
    Width = 85
    Height = 27
    ItemHeight = 19
    TabOrder = 13
    Text = '(default)'
    Items.Strings = (
      '(default)'
      'Explicit'
      'Implicit')
  end
  object pblSentenceCount: TPanel
    Left = 120
    Top = 291
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 14
  end
  object pnlFrequencyError: TPanel
    Left = 120
    Top = 324
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 15
  end
  object pnlPacketRSSI: TPanel
    Left = 328
    Top = 324
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 16
  end
  object pnlPacketSNR: TPanel
    Left = 504
    Top = 324
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 17
  end
  object chkOnline: TCheckBox
    Left = 332
    Top = 66
    Width = 225
    Height = 17
    Caption = 'Upload to Habitat'
    TabOrder = 18
  end
  object Panel3: TPanel
    Left = 13
    Top = 105
    Width = 585
    Height = 5
    BevelOuter = bvLowered
    TabOrder = 19
  end
  object edtCallsign: TEdit
    Left = 120
    Top = 61
    Width = 181
    Height = 27
    TabOrder = 20
    Text = 'M0RPI'
  end
  object pnlSSDVCount: TPanel
    Left = 328
    Top = 291
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 21
  end
  object pnlSSDVQueue: TPanel
    Left = 504
    Top = 291
    Width = 89
    Height = 27
    BevelOuter = bvLowered
    TabOrder = 22
  end
  object VaComm1: TVaComm
    Baudrate = br57600
    FlowControl.OutCtsFlow = False
    FlowControl.OutDsrFlow = False
    FlowControl.ControlDtr = dtrEnabled
    FlowControl.ControlRts = rtsEnabled
    FlowControl.XonXoffOut = False
    FlowControl.XonXoffIn = False
    FlowControl.DsrSensitivity = False
    FlowControl.TxContinueOnXoff = False
    DeviceName = 'COM%d'
    OnRxChar = VaComm1RxChar
    Version = '1.5.2.0'
    Left = 304
    Top = 116
  end
  object tmrCommands: TTimer
    Interval = 100
    OnTimer = tmrCommandsTimer
    Left = 492
    Top = 116
  end
  object IdHTTP1: TIdHTTP
    AllowCookies = True
    ProxyParams.BasicAuthentication = False
    ProxyParams.ProxyPort = 0
    Request.ContentLength = -1
    Request.Accept = 'text/html, */*'
    Request.BasicAuthentication = False
    Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
    HTTPOptions = [hoForceEncodeParams]
    Left = 556
    Top = 84
  end
  object tmrScreenUpdates: TTimer
    OnTimer = tmrScreenUpdatesTimer
    Left = 372
    Top = 120
  end
  object IdHTTP2: TIdHTTP
    AllowCookies = True
    ProxyParams.BasicAuthentication = False
    ProxyParams.ProxyPort = 0
    Request.ContentLength = -1
    Request.Accept = 'text/html, */*'
    Request.BasicAuthentication = False
    Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
    HTTPOptions = [hoForceEncodeParams]
    Left = 556
    Top = 140
  end
end