[Страдалецъ]

Добро.
Если вы хотите выводить все строки вашего запроса возвращаемые скажем для столбца 0, то идет обход записей возвращенных запросом:

Вариант первый -через Form1.ADOQuery1.RecordCount получить количество записей.

Код:

for i := 0 to Form1.ADOQuery1.RecordCount-1
do begin
    dblistbox1.items.add(ADOQuery1.Fields[0].AsString);
    Form1.ADOQuery1.Next;
    end;
или же, что более правильно при работе с набором данных:
while not Form1.ADOQuery1.eof
do begin
    dblistbox1.items.add(ADOQuery1.Fields[0].AsString);
    Form1.ADOQuery1.Next;
    end;

Admin: Пользуемся тегами!

А вообще, я бы рекомендовал использовать для этих целей TDbLookupListBox, для него ничего ручками заполнять не требуется.