PostHeaderIconDelphi. Функция TimeStampToDateTime( const TimeStamp: TTimeStamp ): TDateTime;

Функция TimeStampToDateTime( const TimeStamp: TTimeStamp ): TDateTime;

Модуль: SysUtils

type TDateTime = type Double;

type TTimeStamp = record
   Time: Integer;     // Число миллисекунд прошедших с полуночи
   Date: Integer;     // Количество дней прошедших с 1 января 0001г
   end;

Описание
Функция преобразовывает значение типа TTimeStamp в соответствующее значение типа TDateTime.

 
Copyright © 2007-2010 IsIProg.ru. All Rights Reserved.