Colorir um QRDBText?

Delphi

16/11/2004

Olá pessal, cmo faco pra colocar um QRDBText em vermelho se a nota for menor do q a media? Tipo, menor que 15 fica vermelho!


desde ja agradeco

[]s


Titanius

Titanius

Curtidas 0

Respostas

Jc_analista

Jc_analista

16/11/2004

coloca no evento onenter e onexit do dbtext o seguinte:
 if (nota<6)and(nota>0) then
    dbtext.color:=clred
 else 
   dbtext.color:=cdblue;


onde nota e o valor da nota que pode ser do dataset ou do dbtext.


GOSTEI 0
POSTAR