Bom dia amigos da lista! Gostaria apenas de reportar que testei a dica passada e funcionou perfeitamentente!
Sds, Ricardo. Renato Lorandi <[EMAIL PROTECTED]> escreveu: desculpa amigo por não colocar o titulo correto, mas voltando a duvida não funcionou o c;odigo que me passou........ ----- Mensagem original ---- De: Alisson Yahoo <[EMAIL PROTECTED]> Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 21 de Fevereiro de 2007 13:54:43 Assunto: Re: [delphi-br] Boa noite galera Renato, Coloque o título da mensagem mais condizente com o assunto. Ao invés de 'Boa noite galera', seria melhor colocar algo como 'Mudar cor da fonte de StringGrid'. Bem, para resolver o seu problema coloque o seguinte código no evento OnDrawCell: procedure TForm1.StringGrid1D rawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState) ; begin if (ACol = 1) then begin StringGrid1. Canvas.Font. Color := clBlack; StringGrid1. Canvas.TextRect( Rect, Rect.Left, Rect.Top, StringGrid1. Cells[ACol, ARow]); end else if (ACol = 2) then begin StringGrid1. Canvas.Font. Color := clRed; StringGrid1. Canvas.TextRect( Rect, Rect.Left, Rect.Top, StringGrid1. Cells[ACol, ARow]); end; end; [As partes desta mensagem que não continham texto foram removidas] __________________________________________________ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __________________________________________________ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]