Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   comparacion de un campo del DBGRID con Fecha. (https://www.clubdelphi.com/foros/showthread.php?t=46122)

pmpisani 24-07-2007 21:28:31

comparacion de un campo del DBGRID con Fecha.
 
Buenos dias, queria consultar como hacer una comparacion entre un campo "Date" de una tabla, con la fecha actual.
Tengo la Tabla con el campo "Fecha_Ingr", lo que quiero hacer es comparar si esa fecha es 10 dias menor a la fecha actual, de ser asi, pintar el registro del DBGRID de color rojo.
Se puede hacer esto? Si me pueden dar una mano se los agradeceria.. Muchas gracias por adelantado.:mad:

marcoszorrilla 24-07-2007 21:36:38

Prueba este código:

Código Delphi [-]
procedure TfrConFacturas.DBGrid1ColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
dHoy:=Date;

 if FacturaFecha.Value <= Date - 10 then
 Begin
 DBGrid1.Canvas.Brush.Color :=clInfobk;
  DBGrid1.canvas.font.color:=ClRed;
  DBGrid1.DefaultDrawColumnCell(Rect,Datacol,Column,State);
  end
end;


Un Saludo.

pmpisani 24-07-2007 22:41:05

Muchas Gracias por la pronta respuesta, me sirvio perfecto..
Un saludo!!:)


La franja horaria es GMT +2. Ahora son las 04:19:25.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi