On Sat, Jan 26, 2013 at 6:11 AM, Sven Barth <pascaldra...@googlemail.com> wrote:
> I think he also means things like (without critizing):

Yes, thank for a dose of sanity :)

Few more examples, taken from just one standard package:

while Node.NextBrother<>nil do begin
  ...
  Node:=Node.NextBrother;
end;

while Node<>nil do begin
  ...
  Node:=Node.Next;
end;

while Node<>nil do begin
  ...
  Node:=Node.NextSibling;
end;

while Result<>nil do begin
  ...
  Result:=Result.NextError;
end;

> MyDataSet.First;
> while not MyDataset.Eof do begin
>   // ...
>   MyDataSet.Next;
> end;
> // on a sidenote: what about a TDataSet enumerator? :)

It is not clear what should loop variable contain:
for v in MyDataSet do ... -- what is v?

--
Alexander S. Klenin
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to