Może ktoś z Was doradzi mi ::: jak wydobyć z czasu systemowego Windows informację o bieżącym miesiącu ...........w postaci liczby od 1 do 12?..
(var BiezacyMiesiac: word;)
0
0
F1 + Now + TDateTime
0
format string nie wchodzi tu w grę. Musi to być czysta liczba od 1 do 12....
0
Gdyby to był rok to jest funkcja CurrentYear, ale dla bieżącego miesiąca chyba nie ma podobnej funkcji:).
0
A może by tak help poczytać?
Procedur/funkcji podających aktualny miesiąc jest mnóstwo (niektóre albo wszystkie wymagają uses DateUtils)
MonthOf(Now);
MonthOfTheYear(Now);
DecodeDate(Now, Year, Month, Day);
DecodeDateFully(Now, Year, Month, Day, DOW);
DecodeDateMonthWeek(Now, AYear, AMonth, AWeekOfMonth, ADayOfWeek);
DecodeDateTime(Now, AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond);
DecodeDayOfWeekInMonth(Now, out AYear, AMonth, ANthDayOfWeek, ADayOfWeek);
Zamiast Now może być Today.
0
Dzięki pq ...:)