10.05.2012, 02:47
|
 |
Прохожий
|
|
Регистрация: 12.07.2010
Адрес: Северодвинск
Сообщения: 19
Версия Delphi: 7, 2010
Репутация: 10
|
|
Код:
while not Query1.Eof do begin
Query1['Vremya'].AsDateTime := TimeOf(Query1['Vremya'].AsDateTime);
end;
функции и процедуры для работы с TDateTime
http://platonov-andrei.narod.ru/Delphi/DateTimeUtil.htm |