code.dfm

是个文档,和软件工程类似,如何实现一工程所需步骤

object frmcode: Tfrmcode
  Left = 310
  Top = 100
  Width = 310
  Height = 386
  Caption = #20195#30721#35774#32622
  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 GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 193
    Height = 153
    Caption = #35774#32622#23646#24615
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 37
      Width = 48
      Height = 13
      Caption = #31867#22411#32534#21495
    end
    object Label2: TLabel
      Left = 8
      Top = 75
      Width = 48
      Height = 13
      Caption = #20195#30721#32534#21495
    end
    object Label3: TLabel
      Left = 8
      Top = 115
      Width = 48
      Height = 13
      Caption = #20195#30721#21517#31216
    end
    object Edit2: TEdit
      Left = 80
      Top = 72
      Width = 97
      Height = 21
      TabOrder = 0
    end
    object Edit3: TEdit
      Left = 80
      Top = 112
      Width = 97
      Height = 21
      TabOrder = 1
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 32
      Width = 97
      Height = 21
      ItemHeight = 13
      TabOrder = 2
    end
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 224
    Width = 289
    Height = 129
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #31867#22411#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20195#30721#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20195#30721#21517#31216
        Visible = True
      end>
  end
  object GroupBox4: TGroupBox
    Left = 207
    Top = 8
    Width = 89
    Height = 209
    Caption = #25805#20316
    TabOrder = 2
    object Button1: TButton
      Left = 8
      Top = 16
      Width = 73
      Height = 25
      Caption = #26597#35810'(&Q)'
      TabOrder = 0
    end
    object Button2: TButton
      Left = 8
      Top = 48
      Width = 73
      Height = 25
      Caption = #28155#21152'(&A)'
      TabOrder = 1
    end
    object Button3: TButton
      Left = 8
      Top = 80
      Width = 73
      Height = 25
      Caption = #20445#23384'(&M)'
      TabOrder = 2
    end
    object Button4: TButton
      Left = 8
      Top = 112
      Width = 73
      Height = 25
      Caption = #21024#38500'(&D)'
      TabOrder = 3
    end
    object Button5: TButton
      Left = 8
      Top = 144
      Width = 73
      Height = 25
      Caption = #28165#31354'(&C)'
      TabOrder = 4
    end
    object Button6: TButton
      Left = 8
      Top = 176
      Width = 73
      Height = 25
      Caption = #36864#20986'(&E)'
      TabOrder = 5
    end
  end
  object Panel1: TPanel
    Left = 8
    Top = 168
    Width = 193
    Height = 49
    TabOrder = 3
  end
end