esto debería ser rápido, milisegundos, a más tardar 1.5 segundos:
Código Delphi
[-]
try
AdoQuery1.Active := true;
AdoQuery1.DisableControls;
while (not AdoQuery1.EOF) do begin
Memo1.Lines.Add(Trim(AdoQuery1['Nombre']));
AdoQuery1.Next;
end;
finally
AdoQuery1.EnableControls;
AdoQuery1.Active:=False;
end;
Si es lento, pon tu SQL y dinos los índices que tienes creados en la tabla, así como clave primaria
Saludos