Database not assigned

Sou novato, e estou recebendo esta mensagem na hora de executar o programa, ja refiz todos os procedimentos varias vezes e nada, estou usando firebird 1.5, feito no ibexpert, a conexão foi feita com TIBQuery e Data Module IBDatabase e IBTransaction.

´Database not assigned´