Einzelnen Beitrag anzeigen

Benutzerbild von Sourcemaker
Sourcemaker

Registriert seit: 3. Sep 2003
Ort: Westoverledingen
264 Beiträge
 
Delphi 11 Alexandria
 
#5

Re: Quickreport -> NeedData Problem

  Alt 23. Okt 2003, 11:08
Hi Cristian,

was hältst du davon:

Delphi-Quellcode:
MoreData := Counter < ObjektListe.Count; //sicher stellen das MoreData richtig ist
if MoreData then
begin
   While True do
   begin
      if (ObjektListe[Counter].gueltig) then
         break
      else begin
         if (Counter = ObjektListe.Count) then //sonst kommt der letzte Satz nicht
         begin
            MoreData := False;
            Last := False;
            break; //Edit: hatte ich vergessen
         end else inc(Counter);
      end;
   end;
end;
Mfg.

Frank

P.S. Mit "wo der Abbruch ist ?" meinte ich den Fehler.
Frank
  Mit Zitat antworten Zitat