frm_k_lbszpas.dfm

来自「是一个用delphi设计的考勤系统」· DFM 代码 · 共 140 行

inherited Frm_K_Lbsz: TFrm_K_Lbsz
  Left = 222
  Top = 257
  Width = 522
  Height = 325
  Caption = #35831#20551#31867#21035#35774#32622
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 225
    Top = 57
    Width = 80
    Height = 16
    Caption = #31867#21035#21517#31216#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label1: TLabel
    Left = 7
    Top = 57
    Width = 56
    Height = 16
    Caption = #32534' '#21495#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object DBGrid1: TDBGrid
    Left = 4
    Top = 81
    Width = 500
    Height = 192
    DataSource = DSQjlb
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clBlack
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
    Columns = <
      item
        Expanded = False
        FieldName = 'qqbh'
        Title.Caption = #32534#21495
        Width = 123
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'qqmc'
        Title.Alignment = taCenter
        Title.Caption = #21517#31216
        Width = 304
        Visible = True
      end>
  end
  object edtbh: TEdit
    Left = 50
    Top = 53
    Width = 156
    Height = 24
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
  object edtlb: TEdit
    Left = 294
    Top = 53
    Width = 209
    Height = 24
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object BitBtn1: TBitBtn
    Left = 16
    Top = 18
    Width = 81
    Height = 25
    Caption = #28155#21152
    TabOrder = 3
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 112
    Top = 18
    Width = 75
    Height = 25
    Caption = #20462#25913
    TabOrder = 4
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 200
    Top = 18
    Width = 75
    Height = 25
    Caption = #21024#38500
    TabOrder = 5
    OnClick = BitBtn3Click
  end
  object ADOTQjlb: TADOTable
    Connection = WindData.AdoConn
    CursorType = ctStatic
    TableName = 'Kq_Qqlb'
    Left = 48
    Top = 56
  end
  object DSQjlb: TDataSource
    DataSet = ADOTQjlb
    Left = 16
    Top = 56
  end
end