uautocode.dfm

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

          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          MaxLength = 1
          TabOrder = 1
          Items.Strings = (
            '0'
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7')
        end
      end
      object Panel1: TPanel
        Left = 16
        Top = 100
        Width = 58
        Height = 17
        AutoSize = True
        BevelOuter = bvNone
        TabOrder = 2
        object lbLEDEn: TLabel
          Left = 18
          Top = 2
          Width = 40
          Height = 13
          Caption = 'LEDEn'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          Transparent = True
          OnClick = lbLEDEnClick
        end
        object chkLED: TCheckBox
          Left = 0
          Top = 0
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 0
          OnClick = chkLEDClick
        end
      end
      object Panel2: TPanel
        Left = 16
        Top = 4
        Width = 101
        Height = 17
        AutoSize = True
        BevelOuter = bvNone
        TabOrder = 3
        object lbRS485En: TLabel
          Left = 18
          Top = 2
          Width = 83
          Height = 13
          Caption = 'RS485/RS422'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          Transparent = True
          OnClick = lbRS485EnClick
        end
        object chkRS485En: TCheckBox
          Left = 0
          Top = 0
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 0
        end
      end
      object GroupBox3: TGroupBox
        Left = 8
        Top = 200
        Width = 137
        Height = 113
        TabOrder = 4
        OnMouseDown = FormMouseDown
        object lbBOOTPORT: TLabel
          Left = 16
          Top = 28
          Width = 19
          Height = 13
          Caption = 'Port'
          Transparent = True
          OnMouseDown = FormMouseDown
        end
        object lbBOOTPIN: TLabel
          Left = 16
          Top = 56
          Width = 15
          Height = 13
          Caption = 'Pin'
          Transparent = True
          OnMouseDown = FormMouseDown
        end
        object lbBOOTLEVEL: TLabel
          Left = 16
          Top = 84
          Width = 26
          Height = 13
          Caption = 'Level'
          Transparent = True
          OnMouseDown = FormMouseDown
        end
        object cbbPortLevel: TComboBox
          Left = 72
          Top = 24
          Width = 49
          Height = 21
          ItemHeight = 13
          MaxLength = 1
          TabOrder = 0
          Text = 'D'
          Items.Strings = (
            'A'
            'B'
            'C'
            'D'
            'E'
            'F'
            'G')
        end
        object cbbPINLevel: TComboBox
          Left = 72
          Top = 52
          Width = 49
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          MaxLength = 1
          TabOrder = 1
          Items.Strings = (
            '0'
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7')
        end
        object cbbBootLevel: TComboBox
          Left = 72
          Top = 80
          Width = 49
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 2
          Text = 'Low'
          Items.Strings = (
            'Low'
            'High')
        end
      end
      object Panel3: TPanel
        Left = 112
        Top = 100
        Width = 16
        Height = 16
        AutoSize = True
        BevelOuter = bvNone
        TabOrder = 5
        object imgLED: TImage
          Left = 0
          Top = 0
          Width = 16
          Height = 16
          AutoSize = True
          Picture.Data = {
            07544269746D617036050000424D360500000000000036040000280000001000
            000010000000010008000000000000010000E30E0000E30E0000000100000000
            000000000000330000006600000099000000CC000000FF000000003300003333
            00006633000099330000CC330000FF3300000066000033660000666600009966
            0000CC660000FF66000000990000339900006699000099990000CC990000FF99
            000000CC000033CC000066CC000099CC0000CCCC0000FFCC000000FF000033FF
            000066FF000099FF0000CCFF0000FFFF00000000330033003300660033009900
            3300CC003300FF00330000333300333333006633330099333300CC333300FF33
            330000663300336633006666330099663300CC663300FF663300009933003399
            33006699330099993300CC993300FF99330000CC330033CC330066CC330099CC
            3300CCCC3300FFCC330000FF330033FF330066FF330099FF3300CCFF3300FFFF
            330000006600330066006600660099006600CC006600FF006600003366003333
            66006633660099336600CC336600FF3366000066660033666600666666009966
            6600CC666600FF66660000996600339966006699660099996600CC996600FF99
            660000CC660033CC660066CC660099CC6600CCCC6600FFCC660000FF660033FF
            660066FF660099FF6600CCFF6600FFFF66000000990033009900660099009900
            9900CC009900FF00990000339900333399006633990099339900CC339900FF33
            990000669900336699006666990099669900CC669900FF669900009999003399
            99006699990099999900CC999900FF99990000CC990033CC990066CC990099CC
            9900CCCC9900FFCC990000FF990033FF990066FF990099FF9900CCFF9900FFFF
            99000000CC003300CC006600CC009900CC00CC00CC00FF00CC000033CC003333
            CC006633CC009933CC00CC33CC00FF33CC000066CC003366CC006666CC009966
            CC00CC66CC00FF66CC000099CC003399CC006699CC009999CC00CC99CC00FF99
            CC0000CCCC0033CCCC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FF
            CC0066FFCC0099FFCC00CCFFCC00FFFFCC000000FF003300FF006600FF009900
            FF00CC00FF00FF00FF000033FF003333FF006633FF009933FF00CC33FF00FF33
            FF000066FF003366FF006666FF009966FF00CC66FF00FF66FF000099FF003399
            FF006699FF009999FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CC
            FF00CCCCFF00FFCCFF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFF
            FF00000080000080000000808000800000008000800080800000C0C0C0008080
            8000191919004C4C4C00B2B2B200E5E5E500C8AC2800E0CC6600F2EABF00B59B
            2400D8E9EC0099336600D075A300ECC6D900646F710099A8AC00E2EFF1000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            0000E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
            E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
            E8E8E8E8E812121212121212121212E8E8E8E8E8121818181818121812121212
            E8E8E8E8121E18181818181218121212E8E8E8E812181E181818181812181212
            E8E8E8E8121E181E1818181818121812E8E8E8E8121E1E181E18181818181212
            E8E8E8E8128D1E1E181E181818181812E8E8E8E8128D8D1E1E181E1818181812
            E8E8E8E8E812121212121212121212E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
            E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
            E8E8}
          Transparent = True
          OnMouseDown = FormMouseDown
        end
      end
      object cbbFCPU: TComboBox
        Left = 264
        Top = 64
        Width = 126
        Height = 21
        Hint = 'Hz'
        DropDownCount = 9
        ItemHeight = 13
        TabOrder = 6
        Text = '8000000'
        Items.Strings = (
          '1000000'
          '2000000'
          '3686400'
          '4000000'
          '7372800'
          '8000000'
          '11059200'
          '12000000'
          '16000000')
      end
      object cbbTimeClk: TComboBox
        Left = 264
        Top = 176
        Width = 126
        Height = 21
        Hint = 'ms'
        ItemHeight = 13
        TabOrder = 7
        Text = '500'
        OnChange = cbbTimeClkChange
        Items.Strings = (
          '100'
          '200'
          '250'
          '300'
          '400'
          '500')
      end
      object cbbBootCnt: TComboBox
        Left = 264
        Top = 204
        Width = 126
        Height = 21
        ItemHeight = 13
        TabOrder = 8
        Text = '20'
        Items.Strings = (
          '5'
          '10'
          '20'
          '25'
          '40'
          '50')
      end
      object cbbFileCnt: TComboBox
        Left = 264
        Top = 232
        Width = 126
        Height = 21
        ItemHeight = 13
        TabOrder = 9
        Text = '50'
        Items.Strings = (
          '5'
          '10'
          '20'
          '25'
          '50'
          '100')
      end
      object cbbInitDelay: TComboBox
        Left = 264
        Top = 260
        Width = 126
        Height = 21
        Hint = 'ms'
        ItemHeight = 13
        TabOrder = 10
        Text = '0'
        Items.Strings = (
          '0'
          '200')
      end
      object cbbBootMode: TComboBox
        Left = 264
        Top = 288
        Width = 126
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 11
        Text = '0'
        Items.Strings = (
          '0'
          '1')
      end
      object cbbBootStart: TComboBox
        Left = 264
        Top = 36
        Width = 70
        Height = 21
        Hint = 'byte'
        ItemHeight = 13
        TabOrder = 12
        Text = '0x1C00'
        Items.Strings = (
          '0x0C00'
          '0x0E00'
          '0x0F00'
          '0x0F80'
          '0x1C00'
          '0x1E00'
          '0x1F00'
          '0x1F80'
          '0x3000'
          '0x3800'
          '0x3C00'
          '0x3E00'
          '0x3F00'
          '0x4800'
          '0x4C00'
          '0x4E00'
          '0x4F00'
          '0x7000'
          '0x7800'
          '0x7C00'
          '0x7E00'
          '0xF000'
          '0xF800'
          '0xFC00'
          '0xFE00'
          '0x1F000'
          '0x1F800'
          '0x1FC00'
          '0x1FE00')
      end
      object cbbCRC: TComboBox
        Left = 264
        Top = 316
        Width = 126
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        ItemIndex = 1
        TabOrder = 13
        Text = '1'
        Items.Strings = (
          '0'
          '1')
      end
      object cbbBufferSize: TComboBox
        Left = 264
        Top = 148
        Width = 126
        Height = 21
        Hint = 'byte'
        ItemHeight = 13
        TabOrder = 14
        Text = '128'
        Items.Strings = (
          '16'
          '32'
          '64'
          '128'
          '256'
          '512'
          '1024')
      end
      object cbbComPortNo: TComboBox
        Left = 264
        Top = 120
        Width = 126
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 15
        Items.Strings = (
          '0'
          '1'
          '2'
          '3')