[ MatezYU @ 28.02.2007. 12:15 ] @
Imam dva datuma, date2 i date1. Treba da izdracunam razliku u danima i da mi to bude promenljiva tipa integer..
Dakle nekako ovako, a:=date2-date1
Da li ima neka prosta funkcija?
[ morlic @ 28.02.2007. 12:27 ] @
Bas tako kako si napisao, uz malu ispravku:

Razlika:= Trunc(Datum1 - Datum2);

daje razliku u danima.

Imas i unit DateUtils u kome imas funkcije koje ti mogu vratiti razliku u danima, satima, sekundama, plus jos mnogo drugih korisnih stvari
[ _deran_ @ 28.02.2007. 12:27 ] @
a:=daysbetween(date1, date2);
ne znam prostije :) samo ubaci dateutils u uses



(morlic bio brzi za 9 sec :) )
[ Miloš Baić @ 28.02.2007. 12:34 ] @
Pogledaj u helpu:
Citat:
Delphi syntax:

function DaysBetween(const ANow, AThen: TDateTime): Integer;

Code:

uses
  DateUtils;
...
procedure TForm1.FormCreate(Sender: TObject);
var AThen: TDate;
begin
 AThen:= StrToDate('25.02.2007');
 Caption:= IntToStr(DaysBetween(Now, AThen))
end;
[ nikola.j @ 28.02.2007. 17:17 ] @
Uporedi DaysBetween i DaySpan funkcije. Meni povremeno više odgovara DaySpan.