sys_enter_mrprmdtmd.dfm

来自「一个MRPII系统源代码版本」· DFM 代码 · 共 44 行

object Frm_Sys_Enter_MrpRmDtMd: TFrm_Sys_Enter_MrpRmDtMd
  OldCreateOrder = False
  Pooled = False
  Left = 336
  Top = 122
  Height = 375
  Width = 544
  object AdoConnectMain: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=MrpAC' +
      'T.mdb;Mode=Share Deny None;Extended Properties="";Persist Securi' +
      'ty Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Pa' +
      'th="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet' +
      ' OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops' +
      '=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database P' +
      'assword="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encr' +
      'ypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;' +
      'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=Fal' +
      'se'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 40
    Top = 16
  end
  object AdoQry_Main: TADOQuery
    Connection = AdoConnectMain
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * From  Account  Where Valid='#39'y'#39' Or Valid='#39'Y'#39)
    Left = 120
    Top = 16
  end
  object AJMrpAcnt: TDataSetProvider
    DataSet = AdoQry_Main
    ResolveToDataSet = True
    Options = [poAutoRefresh, poPropogateChanges, poAllowCommandText]
    Left = 200
    Top = 16
  end
end