u_setting.dfm

小型劳资管理系统,用visual basic+access编写

object F_setting: TF_setting
  Left = 245
  Top = 190
  Width = 282
  Height = 233
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #29992#25143#26435#38480#20462#25913
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 273
    Height = 201
  end
  object Label1: TLabel
    Left = 16
    Top = 8
    Width = 72
    Height = 16
    Caption = #29992' '#25143' '#21517':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clGray
    Font.Height = -16
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
  end
  object SpeedButton1: TSpeedButton
    Left = 216
    Top = 8
    Width = 49
    Height = 25
    Caption = #26356#25913
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    OnClick = SpeedButton1Click
  end
  object Edit1: TEdit
    Left = 96
    Top = 8
    Width = 113
    Height = 21
    TabOrder = 0
    OnKeyPress = Edit1KeyPress
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 40
    Width = 257
    Height = 121
    TabOrder = 1
    object Label2: TLabel
      Left = 8
      Top = 24
      Width = 72
      Height = 15
      Caption = #26087' '#23494' '#30721':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clGray
      Font.Height = -15
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 8
      Top = 56
      Width = 72
      Height = 15
      Caption = #26032' '#23494' '#30721':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clGray
      Font.Height = -15
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 88
      Width = 72
      Height = 15
      Caption = #30830#35748#19968#27425':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clGray
      Font.Height = -15
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Edit2: TEdit
      Left = 88
      Top = 24
      Width = 121
      Height = 21
      PasswordChar = '*'
      TabOrder = 0
      OnKeyPress = Edit2KeyPress
    end
    object Edit3: TEdit
      Left = 88
      Top = 56
      Width = 121
      Height = 21
      PasswordChar = '*'
      TabOrder = 1
      OnKeyPress = Edit3KeyPress
    end
    object Edit4: TEdit
      Left = 88
      Top = 88
      Width = 121
      Height = 21
      PasswordChar = '*'
      TabOrder = 2
      OnKeyPress = Edit4KeyPress
    end
  end
  object BitBtn1: TBitBtn
    Left = 24
    Top = 168
    Width = 75
    Height = 25
    Caption = #30830#23450
    Font.Charset = GB2312_CHARSET
    Font.Color = clPurple
    Font.Height = -15
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn1Click
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 168
    Top = 168
    Width = 75
    Height = 25
    Caption = #21462#28040
    Font.Charset = GB2312_CHARSET
    Font.Color = clPurple
    Font.Height = -15
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = BitBtn2Click
    Kind = bkCancel
  end
  object Q_login: TQuery
    AutoRefresh = True
    DatabaseName = 'person_DB'
    SQL.Strings = (
      'select * from pass')
    Left = 224
    Top = 88
  end
end