frm_userinfo.dfm

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

inherited UserInfo: TUserInfo
  Left = 244
  Top = 164
  Caption = #29992#25143#20449#24687
  ClientHeight = 307
  ClientWidth = 504
  OldCreateOrder = True
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 12
  inherited palUp: TPanel
    Width = 504
    inherited palRightUp: TPanel
      Left = 425
    end
    inherited palUpMid: TPanel
      Width = 348
      inherited imgCaption: TImage
        Width = 348
      end
    end
  end
  inherited palDown: TPanel
    Top = 298
    Width = 504
    inherited imgRightDown: TImage
      Left = 494
    end
    inherited imgDownMin: TImage
      Width = 484
    end
  end
  inherited palLeft: TPanel
    Height = 248
    inherited imgLeft: TImage
      Height = 248
    end
  end
  inherited palRight: TPanel
    Left = 494
    Height = 248
    inherited imgRight: TImage
      Height = 248
    end
  end
  inherited palClient: TPanel
    Width = 484
    Height = 248
    object DBGrid1: TDBGrid
      Left = 0
      Top = 0
      Width = 484
      Height = 248
      Align = alClient
      DataSource = DataSource1
      FixedColor = clSilver
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clBlack
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'UsrName'
          Title.Caption = #29992#25143#21517
          Width = 112
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'UsrBm'
          Title.Caption = #37096#38376
          Width = 88
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'UsrPhone'
          Title.Caption = #32852#31995#30005#35805
          Width = 91
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'UsrEMail'
          Title.Caption = 'EMail'#22320#22336
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GroupName'
          Title.Caption = #25152#23646#32452#21517
          Width = 81
          Visible = True
        end>
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQry
    Left = 96
    Top = 8
  end
  object ADOQry: TADOQuery
    Connection = WindData.AdoConn
    Parameters = <>
    Left = 120
    Top = 8
  end
end