![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с датой
Defort © (2006-11-23 17:41:00)Подскажите пожалуйста статьи по работе с датой в Delphi
Anatoly Podgoretsky (2006-11-24 22:24:00) [1]> Defort (24.11.2006 20:39:32) [32]
Стандартный, его достаточно.
TUser (2006-11-24 22:10:00) [2]На меня Фленов положительное впечатление произвел, когда здесь появился. Очень вменяемый человек. Из книг более-менее внимательно пролистывал "Основные алгоритмы в Delphi" (или как-то так называется), весьма понравилось. Много узнал такого, чего в других базовых учебниках по алгоритмам нет. Правда не уверен, что это был Фленов.
Virgo_Style (2006-11-24 21:49:00) [3]Обычно стандартный, зачем нестандартный нужен?
Defort (2006-11-24 20:39:00) [4]2DevilDevil
Спасибо большое!
2Community
Я не понял, вы Хелп отдельно ставили? Или стандартный юзаете?
Anatoly Podgoretsky (2006-11-24 19:21:00) [5]> Jeer (24.11.2006 16:52:30) [30]
Я про этот номер и говорю, очень конкретное указание, по которому автор должен ознакомиться и только после того все остальные непонятки, но не жалобы на сообщество, оно ему ничего не обязано и оно сделало все необходимое, послало.
Jeer (2006-11-24 16:52:00) [6]
> Anatoly Podgoretsky © (24.11.06 16:11) [29]
Разумеется, большинство так и обозначает, как например в [2]
Anatoly Podgoretsky (2006-11-24 16:11:00) [7]
> в том числе и по направлению к Help.
Не просто в этом направление, а с указанием конкретного адреса.
Anatoly Podgoretsky (2006-11-24 16:06:00) [8]> DevilDevil (24.11.2006 15:49:26) [26]
А ты хочешь, чтобы именно мы скопировали оттуда?
Тогда сразу вопрос, ты понимаешь, что это уже услуга со всеми вытекающими отсюда последствиями. Ты готов ее оплатить, или может тебя жаба задушит и ты сам посмотришь справку?
Jeer (2006-11-24 16:04:00) [9]
> DevilDevil © (24.11.06 15:49) [26]
А кто сказал, что тут обязательна конкретная помощь в виде полупереваренной манной каши ?
Если у человека включаются мозги, то пинок в нужном направлении очень способствует, в том числе и по направлению к Help.
DevilDevil (2006-11-24 15:49:00) [10]2click
перефразирую: Лично я против помощи, которая ограничивается фразами типа "смотри Хелп", "Гугл в помощь", "Учи английский" и т.д. Такая "помощь" раздражает; и помощью как таковой не является. Надеюсь, примерно понятно...
click (2006-11-24 15:32:00) [11]Анатолий что-то мы с Вами друг-друга не понимаем....
я та ЗА! то чтобы смотреть в хелп, также ЗА! то чтобы здесь звучали фразы "смотри в хелп" , а также: хелп у меня установлен и я им регулярно пользуюсь....
я у DevilDevil спросил почему ОН не любит таких фраз...
Anatoly Podgoretsky (2006-11-24 15:10:00) [12]
> шутку юмора не понял :(
Зачем нам за тебя смотреть,
Справки нет - так установи.
click (2006-11-24 14:49:00) [13]
> Anatoly Podgoretsky © (24.11.06 14:42) [22]
шутку юмора не понял :(
Anatoly Podgoretsky (2006-11-24 14:42:00) [14]> click (24.11.2006 14:25:20) [20]
> Почему?
Сам смотри
Jeer (2006-11-24 14:36:00) [15]Не все понимают что такое Хелп.
click (2006-11-24 14:25:00) [16]
> DevilDevil © (24.11.06 13:30) [18]
> Лично я против фраз типа "смотри Хелп"
Почему? разрешите поинтересоваться...
Anatoly Podgoretsky (2006-11-24 14:03:00) [17]> DevilDevil (24.11.2006 13:30:18) [18]
Все нормальные
D1 - D2
trunc(D1 - D2)
trunc(D1) - trunc(D2)
Только надо понимать, что для чего и использовать правильную разницу
DevilDevil (2006-11-24 13:30:00) [18]
> Defort © (23.11.06 20:07) [10]
> 2Джо
> Почему ты считаешь книгу г-на Фленова дрянью? что можешь
> предложить в качестве альтернативы?
Качество книг Михаила Флёнова - тот ещё холивар, уж поверь мне на слово ;) . Я (и многие другие) его уважаю!
> Насчет справки. Я плохо знаю English, но видимо придется
> учить. Здесь чтолибо узнать нереально
Лично я против фраз типа "смотри Хелп", но мне кажется, в твоём случае, огрызаться нельзя. Английский учить надо, а в Хелпе про даты нормально описано всё. Надеюсь, после того как я покажу пару примеров, с остальным ты разберёшься сам:
var
DateTime : TDateTime;
> в) получение текущей даты
DateTime := Now; // Now - функция
> б) корректное высчитывание дней между двумя датами
есть стандартная, но мне в хелп лезть лень, поэтому:
function DaysRazn(D1, D2 : TDateTime) : ineteger;
begin
Result := abs( trunc(D1) - trunc(D2) );
end;
> а) функции перехода на след. месяц. Подсказали что это IncMonth но не знаю как правильно юзать.
DateTime := Now;
DateTime := IncMonth(DateTime, 3); // получишь дату сегодняшнего числа через 3 месяца
Послесловие:
type TDateTime = TDate = TTime = double;
различия в названиях типов делают для большей прозрачности кода. Целая часть такого числа (TDateTime - это число типа Double) обозначает, сколько дней прошло с какого-то там дня (см в справке); если число отрицательное, то - "сколько дней осталось" до какого-то там дня. Дробная часть такого числа (от 0 до 1) показывает, какая часть суток уже прошла. Поэтому (так должно быть):
текущий час = trunc( 24 * frac(Now) );
Успехов!
Defort (2006-11-23 22:52:00) [19]2Джо, Анатолий
Спасибо!
Anatoly Podgoretsky (2006-11-23 22:20:00) [20]> Defort (23.11.2006 19:59:08) [8]
пункт 2 требует расшифровки, остальное есть в справке.
А Флеонова больше не читай, пока мозги не сильно подпорчены.