28. Januar 2011 11:45
28. Januar 2011 12:06
REPEAT
UNTIL (DeinRec.NEXT = 0) OR (DeinRec.Optionsfeld = DeinRec.Optionsfeld::Nein);REPEAT
UNTIL (DeinRec.NEXT = 0) OR (DeinRec.Booleanfeld = FALSE);28. Januar 2011 12:21
ExitVar := false;
If FINDSET then 
  while (Variable = ja) and not ExitVar do  
    begin
        .... Some Code...
      Exitvar := next=0;
    end;