[QUOTE=HolgerX;1319252]
Hier ein Beispielcode:
Mal eine Frage:
Ist im ADODataSet1 nicht schon die Ergebnismenge, sprich das DataSet bereits OPEN?
Denn mit ADOConnection1.OpenSchema werden doch die Daten geholt...
Ja, das DataSet wir mit OpenSchema automatisch geöffnet.
Delphi-Quellcode:
{ Datenmenge anlegen }
iDataSet := TADODataSet.Create(nil) ;
{ Tabellen holen }
ADOConnection.OpenSchema(siTables,EmptyParam,EmptyParam,iDataSet) ;
{ Felder }
iTypeField := iDataSet.FieldByName('TABLE_TYPE') ;
iSchemaField := iDataSet.FieldByName('TABLE_SCHEMA') ;
iNameField := iDataSet.FieldByName('TABLE_NAME') ;
{ Laden }
while iDataSet.Eof = False do
begin
...
iDataSet.Next ;
end ;
{ Löschen }
iDataSet.Free ;