10-03-2023
|
Miembro
|
|
Registrado: oct 2022
Posts: 143
Poder: 2
|
|
Cita:
Empezado por chenech
Esto lo acabo de probar en FMX con StringGrid y me funciona en StringGrid1DrawColumnCell
Sacado de aqi:
https://stackoverflow.com/questions/...grid-row-color
Código:
var
aRowColor: TBrush;
aNewRectF: TRectF;
begin
aRowColor := TBrush.Create(TBrushKind.Solid, TAlphaColors.Alpha);
if (StringGrid1.Cells[7, Row] = '1') then
aRowColor.Color := TAlphaColors.Green
else
aRowColor.Color := TAlphaColors.Red;
aNewRectF := Bounds;
aNewRectF.Inflate(3, 3);
Canvas.FillRect(aNewRectF, 0, 0, [], 1, aRowColor);
Column.DefaultDrawCell(Canvas, Bounds, Row, Value, State);
aRowColor.free;
|
gracias amigo Funciona perfecto pero ahora estoy buscando de cambiar el color de la fuente y colocarlo en negrita en la misma celda seleccionada en verde y no se como hacerlo
|