Dificuldade com Controle ActiveX

Delphi

14/06/2005

Srs. Gostaria da colaboração de voces!

Estou utilizando um componenet TImgScan para capturar imagem de uma Web Cam LG (Instalei os drivers) e lançar em um TImage, só que o controle ActiveX que o componente está utilizando é o da minha Impressora/Scanner (Sharp) é o ´Kodak Image Scan Control - (Version 1.0)´.

O problema é que o componente só funciona com o scanner ligado!!
Quando desligado retorna a mensagem: ´Scanner or Scanner handler error´.

Como é que faço o ActiveX ser ativado pelo meu aplicativo e não somente pelo scanner?

Estou utilizando o comando abaixo:

begin
try
ImgScan1.OpenScanner;
ImgScan1.ScanTo:=2;
ImgScan1.FileType := 3;
ImgScan1.Image:= ExtractFilePath(ParamStr(0)) + ´imagens\´ + Q_Nome.FieldByName(´Cod_Bar´).AsString + ´.bmp´;
ImgScan1.StartScan;
application.ProcessMessages;
finally

try
ImgScan1.CloseScanner;
imgFoto.Picture.LoadFromFile(ExtractFilePath(ParamStr(0)) + ´imagens\´ + Q_Nome.FieldByName(´Cod_Bar´).AsString + ´.bmp´);
except
end;
end;
end;


---------------------

Obs. já tentei instalar o DsPack descrito aqui no forum mas não consegui sempre diz que está faltando o arquivo D3DX9ab.dll. (uso o Delphi 6).


Agradeço muito se alguem puder me ajudar!!

Obrigado :oops:


Aurino003

Aurino003

Curtidas 0
POSTAR