|
|
Postada em 26/09/2007 01:39 hs
A dica da API não funcionou mas dei uma fuçada nos meus códigos que tenho em casa e isso funcionou: Printer.Line (500, 200)-(2000, 1000), RGB(255, 0, 0), BF
Printer.CurrentX = 600
Printer.CurrentY = 300
Printer.Print "TEXTO"
Printer.EndDoc Vai imprimir uma caixa vermelha com texto preto... para mudar a cor do texto é só colocar Printer.forecolor = sua_cor Para usar um quadro sempre use "BF". b => cria uma caixa (box) f => colore a caixa blz? Vai dar trabalho mas qdo estiver pronto vai ficar legal... falows |
|
|
|
|
|
Tamanini
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 26/09/2007 15:36 hs
Isso é o que eu faço, mas não funciona aqui. Somente se eu fizer isso dentro de uma picturebox e depois mando imprimir o que está desenhado na picture. Até o momento foi esta solução que encontrei, mas perde uma pouco da qualidade da imagem.
|
|
|
|
|
|
Postada em 26/09/2007 18:18 hs
Vc está setando cor para a impressora? Printer.ColorMode = vbPRCMColor
'... código
Printer.EndDoc
Printer.ColorMode = VbPRCMMonochrome |
|
|
|
Tamanini
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 27/09/2007 16:57 hs
Sim. Tanto que sai o fundo verde, mas os textos que imprimo por cima do fundo, ficam com um contorno em branco. Como se eu tivesse passado um marcador de texto.
|
|
|
|
|
|
Postada em 27/09/2007 18:17 hs
Mas isso imprimindo com a picture ou com a impressão direta? |
|
|
|
Tamanini
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 28/09/2007 11:45 hs
Isso com a impressão direta. Se eu for imprimir pela picture isso não acontece.
|
|
|
|
