Thema: Delphi repeat - until abfrage

Einzelnen Beitrag anzeigen

markon

Registriert seit: 12. Sep 2003
229 Beiträge
 
#10

Re: repeat - until abfrage

  Alt 6. Nov 2003, 14:20
@ Snyderburn
in deinem aufgeführten beispiel wird der satzzeiger ja nur auf den nächsten satz gestellt wenn die bedingung in den else-zweig geht. bei "then" wird er ja gar nicht weiter gestellt. ist das absicht?
weil wenn der satzzeiger nicht weitergestellt wird dann greifst du ja immer auf den selben satz zu.


Delphi-Quellcode:
dm1.T_anschrift.First;
while (not dm1.T_anschrift.eof) and (idzumbearbeiten = bearbeitenzaehler)do bgein
  if idzumbearbeiten = dm1.T_anschrift.fieldbyname('ID_anschrift').asinteger
     then begin
           ....
           bearbeitenzaehler := idzumbearbeiten;
          end
     else begin
           // dm1.T_anschrift.Next; glaube hier nicht
           bearbeitenzaehler := bearbeitenzaehler + 1;
          end;
  dm1.T_anschrift.Next; // glaube hier muss das hin
end; {while}idzumbearbeiten = bearbeitenzaehler;
  Mit Zitat antworten Zitat