Modificar cor da fonte de relatório

[kinhosinfo]

Caros mestres

Como posso imprimir um registro de uma tabela que, dependendo de uma condição, imprimir na cor vermelho, caso contrário, fica preto.

Exemplo: Temos o cadastro de clientes e queremos que na hora do relatório se o cliente for da cidade de São Paulo (municipio - campo da tabela TbCadastro) imprimir vermelho, caso contrário, fica preto.

Desde já, muito obrigado.

Abraços

киÑти длnão маникюра

[Leandro Abbade]

Boa tarde amigo,

Veja:

http://www.4shared.com/file/nISdiIXB/Forma...ondicional.html

[Marcelo Rinaldo]

Boa tarde, kinhosinfo!

Na seção Detalhe, evento Ao Imprimir do seu relatório, coloque uma instrução condicional, como o nosso amigo Leandro se referiu, especificando o campo Cidade, caso seja o seu, nessa condição

Ex:

If Me.Cidade="São Paulo" Then ' Se campo Cidade do relatório for São Paulo

Me.Detalhe.Backcolor=vbRed ' Caso true, pinte seção Detalhe de vermelho

Else

Me.Detalhe.Backcolor=vbBlack ' Caso false, pinte seção Detalhe de preto

Endif

VocÊ pode, ao invés das cores padrões do vb, utilizar o padrão rgb.

Também, caso queira somente realçar a cor das fontes dos registros impressos, então coloque nas condições true e false da instrução, o seguinte:

Me.Cliente.Forecolor=vbRed (true) ou vbBlack (false)

Me.Endereco.Forecolor=vbRed (true) ou vbBlack (false)

Me.Cidade.Forecolor=vbRed (true) ou vbBlack (false) ... e assim vai

Espero tê-lo ajudado!