udata.dfm

来自「Delphi控件源码 d中小企业管理系统 免费试用 涵盖信息、任务、知识、沟通」· DFM 代码 · 共 158 行

object dmPer: TdmPer
  OldCreateOrder = False
  Left = 192
  Top = 103
  Height = 212
  Width = 389
  object acPer: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=permis.mdb;Persist ' +
      'Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 8
    Top = 8
  end
  object aqSta: TADOQuery
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from stainfo')
    Left = 64
    Top = 8
  end
  object dsSta: TDataSource
    DataSet = aqSta
    Left = 64
    Top = 56
  end
  object aqDep: TADOQuery
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from dept order by ornum')
    Left = 336
    Top = 8
  end
  object dsDep: TDataSource
    DataSet = aqDep
    Left = 336
    Top = 56
  end
  object aqExper: TADOQuery
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from wexper')
    Left = 104
    Top = 8
  end
  object dsExper: TDataSource
    DataSet = aqExper
    Left = 104
    Top = 56
  end
  object aqFami: TADOQuery
    Connection = acPer
    Parameters = <>
    SQL.Strings = (
      'select * from family')
    Left = 144
    Top = 8
  end
  object dsFami: TDataSource
    DataSet = aqFami
    Left = 144
    Top = 56
  end
  object aqAP: TADOQuery
    Connection = acPer
    Parameters = <>
    SQL.Strings = (
      'select * from aandp')
    Left = 184
    Top = 8
  end
  object dsAP: TDataSource
    DataSet = aqAP
    Left = 184
    Top = 56
  end
  object aqTrain: TADOQuery
    Connection = acPer
    Parameters = <>
    SQL.Strings = (
      'select * from train')
    Left = 224
    Top = 8
  end
  object dsTrain: TDataSource
    DataSet = aqTrain
    Left = 224
    Top = 56
  end
  object aqStaf: TADOQuery
    Active = True
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from stainfo')
    Left = 64
    Top = 128
  end
  object aqExperf: TADOQuery
    Active = True
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from wexper')
    Left = 104
    Top = 128
  end
  object aqAPf: TADOQuery
    Active = True
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from aandp')
    Left = 184
    Top = 128
  end
  object aqFamif: TADOQuery
    Active = True
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from family')
    Left = 144
    Top = 128
  end
  object aqTrainf: TADOQuery
    Active = True
    Connection = acPer
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from train')
    Left = 224
    Top = 128
  end
  object aqStat: TADOQuery
    Connection = acPer
    Parameters = <>
    SQL.Strings = (
      'select count(id) from stainfo')
    Left = 264
    Top = 8
  end
end