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) сразу выводилось время в длинном формате? Или что?
|
klem4 Функции даты и времени 31.01.2007 23:15
volvo :blink: Ты что, час в дате искать собрался? :)
Во… 31.01.2007 23:46
klem4 :blink:
Я вот из таких соображений исходил .… 1.02.2007 0:00
volvo А вот из таких не пробовал исходить:
4.4.125 Toda… 1.02.2007 0:02
klem4 С слона то я и не приметил)) СПасибо 1.02.2007 0:19
klem4 Подскажите процедуру или какую глобальную переменн… 2.02.2007 1:21
klem4
:yes2:
Writeln(TimeToStr(Now)); 2.02.2007 1:54
volvo Время печатается в формате, задаваемом ShortTimeFo… 2.02.2007 1:59
klem4 Да какраз то что я и пытался найти, спасибо. 2.02.2007 2:08
compiler а как найти разницу между переменной датой и сегод… 23.02.2007 16:57
volvo :mad: ЭТО - не ТВОЙ текст... Вот напиши СВОЙ, пот… 23.02.2007 19:29
compiler
:mad: ЭТО - не ТВОЙ текст...
как щаблон я взял … 23.02.2007 19:44![]() ![]() |
|
Текстовая версия | 23.11.2025 4:26 |