Código Delphi [-]AdoQuery1.First; while not AdoQuery1.Eof do begin ShowMessage(AdoQuery1.Fields[0].AsString); AdoQuery1.Next; end;
AdoQuery1.First; while not AdoQuery1.Eof do begin ShowMessage(AdoQuery1.Fields[0].AsString); AdoQuery1.Next; end;