EndOfAWeek
Adam Boduch
EndOfAWeek
Moduł: DateUtils
Przykład:
program FooApp;
{$APPTYPE CONSOLE}
uses
SysUtils, DateUtils;
var
A : TDateTime;
begin
A := EndOfAWeek(2006, 50);
Writeln(DateTimeToStr(A));
Readln;
end.
W tym przykładzie, na konsoli wyświetlone zostanie: 2006-12-17 23:59:59
Zobacz też: