Query-Durchlauf funktioniert nicht richtgi

[hoika]

Hallo,

Delphi-Quellcode:

if Eof then
    begin
      if (dAusgabe = trunc(DTPBis.Date)) then
        bAusgabe := true;

        First;                    //  wieso wieder First ?
        bDatumAusgabe := false;
        dAusgabe := dAusgabe + 1;
    end
    else
      Next;

Was soll das denn werden ?

Eof einen abziehen, um einen Fehler im Code zu beheben ? Nee !!!
Debugge doch mal den Code, das sieht ja ganz finster aus.


Heiko