uses DateUtils {, SysUtils };
begin
writeln(HourOf(Today)); { HourOf(Date) }
end.
Функции даты и времени |
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
Функции даты и времени |
klem4 |
Сообщение
#1
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Пытаюсь выцепить например текущий час, почему-то постоянно выдает 0
uses DateUtils {, SysUtils }; -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
Сообщение
#2
|
Гость |
Я не понял, а что, собственно, ты хочешь, чтобы было? Чтобы при WriteLn(Now) сразу выводилось время в длинном формате? Или что?
|
Текстовая версия | 5.05.2024 21:47 |