Надо-же угадал.

Вы получаете некоторый набор данных возвращаемых в AdoQuery, а в мемо всегда заносите только первый элемент из этого набора.
Надо-же его весь проссматривать:
Код:
while not fMain.ADOQuery1.eof
do begin
Memo1.Lines.Add(fMain.ADOQuery1.Fields[0].AsString)
fMain.ADOQuery1.Next;
end;