PostHeaderIconDelphi. Процедура DateTimeToSystemTime( DateTime: TDateTime; var SystemTime: TSystemTime );

Процедура DateTimeToSystemTime( DateTime: TDateTime; var SystemTime: TSystemTime );

Модуль: SysUtils

type TDateTime = type Double;

type TSystemTime = record
   wYear: Word;
   wMonth: Word;
   wDayOfWeek: Word;
   wDay: Word;
   wHour: Word;
   wMinute: Word;
   wSecond: Word;
   wMilliseconds: Word;
   end;

Описание
Функция преобразовывает дату и время из Delphi-формата TDateTime в формат TSystemTime Win32 API. Исходное значение передается в параметре DateTime, результат записывается в переменную SystemTime.

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