|
Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
Delphi 3 Standard
|
Re: Differenz berechnen
10. Jul 2003, 19:38
Hallo Uncle Cracker,
Luckie hat Recht! aber so sollte es glaube ich sein.
Delphi-Quellcode:
function DaysBetween2(Datetime1, DateTime2: TDateTime): Integer;
begin
if DateTime1 < Datetime2 then
begin
Result := Trunc(DateTime2 - DateTime1);
end
else
begin
Result := Trunc(DateTime1 - DateTime2);
end;
end;
bye
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
|