GetDate
Verze z 2. 10. 2012, 15:42, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Uses DOS)
Vrací aktuální datum, nastavené v operačním systému.
- Deklarace
procedure GetDate(var Year, Month, Day, DayOfWeek: Word);
- Režim
- Windows, Reálný, Chráněný
- Poznámky
- Rozsahy vracených hodnot jsou Year 1980..2099, Month 1..12, Day 1..31 a DayOfWeek 0..6 (kde 0 odpovídá neděli).
- Viz také
- GetTime
Vzorový příklad
{ GetDate.PAS } { Vzorový příklad pro proceduru GetDate. } { Pro Windows: } { uses WinDos, WinCrt; } uses Dos; const days : array [0..6] of String[9] = ('Neděle','Pondělí','Úterý', 'Středa','Čtvrtek','Pátek', 'Sobota'); var y, m, d, dow : Word; begin GetDate(y,m,d,dow); Writeln('Dnes je ', days[dt],', ', m:0, '/', d:0, '/', y:0); end.