Como criar um arquivo JPEG em tempo de execucão ?
Olá boa noite!
Sou Desenv. Delphi-7 + DBExpress + FireBird 2.1
TEnho o seguinte problema:
Fiz uma rotina para pegar erros do sistema, executar um
PrintScreen da tela e salvar em um arquivo.
Mas acontece que não se como criar um arquivo e salvar esta imagem no formato JPEG.
Obs: Usei o metodo "keybd_event(vk_snapshot,1, 0, 0)" para dar um printScreen na Janela Ativa.
Se alguem puder ajudar nesta, desde já meus agradecimentos. ANT.CARLOS/SP
PrintScreen da tela e salvar em um arquivo.
Mas acontece que não se como criar um arquivo e salvar esta imagem no formato JPEG.
Obs: Usei o metodo "keybd_event(vk_snapshot,1, 0, 0)" para dar um printScreen na Janela Ativa.
Se alguem puder ajudar nesta, desde já meus agradecimentos. ANT.CARLOS/SP
Antonio Jesus
Curtidas 0
Respostas
Rafael Mattos
23/06/2011
Olha esse exemplo que tinha feito antes, ele tira a foto da tela do MSN e salva no PC,
é só vc adaptar ele pra vc
http://www.4shared.com/file/HRCpKXYq/Janela.html
--------------------------------------------------------------------------------
Blog: http://mundodoprogramador.wordpress.com/
MSN: rafmattos@hotmail.com
Twitter: _rafmattos
é só vc adaptar ele pra vc
http://www.4shared.com/file/HRCpKXYq/Janela.html
--------------------------------------------------------------------------------
Blog: http://mundodoprogramador.wordpress.com/
MSN: rafmattos@hotmail.com
Twitter: _rafmattos
GOSTEI 0