Recimo, imam :
Code:
var
a : TSystemTime;
b : TSystemTime;
c : TSystemTime;
begin
a.wMilliSeconds := 500;
a.wSecond := 50;
a.wMinute := 30;
a.wHour := 12;
a.wDay := 25;
a.wMonth := 2;
a.wYear := 2005;
b.wMilliSeconds := 880;
b.wSecond := 13;
b.wMinute := 21;
b.wHour := 21;
b.wDay := 09;
b.wMonth := 5;
b.wYear := 2;
c := AddTimes(a, b);
end;
var
a : TSystemTime;
b : TSystemTime;
c : TSystemTime;
begin
a.wMilliSeconds := 500;
a.wSecond := 50;
a.wMinute := 30;
a.wHour := 12;
a.wDay := 25;
a.wMonth := 2;
a.wYear := 2005;
b.wMilliSeconds := 880;
b.wSecond := 13;
b.wMinute := 21;
b.wHour := 21;
b.wDay := 09;
b.wMonth := 5;
b.wYear := 2;
c := AddTimes(a, b);
end;
I sad, kako da u c smestim rezultat sabiranja a i b promenljivih ? Treba paziti i na prestupne godine, dane u mesecima itd... ? Hvala