Caro Gonçalves,

 

Não posso usar o dgRowSelect, pois este não permite que o usuário navegue
com as teclas cursoras para os lados.

 

[]’s

Christian Balz

 

 

  _____  

De: ms_goncalves [mailto:[EMAIL PROTECTED] 
Enviada em: terça-feira, 26 de outubro de 2004 04:15
Para: [EMAIL PROTECTED]
Assunto: [delphi-br] Re: Colorir apenas a linha selecionada do DBGrid, sem
usar o RowSelect

 


Oi Christian,

   Eu consegui pintar a linha da tabela com:

procedure TFmCtrlGrid.DBGrid2DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
  If gdSelected in State then
  begin
    Dbgrid2.Canvas.Brush.Color:= clRed;
    DBGrid2.Canvas.FillRect(Rect);
  end;
  DBGrid2.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;

   mas, o dgRowSelect tava no True.

   Nao entendi pq vc nao quer usar o dgRowSelect... se for apenas 
pelo desafio de fazer sem a propriedade sugiro tentar montar uma 
query identificando a linha e fazer algo do tipo 
Dados.IBQuery1.FieldByName('CAMPO').Value = flag para determinar os 
campos que irao aparecer no grid com valor pintura diferente.

[]s

MSG

--- Em [EMAIL PROTECTED], "Christian Balz" <[EMAIL PROTECTED]> 
escreveu
> Ola Pessoal,
> 
>  
> 
> Estou utilizando o código abaixo no evento OnDrawColumnCell, mas 
somente a
> célula clicada fica colorida.
> 
>  
> 
>   If gdSelected in State then begin
> 
>     With (Sender as TDbGrid).Canvas do begin
> 
>       Brush.Color := $0028C0B1;
> 
>       FillRect(Rect);
> 
>       (Sender as TDbGrid).DefaultDrawDataCell(Rect,Field,State);
> 
>     end;
> 
>   end;
> 
>  
> 
> Como faço para colorir apenas a linha selecionada do DbGrid, sem 
usar o
> RowSelect?
> 
>  
> 
> Se alguém souber me ajudar fico grato,
> 
>  
> 
> []'s
> 
> Christian Balz
> 
>  
> 
> 
> 
> [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]







Yahoo! Grupos, um serviço oferecido por:



PUBLICIDADE
 
<http://br.rd.yahoo.com/SIG=12apr27ck/M=264379.5078783.6203979.1588051/D=brc
lubs/S=2137111264:HM/EXP=1098857753/A=2332652/R=0/id=noscript/SIG=119058f8i/
*http:/br.download.yahoo.com/messenger/> 

 

  _____  

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]
<mailto:[EMAIL PROTECTED]> 
  
*       O uso que você faz do Yahoo! Grupos está sujeito aos Termos
<http://br.yahoo.com/info/utos.html>  do Serviço do Yahoo!. 



[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

 



Responder a