fmmain.dfm

这是不可多得的源代码

object Form1: TForm1
  Left = 244
  Top = 234
  Width = 556
  Height = 402
  Caption = 'z'
  Color = clBtnFace
  Font.Charset = CHINESEBIG5_CHARSET
  Font.Color = clWindowText
  Font.Height = -20
  Font.Name = #26032#32048#26126#39636
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 120
  TextHeight = 20
  object LabeledEdit1: TLabeledEdit
    Left = 16
    Top = 32
    Width = 217
    Height = 28
    EditLabel.Width = 82
    EditLabel.Height = 20
    EditLabel.Caption = 'Start Mode'
    TabOrder = 0
  end
  object LabeledEdit2: TLabeledEdit
    Left = 248
    Top = 32
    Width = 289
    Height = 28
    EditLabel.Width = 99
    EditLabel.Height = 20
    EditLabel.Caption = 'Object Count'
    TabOrder = 1
  end
  object BitBtn1: TBitBtn
    Left = 8
    Top = 272
    Width = 217
    Height = 41
    Caption = 'Create Objs By wrapper'
    TabOrder = 2
    OnClick = BitBtn1Click
    Kind = bkAll
  end
  object BitBtn2: TBitBtn
    Left = 232
    Top = 272
    Width = 201
    Height = 41
    Caption = 'Create By Factory'
    TabOrder = 3
    OnClick = BitBtn2Click
    Kind = bkAll
  end
  object BitBtn3: TBitBtn
    Left = 344
    Top = 320
    Width = 145
    Height = 41
    TabOrder = 4
    Kind = bkClose
  end
  object LabeledEdit3: TLabeledEdit
    Left = 16
    Top = 96
    Width = 209
    Height = 28
    EditLabel.Width = 99
    EditLabel.Height = 20
    EditLabel.Caption = 'Object Count'
    TabOrder = 5
  end
  object BitBtn4: TBitBtn
    Left = 8
    Top = 320
    Width = 321
    Height = 41
    Caption = 'Create By Factory Manager'
    TabOrder = 6
    OnClick = BitBtn4Click
    Kind = bkAll
  end
  object LabeledEdit4: TLabeledEdit
    Left = 256
    Top = 96
    Width = 209
    Height = 28
    EditLabel.Width = 54
    EditLabel.Height = 20
    EditLabel.Caption = 'ProgID'
    TabOrder = 7
  end
  object ListBox1: TListBox
    Left = 16
    Top = 128
    Width = 513
    Height = 137
    ItemHeight = 20
    TabOrder = 8
  end
end