www.pudn.com > mycomdatamodule.rar > Unit1.dfm

object mycomdatamodule: Tmycomdatamodule 
  OldCreateOrder = False 
  Pooled = False 
  Left = 323 
  Top = 289 
  Height = 249 
  Width = 293 
  object dsp1: TDataSetProvider 
    DataSet = adoqry1 
    Left = 40 
    Top = 56 
  end 
  object adocon1: TADOConnection 
    Connected = True 
    ConnectionString =  
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=E:\de' + 
      'velop\delphi7\Projects\MD53Demos\datas\MD53DB1.mdb;Mode=Share De' + 
      'ny None;Extended Properties="";Persist Security Info=False;Jet O' + 
      'LEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Dat' + 
      'abase Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Loc' + 
      'king Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global' + 
      ' Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLED' + 
      'B:Create System Database=False;Jet OLEDB:Encrypt Database=False;' + 
      'Jet OLEDB:Don'#39't Copy Locale on Compact=False;Jet OLEDB:Compact W' + 
      'ithout Replica Repair=False;Jet OLEDB:SFP=False' 
    LoginPrompt = False 
    Mode = cmShareDenyNone 
    Provider = 'Microsoft.Jet.OLEDB.4.0' 
    Left = 116 
    Top = 52 
  end 
  object adoqry1: TADOQuery 
    Active = True 
    Connection = adocon1 
    CursorType = ctStatic 
    Parameters = <> 
    SQL.Strings = ( 
      'select * from customers') 
    Left = 164 
    Top = 52 
  end 
end