Bem antes de pensar em colorir sugiro adicionar o evento ONClick no DBGrid da
forma como descreve o código abaixo:
Monte seu form normalmente, colocando o DBGrid e demais componentes;
Vá na seção "private" da unit e declare a procedure abaixo:
private
procedure DBGridClick(Sender: TObject);
Logo após a palavra "implementation", escreva a procedure:
implementation
{$R *.DFM}
procedure TForm1.DBGridClick(Sender: TObject);
begin
ShowMessage('Clicou no DBGrid.');
end;
Coloque as instruções abaixo no evento OnCreate do Form:
procedure TForm1.FormCreate(Sender: TObject);
begin
DBGrid1.ControlStyle := DBGrid1.ControlStyle + [csClickEvents];
TForm(DBGrid1).OnClick := DBGridClick;
end;
Mas agora de cabeça não lembro como colocar a cor.. talvez com um
DbGrid1.Canvas.Brush.Color := clBlack;
Vc consiga.. e para voltar a cor anterior use o evento ONCellClick
Não testei, mas tenta ai.
----- Original Message -----
From: Marx Gentil
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, February 07, 2007 5:13 PM
Subject: [delphi-br] DBGRID
Oi pessoal,
alguém poderia me dizer como trocar a cor da linha selecionada no DBGrid?
__________________________________________________
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]
------------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.432 / Virus Database: 268.17.29/673 - Release Date: 6/2/2007
17:52
[As partes desta mensagem que não continham texto foram removidas]
