Ver Mensaje Individual
  #2  
Antiguo 05-02-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
dIni,dFin:Tdate;
begin
dIni:=Date - 365;
dFin:=Date - 300;

Query1.Close;
Query1.Sql.Clear;

Query1.Sql.Add('Select * from Factura ');
Query1.Sql.Add('Where fecha >='+QuotedStr(FormatDateTime('mm/dd/yyyy',dIni)));
Query1.Sql.Add('and fecha <='+ QuotedStr(FormatDateTime('mm/dd/yyyy',dfin)));

Query1.Open;
end;
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita