rc_datamodule1.dfm

来自「亚惠快餐管理信息系统 包括亚惠快餐管理的各项功能」· DFM 代码 · 共 116 行

object RC_DfmDataModule1: TRC_DfmDataModule1
  OldCreateOrder = False
  Left = 65535
  Top = 74
  Height = 479
  Width = 741
  object UserDataSource: TDataSource
    DataSet = UserQuery
    Left = 364
    Top = 8
  end
  object UserGroupDataSource: TDataSource
    DataSet = UserGroupQuery
    Left = 364
    Top = 74
  end
  object FunctionResourceDataSource: TDataSource
    DataSet = FunctionResourceQuery
    Left = 364
    Top = 140
  end
  object PowerAssignDataSource: TDataSource
    DataSet = PowerAssignQuery
    Left = 364
    Top = 206
  end
  object DBAssignDataSource: TDataSource
    DataSet = DBAssignQuery
    Left = 364
    Top = 272
  end
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Provider = 'MSDASQL.1'
    Left = 488
    Top = 8
  end
  object UserQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    Left = 120
    Top = 8
  end
  object DUserQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 232
    Top = 8
  end
  object UserGroupQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 120
    Top = 74
  end
  object DUserGroupQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 232
    Top = 74
  end
  object FunctionResourceQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 120
    Top = 140
  end
  object DFunctionResourceQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 232
    Top = 140
  end
  object PowerAssignQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 120
    Top = 206
  end
  object DPowerAssignQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 232
    Top = 206
  end
  object DBAssignQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 120
    Top = 272
  end
  object DDBAssignQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 232
    Top = 272
  end
  object DTableNameQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 120
    Top = 343
  end
  object DTableFieldQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tdbassign'
      ' ')
    Left = 232
    Top = 344
  end
end