Einzelnen Beitrag anzeigen

Benutzerbild von Gollum
Gollum

Registriert seit: 14. Jan 2003
Ort: Boxberg
456 Beiträge
 
Delphi 10.1 Berlin Professional
 
#2

Re: Über ADOX kein Zugriff auf Tabellenanzahl od. -felder

  Alt 12. Aug 2004, 17:24
Hallo,

ich würde einmal folgendes ausprobieren:
Delphi-Quellcode:
var tabname:String;
...
  ListBox1.Items.Clear;
  for i:=0 to iRecCount-1 do
  begin
    tabname:=aCatalog.Tables.Item[i].Name;
    ListBox1.Items.Add(tabname);
  end;
...
Alles was mit MS beginnt, sind normalerweise Systemtabellen. Da ich in letzter Zeit sehr viel mit den VCL-ADO-Komponenten gearbeitet habe, habe ich jetzt auf die schnelle auch keine Lösung parat.

Eine gute Möglichkeit herauszubekommen wo die Unterschiede sind bzw. welche Eigenschaften unterstützt werden bietet sich die Eigenschaft Properties an.

Folgend ein Beispiel, dass Dir alle Properties eines Table-Objects zurückgibt:
Delphi-Quellcode:
uses
  Variants; // <-- für D7
...
var i:Integer;
    s:String;
...
// 1. Tabelle des Catalogobjects
  s:='';
  for i:=0 to aCatalog.Tables.Item[0].Properties.Count-1 do
  begin
    s:=s+aCatalog.Tables.Item[0].Properties[i].Name+' - '+
       VarToStr(aCatalog.Tables.Item[0].Properties[i].Value)+#13#10;
  end; // for i
  ShowMessage(s);
...
Ich hoffe, ich konnte trotzdem ein wenig helfen.
  Mit Zitat antworten Zitat