u_gs_dm.dfm

来自「一个很不错的人事考勤系统,功能齐全,附带源码.」· DFM 代码 · 共 31 行

object GS_DM: TGS_DM
  OldCreateOrder = False
  Left = 199
  Top = 120
  Height = 375
  Width = 544
  object Q_empbktimestable: TQuery
    DatabaseName = 'person_DB'
    SQL.Strings = (
      'select * from bktimestable')
    Left = 40
    Top = 16
  end
  object DQ_empbktimestable: TDataSource
    DataSet = Q_empbktimestable
    Left = 40
    Top = 88
  end
  object Q_everydaytime: TQuery
    DatabaseName = 'person_DB'
    RequestLive = True
    SQL.Strings = (
      'select * from everydaytime')
    Left = 136
    Top = 16
    object Q_everydaytimeemp_id: TIntegerField
      FieldName = 'emp_id'
      Origin = 'PERSON_DB.everydaytime.emp_id'
    end
    object Q_everydaytimeworkday: TStringField
      DisplayLabel = '