[lmikle]

Код:

var
  f1, f2, f3 : String;
begin
  ...
  f1 := AdoQuery.FieldByName('f1').AsString;
  f2 := AdoQuery.FieldByName('f2').AsString;
  f3 := AdoQuery.FieldByName('f3').AsString;
...

И так для каждой записи. По записям ходить через методы запроса First, Next и т.д.