Fórum delphi twain #442653
11/05/2013
0
Olá Pessoal! fiz um sistema e nesse mesmo sistema gostaria de implementar no cadastro de clientes a captura da imagem direto da webcam. quando digito o código o aplicativo roda normal porem quando clico no botão capturar imagem nada acontece. estou usando o RAD 2010 E O SITEMA OPERACIONAL WINDOWS 8 MAS TAMBEM TEMTEI COM O XP E O 7 E NAO FUNCIONOU
o código é esse :
procedure TFormCliente.ButWebCanClick(Sender: TObject);
begin
DelphiTwain1.LibraryLoaded:= false;
DelphiTwain1.SourceManagerLoaded:= false;
DelphiTwain1.LibraryLoaded:= true;
DelphiTwain1.SourceManagerLoaded:= true;
if DelphiTwain1.LibraryLoaded = false then exit;
if DelphiTwain1.SourceCount = 0 then exit;
DelphiTwain1.Source[0].TransferMode:= ttmMemory;
DelphiTwain1.Source[0].Loaded:= false;
DelphiTwain1.Source[0].Enabled:= false;
DelphiTwain1.Source[0].Loaded:= true;
DelphiTwain1.Source[0].Enabled:= true;
end;
onde está errado?
o código é esse :
procedure TFormCliente.ButWebCanClick(Sender: TObject);
begin
DelphiTwain1.LibraryLoaded:= false;
DelphiTwain1.SourceManagerLoaded:= false;
DelphiTwain1.LibraryLoaded:= true;
DelphiTwain1.SourceManagerLoaded:= true;
if DelphiTwain1.LibraryLoaded = false then exit;
if DelphiTwain1.SourceCount = 0 then exit;
DelphiTwain1.Source[0].TransferMode:= ttmMemory;
DelphiTwain1.Source[0].Loaded:= false;
DelphiTwain1.Source[0].Enabled:= false;
DelphiTwain1.Source[0].Loaded:= true;
DelphiTwain1.Source[0].Enabled:= true;
end;
onde está errado?
Glebson Guimaraes
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)