Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Dino César Vitória

[Resolvido] Chamar DrawColumnCell

Recommended Posts

Olá pessoal.

 

Estou querendo chamar o evento DrawColumnCell a partir de outra procedure.

 

Apenas para exemplificar, possuo esse código no meu evento DrawColumnCell

 

procedure TFAuditoriaEtq.dbgEtiquetasDrawColumnCell(Sender: TObject;
 const Rect: TRect; DataCol: Integer; Column: TColumn;
 State: TGridDrawState);
begin
 inherited;

 if dbgEtiquetas.Columns[3].Field.AsInteger  < cedSegundos.Value then
 begin
   dbgEtiquetas.Canvas.brush.Color := clred;
   dbgEtiquetas.DefaultDrawDataCell(Rect, dbgEtiquetas.Columns[DataCol].Field, State);
 end;

end;

 

O que eu quero é que, quando eu sair do campo cedSegundos, ele execute o DrawColumnCell novamente, mas não estou conseguindo fazer isso no exit dele, sempre dá erro de parâmetro.

 

Desde já agradeço!

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.