image
Caro colegas
como faço para pegar a imagem que eu coloquei no clipboard através do commando abaixo
keybd_event(vk_snapshot,1, 0, 0); {Tela Toda}
quero salvar ela em arquivo
c:\imagem1.bmp
c:\imagem1.jpg
Ricardo
como faço para pegar a imagem que eu coloquei no clipboard através do commando abaixo
keybd_event(vk_snapshot,1, 0, 0); {Tela Toda}
quero salvar ela em arquivo
c:\imagem1.bmp
c:\imagem1.jpg
Ricardo
Zlink
Curtidas 0
Respostas
Marcelo Saviski
27/08/2003
experimente isso:
procedure SalvaImagemCopiada;
var
p : TPicture;
begin
p := TPicture.create;
try
p.PasteFromClipboard;
p.SavetoFile(Arquivo_tal);
finally
p.free;
end;
end;
procedure SalvaImagemCopiada;
var
p : TPicture;
begin
p := TPicture.create;
try
p.PasteFromClipboard;
p.SavetoFile(Arquivo_tal);
finally
p.free;
end;
end;
GOSTEI 0
Zlink
27/08/2003
Caro colega
p.PasteFromClipboard;
o delphi está parando na linha acima, undeclared Identifier;
Aguardo resposta.
p.PasteFromClipboard;
o delphi está parando na linha acima, undeclared Identifier;
Aguardo resposta.
GOSTEI 0