OBJETO PRINTER - BACKGROUND
Bom é o seguinte, tem como eu colocar fundo de texto com o objeto printer?
Eu quero que uma linha fique em tom de cinza estou fazendo o seguinte:
No entando, onde se está escrito "Qualquer teste" o fundo sai branco
Lembrando que no form_load eu marquei
Printer.DrawMode = 10
Printer.ScaleMode = 6 'Milimetros
Tem como fazer isso ou estou fazendo algo de errado?
Eu quero que uma linha fique em tom de cinza estou fazendo o seguinte:
Dim Y as Printer.CurrentY
Y = Printer.CurrentY
'Fundo da linha
Printer.Line (10, Printer.CurrentY)-(Printer.ScaleWidth - 10,Printer.CurrentY + 10), QbColor(7), BF
Printer.CurrentY = Y
Printer.Print "Qualquer teste"
No entando, onde se está escrito "Qualquer teste" o fundo sai branco
Lembrando que no form_load eu marquei
Printer.DrawMode = 10
Printer.ScaleMode = 6 'Milimetros
Tem como fazer isso ou estou fazendo algo de errado?
Alguem?
Bem, tentei executar esse comando com DrawMode = CopyPen funcionou direito, mas com o Not Xor Pen que você pos realmente fica branco. Vê-se que o problema é do DrawMode msm.
Valeu, não sei o q estava fazendo ainda mas deu certinho
Tópico encerrado , respostas não são mais permitidas