Ayuda Urgente

[marcoszorrilla]

Despues de muchas vueltas y como Paradox no admite la inclusión de la sentencia Date dentro del SQL he logrado lo que quieres mediante una variable tipo texto incrustada en la sentencia SQL.

procedure TForm1.Button1Click(Sender: TObject);
Var

f:String;
begin

f:=FormatDateTime('mm/dd/yyyy',date);
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select Fecha,Fecven');
Query1.Sql.Add(',Fecven -'''+f+'''as dias');
Query1.Sql.Add('from Factura');

Query1.Open;
end;

Un Saludo.