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