Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#4

Re: activeconnection im tcatalog-object(ADOX) nicht vorhande

  Alt 19. Mai 2005, 13:53
Zitat von Bigeddie:
ich versuche verzweifelt in eine Access-Datenbank eine Tabelle einzufügen und gehe dabei wie folgt vor:
0 ADOX-Komponenten sind installiert
1 herstellen einer adoconnection (das klappt soweit auch)
2 erstellen eines ADOXCatalog-Objekt
3 versuch der Übergabe der adoconnection an ADOXCatalog.activeconnection
Weis jemand warum activeconnection nicht als property angezeigt wird?
Ein Blick in die importierte TLB in Unit ADOX_TLB.pas zeigt:
Delphi-Quellcode:
  _Catalog = interface(IDispatch)
    ['{00000603-0000-0010-8000-00AA006D2EA4}']
    function Get_ActiveConnection: OleVariant; safecall;
    procedure _Set_ActiveConnection(pVal: OleVariant); safecall;
    procedure Set_ActiveConnection(const pVal: IDispatch); safecall;
    ... // unwesentliches gestrippet
    property Tables: Tables read Get_Tables;
  end;
Es gibt kein Property ActiveConnection, sondern nur Set- und Get-Methoden.
Könnte ein Fehler von Delphi sein; macht aber nix.
Rufe einfach Set_ActiveConnection auf:
  adocobj.Set_ActiveConnection(ADOConnection1.ConnectionObject as IDispatch);
Andreas
  Mit Zitat antworten Zitat