Buscar

Destacar celula selecionada stringgrid

Código

{ no evento OnDrawCell se adiciona o seguinte código abaixo:
obs: não tem problema de incompatibilidade se tiver usando o efeito de linhas zebrado na StringGrid, apenas coloque o código embaixo do efeito zebrado}


if gdFocused in State then
with (Sender as TStringGrid).Canvas do
begin
Brush.Color:=clRed;
FillRect(Rect);
TextOut(Rect.Left, Rect.Top, stringgrid2.Cells[acol,arow]);
end;

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Object pascal
Adicionada dia: 03/01/08
Por: Flavio
Visualizada: 16564 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009