Mensagem de erro ao Conectar com Banco SQL SERVER

Pessoal bom dia, estou fazendo um Serviçe aplication e minha conexão com o Banco de dados também esta dentro de uma Thread porém após o serviço ser inicializado eu vou estabelecer conexão com o Banco de dados SQL Server 2000 e quando vou dar um conected := True dá a seguinte mensagem de erro ´[b:801aeedde6]EOleException - CoInitialize has not been called[/b:801aeedde6]´ estou usando Delphi 7.0