+2
Maicon
Kelson Davisson
6 participantes
[Resolvido]Print do Form e enviar por email
Kelson Davisson- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3
Registrado : 02/03/2017
- Mensagem nº1
[Resolvido]Print do Form e enviar por email
Galera tenho um formulário e queria que na hora que clicasse no botão salvar, o mesmo retirasse o print do formulário e colasse no outlook para envio do email. Grato da atenção e ajuda.
Maicon- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 267
Registrado : 08/09/2012
- Mensagem nº2
Re: [Resolvido]Print do Form e enviar por email
"https://www.maximoaccess.com/t33531-copiar-um-relatorio-em-formato-txt-para-area-de-transferencia"
Basicamente mesma coisa, porem escolha pdf ou xps.
Basicamente mesma coisa, porem escolha pdf ou xps.
.................................................................................
"O talento vence jogos, mas só o trabalho em equipe ganha campeonatos."
Michael Jordan
Bons Estudos.
Kelson Davisson- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3
Registrado : 02/03/2017
- Mensagem nº3
Re: [Resolvido]Print do Form e enviar por email
Ola amigos não sei se fui bem claro não estou querendo enviar via email o relatório, estou é querendo capturar a tela do formulário ai sim enviar por email.
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº4
Re: [Resolvido]Print do Form e enviar por email
Olá a todos,
Kilson, o mais simples era criar um relatório com a mesma informação do form para enviar.
Em foto, fica mais pesado para o envio por email.
No entanto se pretende dessa forma veja link abaixo para fazer a captura e salvar em ficheiro:
social.technet.microsoft.com/wiki/contents/articles/23860.print-screen-to-an-image-using-access-vba.aspx
Para enviar por email, pode ser como o colega exemplificou, se pretende automáticamente não falta exemplos no fórum, será fazer uma "Busca".
Abraço a todos
Kilson, o mais simples era criar um relatório com a mesma informação do form para enviar.
Em foto, fica mais pesado para o envio por email.
No entanto se pretende dessa forma veja link abaixo para fazer a captura e salvar em ficheiro:
social.technet.microsoft.com/wiki/contents/articles/23860.print-screen-to-an-image-using-access-vba.aspx
Para enviar por email, pode ser como o colega exemplificou, se pretende automáticamente não falta exemplos no fórum, será fazer uma "Busca".
Abraço a todos
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº5
Re: [Resolvido]Print do Form e enviar por email
Assim serve ?
- Código:
DoCmd.SendObject acSendForm, "SeuFormulario", acFormatPDF, "", "", "", "teste", "teste"
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº6
Re: [Resolvido]Print do Form e enviar por email
Ou assim, um pouco mais complexo;
Download
Download
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº7
Re: [Resolvido]Print do Form e enviar por email
Olá a todos,
Kelson Araujo, como ficou a situação?
Os membros do fórum merecem e agradecem o retorno.
Caso a situação esteja Resolvida não se esqueça de dar o tópico como tal, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos
Abraço a todos
Kelson Araujo, como ficou a situação?
Os membros do fórum merecem e agradecem o retorno.
Caso a situação esteja Resolvida não se esqueça de dar o tópico como tal, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos
Abraço a todos
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº8
Re: [Resolvido]Print do Form e enviar por email
Boa noite, JPaulo.
Daria pra mandar o exemplo em .mdb (2003)
Obrigado.
Daria pra mandar o exemplo em .mdb (2003)
Obrigado.
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº9
Re: [Resolvido]Print do Form e enviar por email
Ola
Desculpe de só ver agora o seu pedido;
Em Ms Access 2003:
Download
Desculpe de só ver agora o seu pedido;
Em Ms Access 2003:
Download
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº10
Re: [Resolvido]Print do Form e enviar por email
Boa tarde, JPaulo.
Sem problemas, amigo.
Muito obrigado.
Um exemplo perfeito.
Eu gostaria de saber se tem como em vb passar para jpg o formulário todo, não apenas a parte visível da tela que é o que o Print screen faz(usando a tela toda), como também esse seu exemplo (usando o form em foco.).
Sem problemas, amigo.
Muito obrigado.
Um exemplo perfeito.
Eu gostaria de saber se tem como em vb passar para jpg o formulário todo, não apenas a parte visível da tela que é o que o Print screen faz(usando a tela toda), como também esse seu exemplo (usando o form em foco.).
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº11
Re: [Resolvido]Print do Form e enviar por email
Olá a todos,
Grande JPaulo, ficou um excelente exemplo.
Leoni Dias, altere a extensão de .JPG para .BMP na parte do código abaixo e teste:
Kelson Araujo, como ficou a situação?
Os membros do fórum merecem e agradecem o retorno.
Caso a situação esteja Resolvida não se esqueça de dar o tópico como tal, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos
Abraço a todos
Grande JPaulo, ficou um excelente exemplo.
Leoni Dias, altere a extensão de .JPG para .BMP na parte do código abaixo e teste:
- Código:
'salva a imagem do form
SalvaImagem (CurrentProject.Path & "\MeuForm_" & Format(Now, "ddmmyyyyhhmmss") & ".jpg")
Kelson Araujo, como ficou a situação?
Os membros do fórum merecem e agradecem o retorno.
Caso a situação esteja Resolvida não se esqueça de dar o tópico como tal, veja como fazer:
https://www.maximoaccess.com/t860-resolucao-de-topicos
Abraço a todos
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº12
Re: [Resolvido]Print do Form e enviar por email
Boa noite.
Agora me perdi todo.
Quer dizer que muando a extensão de JPG para BMP será salvo no pc e enviado para o email o formulário completo e não apenas a parte visível na tela?
Entendi não.
Agora me perdi todo.
Quer dizer que muando a extensão de JPG para BMP será salvo no pc e enviado para o email o formulário completo e não apenas a parte visível na tela?
Entendi não.
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº13
Re: [Resolvido]Print do Form e enviar por email
Olá, desculpe fiz confusão com a pergunta.
Para isso desconheço, vamos ver se algum colega ajuda, ou amanha analiso melhor o codigo e vejo como ajudar.
Abraço a todos
Para isso desconheço, vamos ver se algum colega ajuda, ou amanha analiso melhor o codigo e vejo como ajudar.
Abraço a todos
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº14
Re: [Resolvido]Print do Form e enviar por email
Olá Leoni Dias,
Veja se é o pretendido.
Abraço
Veja se é o pretendido.
Abraço
- Anexos
- PrintScreen_Opcional_e_anexa_ao_Outlook_2003.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (39 Kb) Baixado 88 vez(es)
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº15
Re: [Resolvido]Print do Form e enviar por email
Boa tarde, Ahteixeira.
Obrigado por sua ajuda, mas não bem isso não. Eu queria a transformação do form para JPG, mas o form completo, Mão a tela toda.
No exemplo existem a duas opções, mas em uma o form principal aparece todo porque é pequeno e na outra transforma a tela toda.
O que eu queria é transformar o form principal todo, sem corte da tela em um JPG, assim como o office 2007 (infelizmente não consegui fazer dessa forma do 22007 no 2003) faz com o form quando o transforma em PDF.
Mesmo assim, obrigado novamente.
Obrigado por sua ajuda, mas não bem isso não. Eu queria a transformação do form para JPG, mas o form completo, Mão a tela toda.
No exemplo existem a duas opções, mas em uma o form principal aparece todo porque é pequeno e na outra transforma a tela toda.
O que eu queria é transformar o form principal todo, sem corte da tela em um JPG, assim como o office 2007 (infelizmente não consegui fazer dessa forma do 22007 no 2003) faz com o form quando o transforma em PDF.
Mesmo assim, obrigado novamente.
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº16
Re: [Resolvido]Print do Form e enviar por email
Olá Leoni Dias,
Acho que só mesmo criando PDF como JPaulo exemplificou.
Será que podria ser um SnaoShot, veja tópico abaixo:
https://www.maximoaccess.com/t29915-criar-ficheiro-snapshot-de-um-relatorio
Pode aplicar a mesma técnica a form.
Abraço
Acho que só mesmo criando PDF como JPaulo exemplificou.
Será que podria ser um SnaoShot, veja tópico abaixo:
https://www.maximoaccess.com/t29915-criar-ficheiro-snapshot-de-um-relatorio
Pode aplicar a mesma técnica a form.
Abraço
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº17
Re: [Resolvido]Print do Form e enviar por email
Boa noite.
Infelizmente tentei de todas as formas mas o acOutputForm e acFormatSNP não está funcionando, mesmo com o Snapviewer instalado.
DoCmd.OutputTo acOutputForm, "frm_teste", _
acFormatSNP, Application.CurrentProject.Path & "\Teste.snp", True
Infelizmente tentei de todas as formas mas o acOutputForm e acFormatSNP não está funcionando, mesmo com o Snapviewer instalado.
DoCmd.OutputTo acOutputForm, "frm_teste", _
acFormatSNP, Application.CurrentProject.Path & "\Teste.snp", True
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº18
Re: [Resolvido]Print do Form e enviar por email
Olá Leoni Dias,
Tive oportunidade de testar no 2003 e 2010 e não funciona sendo um Form.
Estranho, pois na documentação diz que permite.
msdn.microsoft.com/en-us/library/office/aa220433(v=office.11).aspx
Vamos ver se mais algum colega pode ajudar.
Abrçao
Tive oportunidade de testar no 2003 e 2010 e não funciona sendo um Form.
Estranho, pois na documentação diz que permite.
msdn.microsoft.com/en-us/library/office/aa220433(v=office.11).aspx
Vamos ver se mais algum colega pode ajudar.
Abrçao
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº19
Re: [Resolvido]Print do Form e enviar por email
1º Abra o seu formulario em modo de estrutura.
2º Vá em cima do lado esquerdo a "File" ou "Ficheiro"
3º Save Object As
4º Escolha "Report" ou "Relatório"
Desta forma fica com um relatório igual ao seu formulario, pode até deletar os botões se existirem.
Quando necessitar de exportar para Snapshot faça-o para o relatório e não formulário.
Mil maneiras de fazer nestum.
2º Vá em cima do lado esquerdo a "File" ou "Ficheiro"
3º Save Object As
4º Escolha "Report" ou "Relatório"
Desta forma fica com um relatório igual ao seu formulario, pode até deletar os botões se existirem.
Quando necessitar de exportar para Snapshot faça-o para o relatório e não formulário.
Mil maneiras de fazer nestum.
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº20
Re: [Resolvido]Print do Form e enviar por email
Bom dia a todos os amigos que sempre ajudam muito.
Eu acredito que vou ter que apelar para uma impressora pdf virtual de terceiros.
Já fiz os testes e funciona bem melhor do que eu esperava.
O problema, JPaulo, é que meus forms se baseiam em cconsultas que são realizadas colocando dados no próprio form, na hora, através de controles de texto, Listbox e outros. O relatório não funciona dessa forma.
Tentei no access 2007... a conversão para o pdf sai perfeita, porém são muitos os problemas com os forms que são baseados em consulta e quando eu faço o Applifilter de um registro, não consigo fazer mais (mesmo colocando a origem do form em tabela e não em consulta). Acredito que como depois da consulta de um registro específico o filtro, como tem apenas esse registro, não consiga procurar outro.
Mas valeu. Entre mortos e feridos, salvaram-se todos. São muitas as mudanças que eu teria que fazer para apenas para não usar uma impressora virtual, é preferível usar o software externo.
Novamente, obrigado.
Ps. Coisas do ruindows: diz que a conversão do form para o snap funciona e só funciona para relatório.
Eu acredito que vou ter que apelar para uma impressora pdf virtual de terceiros.
Já fiz os testes e funciona bem melhor do que eu esperava.
O problema, JPaulo, é que meus forms se baseiam em cconsultas que são realizadas colocando dados no próprio form, na hora, através de controles de texto, Listbox e outros. O relatório não funciona dessa forma.
Tentei no access 2007... a conversão para o pdf sai perfeita, porém são muitos os problemas com os forms que são baseados em consulta e quando eu faço o Applifilter de um registro, não consigo fazer mais (mesmo colocando a origem do form em tabela e não em consulta). Acredito que como depois da consulta de um registro específico o filtro, como tem apenas esse registro, não consiga procurar outro.
Mas valeu. Entre mortos e feridos, salvaram-se todos. São muitas as mudanças que eu teria que fazer para apenas para não usar uma impressora virtual, é preferível usar o software externo.
Novamente, obrigado.
Ps. Coisas do ruindows: diz que a conversão do form para o snap funciona e só funciona para relatório.
leoni_dias- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 179
Registrado : 14/08/2011
- Mensagem nº21
Re: [Resolvido]Print do Form e enviar por email
Boa noite a todos.
Problemas resolvidos e de uma forma que eu não esperava depois da decepção com o access 2007.
Instalei o runtime do access 2010 e reconheceu o mdb do 2003 sem nenhuma restrição ou problemas maiores,isso tudo sem eu precisar transformar no formato do 2010.
Obrigado a todos.
Problemas resolvidos e de uma forma que eu não esperava depois da decepção com o access 2007.
Instalei o runtime do access 2010 e reconheceu o mdb do 2003 sem nenhuma restrição ou problemas maiores,isso tudo sem eu precisar transformar no formato do 2010.
Obrigado a todos.
Alvaro Teixeira- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 7996
Registrado : 15/03/2013
- Mensagem nº22
Re: [Resolvido]Print do Form e enviar por email
Olá Leoni Dias, que bom que resolveu.
O Access 2003 já não tem suporte do fabricante, será uma otima oportunidade passar a usar numa versão mais recente.
Obrigado pelo retorno.
Abraço a todos
O Access 2003 já não tem suporte do fabricante, será uma otima oportunidade passar a usar numa versão mais recente.
Obrigado pelo retorno.
Abraço a todos
ORLANDOCBM- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 37
Registrado : 01/08/2019
- Mensagem nº23
J Paulo, vc é um gênio! Preciso muito que me ajude!
J Paulo, vi o exemplo postado por vc aqui, o qual me ajudou a quase chegar no objetivo que estou querendo.
Amigo, tenho um formulário chamado WEBCAM, o qual utilizo num projeto em access para capturar a foto do cliente e vínculo dessa foto no seu respectivo cadastro (formulário de clientes).
Estou tendo problemas em relação ao dimensionamento da imagem capturada (queria que a imagem capturada fosse exatamente nas dimensões do SUBFORMULÁRIO nomeado de PICWEBCAM (que tem como objeto de origem outro formulário chamado PIC) - Vc deve conhecer com certeza esta forma de captura pela webcam! O problema é que minha imagem capturada não sai nas dimensões desejadas.
Pensei então numa maneira de fazer um PRINT SCREEN do PICWEBCAM, mas até então não estava conseguindo, até encontrar seu exemplo aqui postado.
No entanto, seu exemplo está dando o print screen do meu formulário inteiro, ou seja, do formulário WEBCAM, e eu queria que ele desse o print screen apenas de uma parte desse formulário, ou seja: no SUBFORMULÁRIO PICWEBCAM.
Veja a imagem que posto aqui do meu resultado e vc entenderá. Portanto, gostaria que vc me dissesse onde eu modifico (acredito ser no módulo) e qual modificação eu devo fazer no código.
fico muito agradecido pelo apoio!
Amigo, tenho um formulário chamado WEBCAM, o qual utilizo num projeto em access para capturar a foto do cliente e vínculo dessa foto no seu respectivo cadastro (formulário de clientes).
Estou tendo problemas em relação ao dimensionamento da imagem capturada (queria que a imagem capturada fosse exatamente nas dimensões do SUBFORMULÁRIO nomeado de PICWEBCAM (que tem como objeto de origem outro formulário chamado PIC) - Vc deve conhecer com certeza esta forma de captura pela webcam! O problema é que minha imagem capturada não sai nas dimensões desejadas.
Pensei então numa maneira de fazer um PRINT SCREEN do PICWEBCAM, mas até então não estava conseguindo, até encontrar seu exemplo aqui postado.
No entanto, seu exemplo está dando o print screen do meu formulário inteiro, ou seja, do formulário WEBCAM, e eu queria que ele desse o print screen apenas de uma parte desse formulário, ou seja: no SUBFORMULÁRIO PICWEBCAM.
Veja a imagem que posto aqui do meu resultado e vc entenderá. Portanto, gostaria que vc me dissesse onde eu modifico (acredito ser no módulo) e qual modificação eu devo fazer no código.
fico muito agradecido pelo apoio!
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº24
Re: [Resolvido]Print do Form e enviar por email
Nas propriedades do seu controle de imagem no formulario, se você for á aba formato e alterar para "Estender" = "Stretch" acredito que a foto ficará show.
.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.
Pay-Pal R$ Aqui
Pay-Pal € Aqui
Ou ainda: Aqui (Novo)
Sucesso e Bons Estudos
Success and Good Studies
Utilize o Sistema de Busca do Fórum...
102 Códigos VBA Gratuitos...
Instruções SQL como utilizar...
ORLANDOCBM- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 37
Registrado : 01/08/2019
- Mensagem nº25
Já tentei essas opções! Posto meu BD para análise
Pois é. Já tentei estender, cortar, tentei tb o modo zoom (que é padrão) mas só dá certo com a combinação CORTAR + definir a resolução da imagem gerada pela câmera para 160 x 120 (só que a imagem gerada não preenche toda área do SUBFORMULÁRIO PICWEBCAM e o resultado da imagem capturada é uma foto levemente desfocada, muito pouco mesmo).
O problema com isso é que eu teria que diminuir o tamanho do SUBFORMULÁRIO PICWEBCAM, o qual defini daquele tamanho justamente para ficar melhor de enxergar e fazer o enquadramento na hora da captura. OBS: o SUBFORMULÁRIO PICWEBCAM tem o dobro das dimensões da foto do cliente no FORMULÁRIO DE CLIENTES.
Será que tem uma forma de fazer a imagem gerada pela webcam ocupar exatamente toda a área do SUBFORMULÁRIO PICWEBCAM sem perder as proporções (sem haver distorção da foto)?
Vou limpar os registros do meu BD postar aqui. Se vc puder dar uma olhada e sugerir algo, agradeço de montão. Postarei 2 versões:
1: captura a foto da webcam
2: faz o print screen do formulário
o formulário de clientes que relato aqui é denominado CADASTRO DE MILITAR no BD.
E se for abrir normalmente o BD, escolhe o usuário "Orlando" (que é único na verdade) e a senha é 123456
Abç!
O problema com isso é que eu teria que diminuir o tamanho do SUBFORMULÁRIO PICWEBCAM, o qual defini daquele tamanho justamente para ficar melhor de enxergar e fazer o enquadramento na hora da captura. OBS: o SUBFORMULÁRIO PICWEBCAM tem o dobro das dimensões da foto do cliente no FORMULÁRIO DE CLIENTES.
Será que tem uma forma de fazer a imagem gerada pela webcam ocupar exatamente toda a área do SUBFORMULÁRIO PICWEBCAM sem perder as proporções (sem haver distorção da foto)?
Vou limpar os registros do meu BD postar aqui. Se vc puder dar uma olhada e sugerir algo, agradeço de montão. Postarei 2 versões:
1: captura a foto da webcam
2: faz o print screen do formulário
o formulário de clientes que relato aqui é denominado CADASTRO DE MILITAR no BD.
E se for abrir normalmente o BD, escolhe o usuário "Orlando" (que é único na verdade) e a senha é 123456
Abç!
- Anexos
- Exemplos 1 e 2.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (1.9 Mb) Baixado 50 vez(es)
ORLANDOCBM- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 37
Registrado : 01/08/2019
Prezado JPaulo,
Cheguei na solução:
1) tive que deixar ativo o seguinte código: Call SendMessage(hCap, WM_CAP_SET_SCALE, True, 0) 'mantém o subformulário PICWEBCAM totalmente preenchido, independente da resolução da webcam;
2) redimensionei SUBFORMULÁRIO PICWEBCAM para receber de forma correta a imagem gerada pela webcam (no caso, tive que diminuir a altura dele. No final, ficou 6 cm de largura por 4,5 cm de altura (mais ou menos proporcional à resolução de 320 X 240);
3) deixei, como vc sugeriu, a propriedade "MODO TAMANHO" da picturebox que recebe a foto no formulário de clientes como CORTAR;
4) Ficou excelente!!! Agora só falta incluir uma rotina para que, após clicar no botão que ativa a câmera, mudar a resolução para 160x120, pois ela sempre inicia em 640x480.
Poderia me dizer onde insiro essa parte do código?
Seria em alguma parte deste código?
hCap = capCreateCaptureWindow("Take a Camera Shot", WS_CHILD Or WS_VISIBLE, 0, 0, 226, 170, PicWebCam.Form.hwnd, 0)
Cheguei na solução:
1) tive que deixar ativo o seguinte código: Call SendMessage(hCap, WM_CAP_SET_SCALE, True, 0) 'mantém o subformulário PICWEBCAM totalmente preenchido, independente da resolução da webcam;
2) redimensionei SUBFORMULÁRIO PICWEBCAM para receber de forma correta a imagem gerada pela webcam (no caso, tive que diminuir a altura dele. No final, ficou 6 cm de largura por 4,5 cm de altura (mais ou menos proporcional à resolução de 320 X 240);
3) deixei, como vc sugeriu, a propriedade "MODO TAMANHO" da picturebox que recebe a foto no formulário de clientes como CORTAR;
4) Ficou excelente!!! Agora só falta incluir uma rotina para que, após clicar no botão que ativa a câmera, mudar a resolução para 160x120, pois ela sempre inicia em 640x480.
Poderia me dizer onde insiro essa parte do código?
Seria em alguma parte deste código?
hCap = capCreateCaptureWindow("Take a Camera Shot", WS_CHILD Or WS_VISIBLE, 0, 0, 226, 170, PicWebCam.Form.hwnd, 0)