Que tal buen dia,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:
Código:
var
i:Integer;
texto:STring;
begin
For i:=1 to StringGrid1.ColCount-1 Do
begin
If (gdSelected in State) Then
begin
StringGrid1.Canvas.Font.Color := clred;
StringGrid1.Canvas.Font.Style:=[fsBold];
end
else
StringGrid1.Canvas.Font.Color := clBlack;
Texto := StringGrid1.Cells[ACol,ARow];
StringGrid1.Canvas.TextRect( Rect, Rect.Left+2, Rect.Top+2, Texto);
end;
Lo hase como lo necesito pero el problema es que me escribe doble,una en color rojo adelante y la otra en negro atras,y los titulos tambien los pone dobles,como corrijo esto.(disculpen si este tema ya se habia tocado pero no encontre el topic)