frm_collegeinfo.dfm

是一个用delphi设计的考勤系统

inherited CollegeInfo: TCollegeInfo
  Left = 276
  Top = 227
  Width = 465
  Height = 356
  Caption = #37096#38376#22522#26412#20449#24687#32500#25252
  OldCreateOrder = True
  OnClose = FormClose
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 10
    Top = 91
    Width = 80
    Height = 16
    Caption = #37096#38376#32534#21495#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 10
    Top = 120
    Width = 80
    Height = 16
    Caption = #37096#38376#21517#31216#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 10
    Top = 66
    Width = 80
    Height = 16
    Caption = #21333#20301#21517#31216#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Edtyxbh: TEdit
    Left = 86
    Top = 88
    Width = 157
    Height = 22
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 10
    ParentFont = False
    TabOrder = 0
    OnKeyDown = EdtyxbhKeyDown
  end
  object Edtyxmc: TEdit
    Left = 86
    Top = 115
    Width = 356
    Height = 22
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    MaxLength = 50
    ParentFont = False
    TabOrder = 1
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 143
    Width = 437
    Height = 131
    Color = clBtnFace
    DataSource = DataSource1
    FixedColor = clSilver
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
    Columns = <
      item
        Expanded = False
        FieldName = 'xqbh'
        Title.Caption = #21333#20301#32534#21495
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'xqmc'
        Title.Caption = #21333#20301#21517#31216
        Width = 125
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bjbh'
        Title.Caption = #37096#38376#32534#21495
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bjmc'
        Title.Caption = #37096#38376#21517#31216
        Width = 125
        Visible = True
      end>
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 298
    Width = 457
    Height = 24
    Panels = <
      item
        Text = #31995#32479#25552#31034#65306
        Width = 60
      end
      item
        Width = 280
      end
      item
        Width = 50
      end>
  end
  object GroupBox1: TGroupBox
    Left = 1
    Top = 47
    Width = 436
    Height = 7
    TabOrder = 4
  end
  object CBxqbh: TComboBox
    Left = 86
    Top = 61
    Width = 235
    Height = 24
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ItemHeight = 16
    ParentFont = False
    TabOrder = 5
    OnExit = CBxqbhExit
    OnKeyPress = CBxqbhKeyPress
  end
  object BitBtn3: TBitBtn
    Left = 176
    Top = 16
    Width = 75
    Height = 25
    Caption = #21024#38500
    TabOrder = 6
    OnClick = BitBtn3Click
  end
  object BitBtn2: TBitBtn
    Left = 96
    Top = 16
    Width = 75
    Height = 25
    Caption = #20462#25913
    TabOrder = 7
    OnClick = BitBtn2Click
  end
  object BitBtn1: TBitBtn
    Left = 8
    Top = 16
    Width = 81
    Height = 25
    Caption = #28155#21152
    TabOrder = 8
    OnClick = BitBtn1Click
  end
  object BitBtn4: TBitBtn
    Left = 264
    Top = 16
    Width = 75
    Height = 25
    Caption = #21047#26032
    TabOrder = 9
    OnClick = BitBtn4Click
  end
  object BitBtn5: TBitBtn
    Left = 352
    Top = 16
    Width = 75
    Height = 25
    Caption = #26597#25214
    TabOrder = 10
    Visible = False
    OnClick = BitBtn5Click
  end
  object DataSource1: TDataSource
    DataSet = ADOQry
    Left = 8
    Top = 48
  end
  object ADOQry: TADOQuery
    Connection = WindData.AdoConn
    Parameters = <>
    Left = 48
    Top = 56
  end
  object ADOStp: TADOStoredProc
    Connection = WindData.AdoConn
    ProcedureName = 'pZx_S_jgxx;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@czdx'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@czfs'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@Xqbh'
        Attributes = [paNullable]
        DataType = ftString
        Size = 10
        Value = Null
      end
      item
        Name = '@Yxbh'
        Attributes = [paNullable]
        DataType = ftString
        Size = 10
        Value = Null
      end
      item
        Name = '@Zybh'
        Attributes = [paNullable]
        DataType = ftString
        Size = 10
        Value = Null
      end
      item
        Name = '@Bjbh'
        Attributes = [paNullable]
        DataType = ftString
        Size = 10
        Value = Null
      end
      item
        Name = '@mc'
        Attributes = [paNullable]
        DataType = ftString
        Size = 50
        Value = Null
      end
      item
        Name = '@retmsg'
        Attributes = [paNullable]
        DataType = ftString
        Direction = pdInputOutput
        Size = 50
        Value = Null
      end>
    Left = 80
    Top = 56
  end
end