Fitrar por fecha actual

[javimax182]

Disculpa pero no me reconoce las instruciones MonthOfTheYear Monthof Yearof.
Usan algun tipo de uses?

[[Caral]]

Hola
Perdon se me olvido decirte.
coloca este despues de implementacion:

Código Delphi [-]

implementation

uses DateUtils;

Saludos

[[maeyanes]]

Hola...

Así es... tienes que poner DateUtils en el uses de la forma... pero, solo si tienes Delphi 6 en adelante...


Saludos...

[javimax182]

Si funciona gracias. Pero el que me tira error es el de las ventas del dia.

Este es el codigo que le puse:

With QVentas do begin
Close;
sql.clear;
sql.add('select * from ResumenVentas where FechaCompra like :fecha');
parambyname('fecha').asdate:= date;
execsql;
Open;
end;

Me tira este error Type mismatch in expresion

Sabes porque?

[[maeyanes]]

Y ya probaste con:

Código Delphi [-]
sql.add('select * from ResumenVentas where FechaCompra = :fecha');

[javimax182]

SIIIIIIIIIIIIIII. GRACIAS TODOS. CON TODO LO QUE ME AYUDARON, CLUB DELPHI SE GANO UN FIEL USUARIO.

[[Caral]]

Hola

Código Delphi [-]
var  
 FFecha: TDateTime;
begin
  FFecha:= Now;  // la fecha
// aqui empieza el codigo tuyo.
With QVentas do begin
Close;
sql.clear;
sql.add('select * from ResumenVentas where FechaCompra = :fecha');
parambyname('fecha').Value:= FFecha;
//execsql;
Open;
end;

Saludos