unit1.dfm

按右键就可以写进注册表程序,做程序注册参考

object Form1: TForm1
  Left = 409
  Top = 194
  BorderStyle = bsDialog
  Caption = #21491#38190#27880#20876#31243#24207
  ClientHeight = 369
  ClientWidth = 363
  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 BitBtn1: TBitBtn
    Left = 56
    Top = 336
    Width = 89
    Height = 33
    Caption = #30830#23450
    TabOrder = 0
    OnClick = BitBtn1Click
    Kind = bkOK
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 169
    Width = 363
    Height = 161
    Align = alTop
    Caption = #25152#35201#24314#31435#30340#21491#38190#31243#24207#20449#24687
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMaroon
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 12
      Top = 24
      Width = 81
      Height = 13
      Caption = #31243'    '#24207'   '#21517'    '#31216
    end
    object Label2: TLabel
      Left = 13
      Top = 60
      Width = 84
      Height = 13
      Caption = #22312#21491#38190#20013#30340#35828#26126
    end
    object Label3: TLabel
      Left = 14
      Top = 95
      Width = 84
      Height = 13
      Caption = #31243#24207#25152#22312#30340#20301#32622
    end
    object SpeedButton1: TSpeedButton
      Left = 313
      Top = 120
      Width = 36
      Height = 20
      Caption = '...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object Edit1: TEdit
      Left = 110
      Top = 21
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 109
      Top = 56
      Width = 121
      Height = 21
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 22
      Top = 118
      Width = 289
      Height = 21
      TabOrder = 2
    end
  end
  object BitBtn2: TBitBtn
    Left = 216
    Top = 336
    Width = 97
    Height = 33
    Caption = #36864#20986
    TabOrder = 2
    OnClick = BitBtn2Click
    Kind = bkNo
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 0
    Width = 363
    Height = 169
    Align = alTop
    Caption = #26174#31034#29992#25143#20449#24687
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clMaroon
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object Label4: TLabel
      Left = 24
      Top = 24
      Width = 60
      Height = 13
      Caption = #24403#21069#36335#24452#65306
    end
    object Label5: TLabel
      Left = 24
      Top = 48
      Width = 72
      Height = 13
      Caption = #20135#21697#31995#21015#21495#65306
    end
    object Label6: TLabel
      Left = 24
      Top = 72
      Width = 48
      Height = 13
      Caption = #20135#21697#21517#65306
    end
    object Label7: TLabel
      Left = 24
      Top = 96
      Width = 84
      Height = 13
      Caption = #27880#20876#20844#21496#21517#31216#65306
    end
    object Label8: TLabel
      Left = 24
      Top = 120
      Width = 48
      Height = 13
      Caption = #29992#25143#21517#65306
    end
    object Label9: TLabel
      Left = 24
      Top = 144
      Width = 60
      Height = 13
      Caption = #36719#20214#31867#22411#65306
    end
    object Edit4: TEdit
      Left = 134
      Top = 22
      Width = 208
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 0
      Text = 'Edit4'
    end
    object Edit5: TEdit
      Left = 134
      Top = 45
      Width = 209
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 1
      Text = 'Edit5'
    end
    object Edit6: TEdit
      Left = 133
      Top = 70
      Width = 210
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 2
      Text = 'Edit6'
    end
    object Edit7: TEdit
      Left = 133
      Top = 93
      Width = 210
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 3
      Text = 'Edit7'
    end
    object Edit8: TEdit
      Left = 133
      Top = 116
      Width = 210
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 4
      Text = 'Edit8'
    end
    object Edit9: TEdit
      Left = 133
      Top = 140
      Width = 210
      Height = 19
      Ctl3D = False
      Enabled = False
      ParentCtl3D = False
      TabOrder = 5
      Text = 'Edit9'
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = 'Exe File (*.exe)|*.exe'
    InitialDir = 'c:\'
    Left = 312
    Top = 192
  end
end