Thanks, will give it a try. The links you've sent are pretty much what I've done to work with TADOXCatalog, just I got my info from about.delphi.com and used a later MDAC, I think 2.7.
> -----Original Message----- > From: [email protected] > [mailto:[EMAIL PROTECTED] On Behalf Of Gary Campbell > Sent: 07 August 2005 05:59 > To: [email protected] > Subject: RE: [delphi-en] Component missing > Importance: High > > > * I don't know if you tried this or not but: > > regsvr32 c:\windows\system32\msadox.dll > regsvr32 c:\winnt\system32\msadox.dll > > > * Maybe, these two links can shed some light. They discuss > adding ADOX_TLB > and ComObj to the Uses clause and to create Catalogs and > Access databases. > > http://www.efg2.com/Lab/Library/Delphi/ADO/#ADOX_TLB > 1. Start Delphi 5 > 2. Project > 3. Import Type Library > 4. Choose "Microsoft ADO Ext 2.1 for DDL and Security > (Version 2.1)" > 5. Change "TTable" to "TADOXTable" > 6. Change "TColumn" to "TADOXColumn" > 7. Change "TIndex" to "TADOXIndex" > 8. Press Install button > 9. Press OK once and Yes twice > 10. File | Close All | Yes > > > * Some code that uses ADOX: > > http://www.geocities.com/SiliconValley/Lakes/1636/ADOX1.htm > > procedure TForm1.Button1Click(Sender: TObject); > var > Catalog : _Catalog; > Table : _Table; > BaseName : String; > DS : String; > begin > // Name of the new database file > BaseName := 'd:\data\demo.mdb'; > > // Create a Catalog Object > Catalog := CreateCOMObject(StringToGUID('ADOX.Catalog')) as _Catalog; > > // Set the Connection String > DS := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+BaseName; > > // Check if we already have such a file and delete it > If FileExists(BaseName) Then DeleteFile(BaseName); > > // Create new Access database > Catalog.Create(DS); > > // Create a Table Object > Table := CreateCOMObject(StringToGUID('ADOX.Table')) as _Table; > > // Set the name of a table > Table.Name := 'Customers'; > > // Append Table into the base > Catalog.Tables.Append(Table); > > // Now add two columns (fields) into the table > // Both are Text fields up to 128 characters > Table.Columns.Append('FIRSTNAME', adVarWChar, 128); > Table.Columns.Append('LASTNAME', adVarWChar, 128); end; > > > > > >From: "Brigitte Spatz" <[EMAIL PROTECTED]> > >Reply-To: [email protected] > >To: <[email protected]> > >Subject: [delphi-en] Component missing > >Date: Thu, 4 Aug 2005 17:16:54 +0200 > > > >One of our customers has reported that the software fails because > >apparently it cannot create a database. The bug report contains the > >following information: > > > >exception class : EOleSysError > >exception message : Das angegebene Modul wurde nicht gefunden. //The > >module was not found > > > >main thread ($95c): > >0052f99c Or-Fin.exe ComObj OleError > >0052f9b4 Or-Fin.exe ComObj OleCheck > >0052fa31 Or-Fin.exe ComObj CreateComObject > >00536870 Or-Fin.exe OleServer TOleServer.GetServer > >00536aff Or-Fin.exe ADOX_TLB 3166 +3 TADOXCatalog.Connect > >00536b68 Or-Fin.exe ADOX_TLB 3188 +2 > TADOXCatalog.GetDefaultInterface > >00536ce6 Or-Fin.exe ADOX_TLB 3273 +1 TADOXCatalog.Create1 > > > >Does anybody know what exactly is missing on his computer, > where to get > >the missing files from and where to install them to? > > > >TIA. > > > >Brigitte > > > > > >[Non-text portions of this message have been removed] > > > > > > > ------------------------ Yahoo! Groups Sponsor > --------------------~--> > <font face=arial size=-1><a > href="http://us.ard.yahoo.com/SIG=12hf7l0fk/M=362131.6882499.7 > 825260.1510227/D=groups/S=1705115362:TM/Y=YAHOO/EXP=1123394360 > /A=2889191/R=0/SIG=10r90krvo/*http://www.thebeehive.org > ">Get Bzzzy! (real tools to help you find a job) Welcome to > the Sweet Life - brought to you by One Economy</a>.</font> > -------------------------------------------------------------- > ------~-> > > ----------------------------------------------------- > Home page: http://groups.yahoo.com/group/delphi-en/ > To unsubscribe: [EMAIL PROTECTED] > Yahoo! Groups Links > > > > > > > ------------------------ Yahoo! Groups Sponsor --------------------~--> <font face=arial size=-1><a href="http://us.ard.yahoo.com/SIG=12hl0gsua/M=362329.6886308.7839368.1510227/D=groups/S=1705115362:TM/Y=YAHOO/EXP=1123399795/A=2894321/R=0/SIG=11dvsfulr/*http://youthnoise.com/page.php?page_id=1992 ">Fair play? Video games influencing politics. Click and talk back!</a>.</font> --------------------------------------------------------------------~-> ----------------------------------------------------- Home page: http://groups.yahoo.com/group/delphi-en/ To unsubscribe: [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/delphi-en/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
