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;