Código Delphi [-] AdoQuery.First; While Not AdoQuery.Eof do begin campo1 := AdoQuery.FieldByName('campo1').AsString; campo2 := AdoQuery.FieldByName('campo2').AsString; AdoQuery.Next; end;
AdoQuery.First; While Not AdoQuery.Eof do begin campo1 := AdoQuery.FieldByName('campo1').AsString; campo2 := AdoQuery.FieldByName('campo2').AsString; AdoQuery.Next; end;