Qual era o problema? Vc estava usando o meu código (exatamente) na sua unit? :-)
Sds, Celso do A. Vianna Martins Desenvolvimento de Sistemas ------------------------------------------------------- Archive ISP - Rio de Janeiro - RJ www.archive.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 202634027 "Tudo aquilo que algum idiota diz que é urgente, é algo que este imbecil não fez em tempo hábil e quer que você se foda para fazer em tempo recorde." -------Mensagem original------- De: [EMAIL PROTECTED] Data: 09/14/04 17:33:42 Para: [EMAIL PROTECTED] Assunto: RESOLVIDO Re: [delphi-br] DBGrid colorida Na procedure OnDrawColumnCell: if Query.FieldByName('DATAVENC').AsDateTime < now then DBGrid2.Canvas.Font.Color := clRed; else DBGrid2.Canvas.Font.Color := clBlue; DbGrid2.DefaultDrawColumnCell(Rect, DataCol, Column, State); Felipe Diesel --------------------------- "In a world without walls and fences, who needs Windows and Gates?" by Mozilla Thunderbird http://www.mozilla.org.br -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html