Dá uma olhada no evento OnDrawColumnCell. Um dos parâmetros é o Column, use-o para identificar a coluna, depois é só pintar
Por exemplo: if Column.FieldName = 'NOME' then begin DBGrid1.Canvas.Brush.Color := clInfoBk => cor da célula DBGrid1.Canvas.Font.Color := clActiveCaption => cor da fonte DBGrid1.Canvas.Font.Style := [fsBold] => negrito DBGrid1.DefaultDrawDataCell(Rect, Column.Field, State) => redesenha a célula end ----- Original Message ----- From: "Cleiton" <[EMAIL PROTECTED]> To: "Delhpi" <delphi-br@yahoogrupos.com.br> Sent: Friday, January 20, 2006 9:54 AM Subject: [delphi-br] Mudar Cor Da Célula Da Grid Olá pessoal ... Faço uma pesquisa em um DBGrid usando "locate" no envento OnChange do componente edit. Gostaria que no momento em que o locate encontra o valor pesquisado, que mudasse a cor da célula do DBgrid que passa a ficar em foco no momento da pesquisa. É possível fazer isso? E se for, como deveria fazer? Alguém poderia me ajudar? Desde já agradeço a colaboração de todos. -- Esta mensagem foi verificada pelo sistema de antivírus e acredita-se estar livre de perigo. [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Links do Yahoo! Grupos -- <<<<< 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] 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