PDA

Ver la Versión Completa : problemas con las fechas


majosf
14-09-2005, 11:34:01
hola!! Tengo la version 5.0 de delphi y me gustaría saber como puedo restar 2 fechas por ejemplo 12/9/2005 - 10/9/2005 y que me devuelva 2.

Es urgente!! gracias

vtdeleon
14-09-2005, 13:44:38
Saludos

Usa la funcion Daysbetween()

majosf
14-09-2005, 16:11:58
Hola!! La funcion daysbetween no forma parte de delphi 5.0, sabes otra forma de hacerlo.

gracias por todo

Chente(rMan)
14-09-2005, 16:59:05
Intenta de esta manera.



procedure TForm1.Button1Click(Sender: TObject);
var d1, d2 : TDate;
begin
d1 := StrToDate('12/9/2005');
d2 := StrToDate('10/9/2005');
ShowMessage(IntToStr(Trunc(d1-d2)));
end;



En fin, se vale reir.

Fita
15-09-2005, 02:42:37
Fijate en la libreria ESBDates, tiene funciones de todo tipo y esta la DaysBetween
Puedes bajarla de:
http://www.softpile.com/Development/Source_Code/Review_08509_index.html

Espero te sirva

Saludos