unit2.~dfm

delphi 动态添加控件（程序运行后添加控件）

object Form2: TForm2
  Left = 368
  Top = 221
  Width = 270
  Height = 289
  Caption = #23646#24615
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 262
    Height = 255
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #22270#24418
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 241
        Height = 68
        Caption = #22270#29255#26469#28304
        TabOrder = 0
        object Button1: TButton
          Left = 80
          Top = 24
          Width = 75
          Height = 25
          Caption = #36873#25321#22270#29255
          TabOrder = 0
          OnClick = Button1Click
        end
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 80
        Width = 241
        Height = 145
        Caption = #22270#29255#23610#23544
        TabOrder = 1
        object Label1: TLabel
          Left = 16
          Top = 32
          Width = 36
          Height = 13
          Caption = #38271#24230#65306
        end
        object Label2: TLabel
          Left = 16
          Top = 72
          Width = 36
          Height = 13
          Caption = #39640#24230#65306
        end
        object Edit1: TEdit
          Left = 64
          Top = 32
          Width = 121
          Height = 21
          TabOrder = 0
        end
        object Edit2: TEdit
          Left = 64
          Top = 72
          Width = 121
          Height = 21
          TabOrder = 1
        end
        object Button2: TButton
          Left = 158
          Top = 112
          Width = 75
          Height = 25
          Caption = #30830#23450
          TabOrder = 2
          OnClick = Button2Click
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #20301#20540
      ImageIndex = 1
      object GroupBox3: TGroupBox
        Left = 16
        Top = 16
        Width = 225
        Height = 201
        Caption = #20301#32622
        TabOrder = 0
        object Label3: TLabel
          Left = 16
          Top = 32
          Width = 19
          Height = 13
          Caption = 'X'#65306
        end
        object Label4: TLabel
          Left = 16
          Top = 72
          Width = 19
          Height = 13
          Caption = 'Y'#65306
        end
        object Edit3: TEdit
          Left = 72
          Top = 32
          Width = 121
          Height = 21
          TabOrder = 0
        end
        object Edit4: TEdit
          Left = 72
          Top = 72
          Width = 121
          Height = 21
          TabOrder = 1
        end
        object Button3: TButton
          Left = 134
          Top = 160
          Width = 75
          Height = 25
          Caption = #30830#23450
          TabOrder = 2
          OnClick = Button3Click
        end
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 440
    Top = 32
  end
end