unit2.dfm

毕业设计

object Form2: TForm2
  Left = 296
  Top = 207
  BorderStyle = bsSingle
  Caption = '登录>>>'
  ClientHeight = 193
  ClientWidth = 286
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 77
    Top = 6
    Width = 144
    Height = 16
    Caption = '住院部财务汇总系统'
    Font.Charset = GB2312_CHARSET
    Font.Color = clGreen
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = [fsUnderline]
    ParentFont = False
  end
  object SpeedButton1: TSpeedButton
    Left = 104
    Top = 165
    Width = 113
    Height = 24
    Caption = '昕鑫工作室制作'
    Font.Charset = GB2312_CHARSET
    Font.Color = clMaroon
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 32
    Top = 29
    Width = 231
    Height = 129
    TabOrder = 0
    object Label2: TLabel
      Left = 24
      Top = 16
      Width = 130
      Height = 13
      Caption = '请输入用户名和密码：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 28
      Top = 39
      Width = 52
      Height = 13
      Caption = '用户名：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 28
      Top = 70
      Width = 53
      Height = 13
      Caption = '密  码：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 84
      Top = 66
      Width = 113
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      PasswordChar = '*'
      TabOrder = 0
      Text = 'Edit1'
      OnKeyPress = Edit1KeyPress
    end
    object ComboBox1: TComboBox
      Left = 84
      Top = 35
      Width = 113
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 1
      OnKeyPress = ComboBox1KeyPress
      Items.Strings = (
        '黄鑫'
        '李明'
        '王新'
        '吴华'
        '熊明')
    end
    object Button1: TButton
      Left = 44
      Top = 96
      Width = 59
      Height = 25
      Caption = '确定'
      TabOrder = 2
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 132
      Top = 96
      Width = 67
      Height = 25
      Caption = '取消'
      TabOrder = 3
      OnClick = Button2Click
    end
  end
  object Table1: TTable
    DatabaseName = 'E:\bysj'
    IndexName = 'user'
    TableName = 'userpass.db'
    Left = 249
  end
  object Timer1: TTimer
    Interval = 50
    OnTimer = Timer1Timer
    Top = 32
  end
  object Timer2: TTimer
    Interval = 2000
    OnTimer = Timer2Timer
    Left = 8
    Top = 152
  end
end