Bo Berglund wrote:
Both work, but return only one record (there should be 4).
Or at least the code loop below only traverses once:
while not query.EOF do
begin
S := S + query.FieldByName('AppNo').AsString + #13#10;
query.Next;
end;
What happens if you put an explicit .First before the loop?
query.Active:= true;
query.First;
while not query.EOF do
begin
S := S + query.FieldByName('AppNo').AsString + #13#10;
query.Next;
end;
--
Mark Morgan Lloyd
markMLl .AT. telemetry.co .DOT. uk
[Opinions above are the author's, not those of his employers or colleagues]
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
