Relatório zebrado
Pessoal, alguém sabe como posso alterar a cor de uma linha no quickrept dependendo do valor de um campo?
Anonymous
Curtidas 0
Respostas
Rodrigo_lemes
05/02/2003
No evento BerofePrint da banda onde está o campo coloque
if Query1Campo.Value = ´Valor´
Then Begin
NomeDaBanda.Color:= clWindow
Else
NomeDaBanda.Color:= clWindowText;
Obs.: O Valor tem que ser idêntico (Case sensitive).
Este procedimento só funciona em tempo de execução, não funciona com o previw em tempo de projeto.
Qualquer dúvida me envie um e-mail.
Um grande abraço,
Rodrigo Lemes
if Query1Campo.Value = ´Valor´
Then Begin
NomeDaBanda.Color:= clWindow
Else
NomeDaBanda.Color:= clWindowText;
Obs.: O Valor tem que ser idêntico (Case sensitive).
Este procedimento só funciona em tempo de execução, não funciona com o previw em tempo de projeto.
Qualquer dúvida me envie um e-mail.
Um grande abraço,
Rodrigo Lemes
GOSTEI 0
Rodrigo_lemes
05/02/2003
Perdão, sobrou um begin :-)
if Query1Campo.Value = ´Valor´
Then
NomeDaBanda.Color:= clWindow
Else
NomeDaBanda.Color:= clWindowText;
Bjos!
if Query1Campo.Value = ´Valor´
Then
NomeDaBanda.Color:= clWindow
Else
NomeDaBanda.Color:= clWindowText;
Bjos!
GOSTEI 0