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

Интересно, это только мне глаз режет такой код:

Код:

if adoquery1.isEmpty=false then 

И еще, не стоит для прохода по БД использовать repeat т.к. первый проход будет выполнен всегда независимо от наличия данных в БД.