ufrmuser.dfm

用delphi写的界面代码和功能代码分离程序

object frmUser: TfrmUser
  Left = 192
  Top = 114
  Width = 282
  Height = 212
  Caption = 'frmUser'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 61
    Top = 38
    Width = 24
    Height = 12
    Caption = #22995#21517
  end
  object Label2: TLabel
    Left = 61
    Top = 70
    Width = 24
    Height = 12
    Caption = #22995#21035
  end
  object Label3: TLabel
    Left = 60
    Top = 102
    Width = 24
    Height = 12
    Caption = #24180#40836
  end
  object Label4: TLabel
    Left = 61
    Top = 14
    Width = 12
    Height = 12
    Caption = 'ID'
  end
  object lblID: TLabel
    Left = 93
    Top = 14
    Width = 6
    Height = 12
  end
  object edtUserName: TEdit
    Left = 93
    Top = 34
    Width = 121
    Height = 20
    TabOrder = 0
  end
  object edtSex: TEdit
    Left = 93
    Top = 66
    Width = 121
    Height = 20
    TabOrder = 1
  end
  object edtAge: TEdit
    Left = 93
    Top = 98
    Width = 121
    Height = 20
    TabOrder = 2
  end
  object btnOK: TBitBtn
    Left = 60
    Top = 136
    Width = 75
    Height = 25
    Caption = #30830#23450
    TabOrder = 3
    OnClick = btnOKClick
  end
  object btnCancel: TBitBtn
    Left = 140
    Top = 136
    Width = 75
    Height = 25
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 4
  end
end