Cita:
Empezado por Luvac
...estoy utilizando un stringgrid lo que quiero hacer es que al momento que esta esta seleccionada resalte la fila encontre este codigo buscando en este foro...
|
Hola Luvac.
No termino de entender el efecto que buscas lograr, pero el código de tu mensaje hace exáctamente lo mismo que este:
Código Delphi
[-]
procedure TForm1.StringGrid2DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
with Sender as TStringGrid do
begin
if gdSelected in State then
begin
Canvas.Font.Color:= clred;
Canvas.Font.Style:= [fsBold];
end;
Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2, Cells[ACol,ARow])
end
end;
Saludos
