[b.grigorev]

С эти кодом пошло вроде бы.
Запускаю все нормально, ошибок нет, НО когда я меняю в компоненте ADOQuery active:=false на active:=true, показывается ошибка: Неправильно определен объект Parameter. Предоставлены несовместимые или неполные сведения.