IMPRIMIR IMAGEM
Olá amigos preciso imprimir uma imagém que encontr-se em "c:\logo.bmp"
alguém saba como faze isto com o print ou alguém saba de um geito melhor para se fazer...
Na veradade esta imagém ficara como um logotipo da empresa num relatório que eu criei com o objeto print...
Obrigado desde já...
Carregue a imagem diretamente em seu relatório. O objeto printer possui o evento PaintPicture. Veja:
...
Dim oPct As StdPicture
...
Set oPct = LoadPicture("C:\Logo.bmp", , vbLPColor) '256 Cores
...
Printer.PaintPicture oPct, 0, 0, oPct.Width, oPct.Height, PosiçãoOndeDeveIniciarNaImpressão(x), PosiçãoOndeDeveIniciarNaImpressão(y), LarguraDesejadaNaImpressão, AlturaDesejadaNaImpressão, vbSrcCopy
...
Set oPct = Nothing
...
...
Dim oPct As StdPicture
...
Set oPct = LoadPicture("C:\Logo.bmp", , vbLPColor) '256 Cores
...
Printer.PaintPicture oPct, 0, 0, oPct.Width, oPct.Height, PosiçãoOndeDeveIniciarNaImpressão(x), PosiçãoOndeDeveIniciarNaImpressão(y), LarguraDesejadaNaImpressão, AlturaDesejadaNaImpressão, vbSrcCopy
...
Set oPct = Nothing
...
Falha Nostra: Não é EVENTO PaintPicture, mas sim MéTODO PaintPicture.
Tópico encerrado , respostas não são mais permitidas