unit1.dfm

来自「Delphi7应用编程150例附书源码.rar」· DFM 代码 · 共 85 行

object Form1: TForm1
  Left = 183
  Top = 140
  Width = 267
  Height = 185
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object ControlBar1: TControlBar
    Left = 0
    Top = 0
    Width = 259
    Height = 56
    Align = alTop
    AutoSize = True
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 11
      Top = 2
      Width = 110
      Height = 22
      ButtonHeight = 21
      ButtonWidth = 25
      Caption = 'ToolBar1'
      Menu = MainMenu1
      ShowCaptions = True
      TabOrder = 0
    end
    object ToolBar2: TToolBar
      Left = 11
      Top = 28
      Width = 110
      Height = 22
      ButtonHeight = 16
      ButtonWidth = 18
      Caption = 'ToolBar2'
      TabOrder = 1
      object ToolButton1: TToolButton
        Left = 0
        Top = 2
        Caption = 'ToolButton1'
        ImageIndex = 0
      end
      object ToolButton2: TToolButton
        Left = 18
        Top = 2
        Caption = 'ToolButton2'
        ImageIndex = 1
      end
      object ToolButton3: TToolButton
        Left = 36
        Top = 2
        Caption = 'ToolButton3'
        ImageIndex = 2
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 72
    Top = 120
    object File1: TMenuItem
      Caption = 'File'
      object New1: TMenuItem
        Caption = 'New'
      end
      object Opem1: TMenuItem
        Caption = 'Open'
      end
    end
    object Edit1: TMenuItem
      Caption = 'Edit'
      object Cut1: TMenuItem
        Caption = 'Cut'
      end
    end
  end
end