TADOQuery asynchron abfragen

[Norbert5]

Heureka, ich hab's gefunden.

Den Fehler von Microsoft kann ich nicht korrigieren,
aber eine kleine Änderung in ADODB umgeht diesen Fehler.

Routine TCustomADODataSet.InternalGetRecord
(RAD Studio 2007: Zeile 4179)

bisher:

Delphi-Quellcode:

            
             if not Recordset.EOF then
               Recordset.MoveNext;

neu:

Delphi-Quellcode:

            
              if not Recordset.EOF then
              begin
                if Recordset.BOF
                  then Recordset.MoveFirst
                  else Recordset.MoveNext;
              end;

Vielen Dank für Eure Bemühungen.