uoption.dfm

这个程序的主要目的是为了提供一个具有通用性的 AVR Bootloader

object frmOption: TfrmOption
  Left = 199
  Top = 119
  BorderStyle = bsDialog
  Caption = 'frmOption'
  ClientHeight = 395
  ClientWidth = 352
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PrintScale = poNone
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pnlpgctOption: TPanel
    Left = 0
    Top = 0
    Width = 352
    Height = 355
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    OnMouseDown = pnlpgctOptionMouseDown
    object pgctOption: TPageControl
      Left = -1
      Top = 0
      Width = 351
      Height = 362
      ActivePage = tsAVR
      HotTrack = True
      Images = frmMain.ilMenu
      TabOrder = 0
      TabStop = False
      object tsAVR: TTabSheet
        Caption = 'AVR'
        ImageIndex = 7
        OnMouseDown = pnlpgctOptionMouseDown
        object lbFlashSize: TLabel
          Left = 24
          Top = 128
          Width = 45
          Height = 13
          Caption = 'FlashSize'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbFlashSizeBytes: TLabel
          Left = 288
          Top = 128
          Width = 25
          Height = 13
          Caption = 'bytes'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbFillUnused: TLabel
          Left = 41
          Top = 170
          Width = 82
          Height = 13
          Caption = 'Fill unused space'
          OnClick = lbFillUnusedClick
        end
        object lbSendRST: TLabel
          Left = 41
          Top = 234
          Width = 65
          Height = 13
          Caption = 'chkSendRST'
          OnClick = lbSendRSTClick
        end
        object lbAutoSize: TLabel
          Left = 41
          Top = 298
          Width = 42
          Height = 13
          Caption = 'AutoSize'
          OnClick = lbAutoSizeClick
        end
        object gpbConnectKey: TGroupBox
          Left = 8
          Top = 8
          Width = 329
          Height = 89
          Caption = 'ConnectKey'
          TabOrder = 0
          TabStop = True
          OnMouseDown = pnlpgctOptionMouseDown
          object rbASC: TRadioButton
            Left = 16
            Top = 28
            Width = 57
            Height = 17
            Caption = 'ASC'
            TabOrder = 0
            TabStop = True
          end
          object rbHEX: TRadioButton
            Left = 16
            Top = 56
            Width = 57
            Height = 17
            Caption = 'HEX'
            TabOrder = 2
            TabStop = True
          end
          object edtKeyASC: TEdit
            Left = 80
            Top = 26
            Width = 233
            Height = 21
            TabOrder = 1
            Text = 'edtKeyASC'
          end
          object edtKeyHEX: TEdit
            Left = 80
            Top = 54
            Width = 233
            Height = 21
            CharCase = ecUpperCase
            TabOrder = 3
            Text = 'EDTKEYHEX'
            OnChange = edtKeyHEXChange
            OnClick = edtKeyHEXClick
          end
        end
        object cbbFlash: TComboBox
          Left = 152
          Top = 124
          Width = 113
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 1
          OnChange = cbbFrameLenChange
          Items.Strings = (
            '2K'
            '4K'
            '8K'
            '16K'
            '32K'
            '64K'
            '128K'
            '256K')
        end
        object chkFillUnused: TCheckBox
          Left = 24
          Top = 168
          Width = 17
          Height = 17
          TabOrder = 2
          OnClick = edtFillUnusedChange
        end
        object edtFillUnused: TEdit
          Left = 40
          Top = 192
          Width = 281
          Height = 21
          CharCase = ecUpperCase
          TabOrder = 3
          Text = 'EDTFILLUNUSED'
          OnChange = edtFillUnusedChange
          OnClick = edtKeyHEXClick
        end
        object edtSendRST: TEdit
          Left = 40
          Top = 256
          Width = 281
          Height = 21
          CharCase = ecUpperCase
          TabOrder = 5
          Text = 'EDIT1'
          OnChange = edtKeyHEXChange
          OnClick = edtKeyHEXClick
        end
        object chkAutoSize: TCheckBox
          Left = 24
          Top = 296
          Width = 17
          Height = 17
          TabOrder = 6
          OnClick = edtFillUnusedChange
        end
        object chkSendRST: TCheckBox
          Left = 24
          Top = 232
          Width = 17
          Height = 17
          TabOrder = 4
        end
      end
      object tsSystem: TTabSheet
        Caption = 'System'
        ImageIndex = 8
        OnMouseDown = pnlpgctOptionMouseDown
        object lbCommProt: TLabel
          Left = 24
          Top = 24
          Width = 39
          Height = 13
          Hint = 'checksum'
          Caption = 'Protocol'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbFrameLen: TLabel
          Left = 24
          Top = 56
          Width = 84
          Height = 13
          Hint = 'BUFFERSIZE'
          Caption = 'Data frame length'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbFrameLenBytes: TLabel
          Left = 288
          Top = 56
          Width = 25
          Height = 13
          Caption = 'bytes'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbBasicTime: TLabel
          Left = 24
          Top = 88
          Width = 88
          Height = 13
          Hint = 'timeclk'
          Caption = 'Basic timer interval'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbBasicTimeMs: TLabel
          Left = 288
          Top = 88
          Width = 13
          Height = 13
          Caption = 'ms'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbMaxConCnt: TLabel
          Left = 24
          Top = 120
          Width = 125
          Height = 13
          Hint = 'TimeOutCnt'
          Caption = 'Maximum connect counter'
          OnMouseDown = pnlpgctOptionMouseDown
        end
        object lbFont: TLabel
          Left = 120
          Top = 286
          Width = 29
          Height = 13
          Caption = 'lbFont'
          OnMouseDown = pnlpgctOptionMouseDown