Tema: La Grilla
Ver Mensaje Individual
  #2  
Antiguo 13-06-2007
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 20
cHackAll Va por buen camino
Cool mmm...

Grilla = TDBGrid??? si es así te dejo el ejemplo del evento OnDrawDataCell del propio Delphi.

Código Delphi [-]
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);
begin
  if Table1.FieldByName('Size').AsFloat > 10 then
    DBGrid1.Canvas.Font.Color := clRed;
  DBGrid1.DefaultDrawDataCell(Rect, Field, State);
end;

Si no te funciona utiliza el evento OnDrawColumnCell, para este debes modificar el valor de la propiedad DefaultDrawing tambien.

Espero sea lo que buscas.

Saludos.
Responder Con Cita