Que tal foristas....
Quiero carbiarle el color a una cerda dependiendo del valor que tenga en el campo, estoy usando los grid de DevExpress (QuatumGrid) el codigo es el siguiente:
Código Delphi
[-]
procedure TFprestamo.dbgpestamosCustomDrawCell(
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if AViewInfo.Item.ID = 0 then
begin
ACanvas.Canvas.Font.Style := [fsBold];
if Tablas.HprestamoFECHAVENCIMIENTO.Value < Date then
begin
ACanvas.Canvas.Brush.Color := clRed;
ACanvas.Canvas.Font.Color := clBlack;
end;
end;
end;
Si la fecha de vencimiento del prestamo es mayor que la actual que me ponga el numero del prestamo en rojo... pero eso se me aloca y hace lo que le da la gana...
Que estoy haciendo mal... ya he buscado en los foros de devExprees y no entiendo ni papas... una mano por favor..
Thx