mainunit.~dfm

本人试过

      end
      object ToolButton37: TToolButton
        Tag = 1
        Left = 504
        Top = 0
        Width = 15
        Caption = 'ToolButton37'
        Grouped = True
        ImageIndex = 4
        Style = tbsSeparator
      end
      object ToolButton35: TToolButton
        Left = 519
        Top = 0
        AutoSize = True
        Caption = 'ToolButton35'
        ImageIndex = 58
        Style = tbsCheck
      end
      object ToolButton43: TToolButton
        Left = 542
        Top = 0
        Caption = 'ToolButton43'
        Down = True
        ImageIndex = 26
        Style = tbsCheck
      end
      object ToolButton36: TToolButton
        Left = 565
        Top = 0
        AutoSize = True
        Caption = 'ToolButton36'
        ImageIndex = 15
      end
    end
    object ToolBar4: TToolBar
      Left = 86
      Top = 54
      Width = 346
      Height = 22
      AutoSize = True
      Caption = 'ToolBar4'
      DockSite = True
      EdgeBorders = []
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Images = ImageList1
      ParentFont = False
      TabOrder = 2
      Wrapable = False
      object ToolButton4: TToolButton
        Left = 0
        Top = 0
        AutoSize = True
        Caption = 'ToolButton4'
        ImageIndex = 9
        Style = tbsCheck
      end
      object ToolButton28: TToolButton
        Left = 23
        Top = 0
        AutoSize = True
        Caption = 'ToolButton28'
        ImageIndex = 61
        Style = tbsCheck
      end
      object ToolButton40: TToolButton
        Left = 46
        Top = 0
        AutoSize = True
        Caption = 'ToolButton40'
        ImageIndex = 62
        Style = tbsCheck
      end
      object ToolButton42: TToolButton
        Left = 69
        Top = 0
        AutoSize = True
        Caption = 'ToolButton42'
        ImageIndex = 7
        Style = tbsCheck
      end
      object ToolButton45: TToolButton
        Left = 92
        Top = 0
        AutoSize = True
        Caption = 'ToolButton45'
        ImageIndex = 10
        Style = tbsCheck
      end
      object ToolButton46: TToolButton
        Left = 115
        Top = 0
        AutoSize = True
        Caption = 'ToolButton46'
        ImageIndex = 8
        Style = tbsCheck
      end
      object ToolButton47: TToolButton
        Left = 138
        Top = 0
        AutoSize = True
        Caption = 'ToolButton47'
        ImageIndex = 13
        Style = tbsCheck
      end
      object ToolButton48: TToolButton
        Tag = 1
        Left = 161
        Top = 0
        Width = 23
        AutoSize = True
        Caption = 'ToolButton48'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object ToolButton49: TToolButton
        Left = 184
        Top = 0
        AutoSize = True
        Caption = 'ToolButton49'
        ImageIndex = 14
      end
      object ToolButton50: TToolButton
        Left = 207
        Top = 0
        AutoSize = True
        Caption = 'ToolButton50'
        ImageIndex = 27
      end
      object ToolButton51: TToolButton
        Left = 230
        Top = 0
        AutoSize = True
        Caption = 'ToolButton51'
        ImageIndex = 47
      end
      object ToolButton52: TToolButton
        Left = 253
        Top = 0
        AutoSize = True
        Caption = 'ToolButton52'
        ImageIndex = 5
      end
      object ToolButton53: TToolButton
        Left = 276
        Top = 0
        AutoSize = True
        Caption = 'ToolButton53'
        ImageIndex = 35
      end
      object ToolButton54: TToolButton
        Left = 299
        Top = 0
        AutoSize = True
        Caption = 'ToolButton54'
        ImageIndex = 20
      end
      object ToolButton55: TToolButton
        Left = 322
        Top = 0
        AutoSize = True
        Caption = 'ToolButton55'
        ImageIndex = 36
      end
    end
    object ToolBar3: TToolBar
      Left = 11
      Top = 54
      Width = 62
      Height = 22
      AutoSize = True
      Caption = 'ToolBar3'
      EdgeBorders = []
      EdgeInner = esLowered
      EdgeOuter = esRaised
      Flat = True
      Images = ImageList1
      TabOrder = 3
      Wrapable = False
      object ToolButton19: TToolButton
        Left = 0
        Top = 0
        Caption = 'ToolButton19'
        ImageIndex = 43
      end
      object ToolButton18: TToolButton
        Tag = 1
        Left = 23
        Top = 0
        Width = 7
        Caption = 'ToolButton18'
        ImageIndex = 1
        Style = tbsSeparator
      end
      object ToolButton17: TToolButton
        Left = 30
        Top = 0
        Caption = 'ToolButton17'
        ImageIndex = 59
        Style = tbsCheck
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 78
    Width = 536
    Height = 270
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 1
    object SpeedButton1: TSpeedButton
      Left = 168
      Top = 88
      Width = 23
      Height = 22
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 200
      Top = 88
      Width = 23
      Height = 22
    end
    object SpeedButton3: TSpeedButton
      Left = 232
      Top = 88
      Width = 23
      Height = 22
    end
    object SpeedButton4: TSpeedButton
      Left = 264
      Top = 88
      Width = 23
      Height = 22
    end
    object Button1: TButton
      Left = 32
      Top = 16
      Width = 75
      Height = 25
      Caption = 'Button1'
      TabOrder = 0
    end
    object Button2: TButton
      Left = 112
      Top = 16
      Width = 75
      Height = 25
      Caption = 'Button2'
      TabOrder = 1
    end
    object Button3: TButton
      Left = 192
      Top = 16
      Width = 75
      Height = 25
      Caption = 'Button3'
      TabOrder = 2
    end
    object CheckBox1: TCheckBox
      Left = 344
      Top = 16
      Width = 97
      Height = 17
      Caption = 'CheckBox1'
      TabOrder = 3