login.dfm

使用delphi自带的控件

object frmLogin: TfrmLogin
  Left = 214
  Top = 151
  BorderStyle = bsDialog
  Caption = #30331#24405
  ClientHeight = 197
  ClientWidth = 366
  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 edtUserName: TLabeledEdit
    Left = 120
    Top = 32
    Width = 169
    Height = 21
    EditLabel.Width = 70
    EditLabel.Height = 13
    EditLabel.Caption = #29992#25143#21517'(&U)'#65306
    ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
    LabelPosition = lpLeft
    TabOrder = 0
  end
  object edtPassword: TLabeledEdit
    Left = 120
    Top = 80
    Width = 169
    Height = 21
    EditLabel.Width = 70
    EditLabel.Height = 13
    EditLabel.Caption = #21475'     '#20196'(&P)'#65306
    ImeName = #20013#25991' ('#31616#20307') - '#35895#27468#25340#38899#36755#20837#27861
    LabelPosition = lpLeft
    PasswordChar = '*'
    TabOrder = 1
  end
  object btnOk: TBitBtn
    Left = 56
    Top = 136
    Width = 75
    Height = 25
    Caption = #30331#24405'(&L)'
    ModalResult = 1
    TabOrder = 2
  end
  object btnCancel: TBitBtn
    Left = 216
    Top = 136
    Width = 75
    Height = 25
    Caption = #21462#28040'(&C)'
    ModalResult = 2
    TabOrder = 3
  end
end