 Функции даты и времени |
| klem4 |
 31.01.2007 19:15
Сообщение
#1
|
 Perl. Just code it!  Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация:  44   |
Пытаюсь выцепить например текущий час, почему-то постоянно выдает 0
uses DateUtils {, SysUtils };
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
   |
 
|
  |
Ответов
| klem4 |
31.01.2007 20:00
Сообщение
#2
|
|
Perl. Just code it! Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
 Цитата function Today: TDateTime; Цитата function HourOf( const AValue: TDateTime ):Word; Я вот из таких соображений исходил ... -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
Сообщений в этой теме
klem4 Функции даты и времени 31.01.2007 19:15
volvo :blink: Ты что, час в дате искать собрался? :)
Во... 31.01.2007 19:46 volvo А вот из таких не пробовал исходить:
4.4.125 Toda... 31.01.2007 20:02 klem4 С слона то я и не приметил)) СПасибо 31.01.2007 20:19 klem4 Подскажите процедуру или какую глобальную переменн... 1.02.2007 21:21 volvo Я не понял, а что, собственно, ты хочешь, чтобы бы... 1.02.2007 21:50 klem4
:yes2:
Writeln(TimeToStr(Now)); 1.02.2007 21:54 volvo Время печатается в формате, задаваемом ShortTimeFo... 1.02.2007 21:59 klem4 Да какраз то что я и пытался найти, спасибо. 1.02.2007 22:08 compiler а как найти разницу между переменной датой и сегод... 23.02.2007 12:57
volvo :mad: ЭТО - не ТВОЙ текст... Вот напиши СВОЙ, пот... 23.02.2007 15:29 compiler
:mad: ЭТО - не ТВОЙ текст...
как щаблон я взял ... 23.02.2007 15:44 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 25.07.2025 23:57 |