Muito obrigado nobre colega, o problema foi resolvido. Abraços
Carlos escreveu: > Boa noite! > Você tem que setar o valor do campo da Query ou Table. ex.: > > if (dmCadastro.cdsCadastroID.Value = 1) then > RLDBText10.Font.Color := clRed > else > RLDBText10.Font.Color := clBlue; > Fraterno abraço. > Carlos > > --- Em delphi-br@yahoogrupos.com.br, Ralp Alves Bezerra > <[EMAIL PROTECTED]> escreveu > >> Estou tentando desta maneira >> >> No evento beforeprint do fortesreport coloquei assim: >> >> if RLDBText10.Caption = '01' then >> RLDBText10.Font.Color := clRed >> else >> RLDBText10.Font.Color := clBlack; >> >> So que não coloca em vermelho somente os iniciados com 01. >> >> Quando dou preview pela primeira vez não acontece nada, mas quando >> cancelo e mando dar um preview novamente todos os campos ficam em >> > vermelho. > >> Alguém tem uma ideia. >> >> Abraços. >> >> > > > > >