| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Функция EncodeDate в KOL [Delphi, Windows]
Сашик © (2008-06-01 11:00:00)Пишу: EncodeDate(2008, 10, 10, Dt). Получаю 10.10.3907.
Пишу: EncodeDate(8+101, 10, 10, Dt). Получаю 10.10.2008. Как использовать EncodeDate? Каким образом можно перевести также и время (10:10:10)? Неужели обязателен SysUtils...
Сашик (2008-06-03 12:59:00) [1]В результате всех затраченных усилий переписал EncodeDate и EncodeTime из SysUtils. Не пойму зачем писать свою функцию, применять SystemTime2DateTime, а потом отнимать 693594
Compiler (2008-06-01 23:12:00) [2]> А как быть EncodeTime-рованием?
Самому написать несложно. Как вариант:
var Dt:TdateTime;
St:TSystemTime;
begin
St.wDay:=10;
St.wMonth:=10;
St.wYear:=2008;
St.wHour:=10;
St.wMinute:=10;
St.wSecond:=10;
SystemTime2DateTime(St,Dt);
end;
Сашик (2008-06-01 20:08:00) [3]Уважаемый Vladimir Kladov спасибо за ответ... А как быть EncodeTime-рованием?
Vladimir Kladov (2008-06-01 19:24:00) [4]Штука в том, чем вы получаете 10.10.3907. DateTime отличается от дельфийского и SQL-вского точкой отсчёта даты.
| |
