TSystemTime

type TSystemTime = record

  case Integer of

    0: (

        Year: Word;

Year part.

        Month: Word;

Month part.

        Day: Word;

Day of month part.

        DayOfWeek: Word;

        Hour: Word;

Hour of the day.

        Minute: Word;

Minute of the hour.

        Second: Word;

Second of the minute.

        MilliSecond: Word;

Milliseconds in the second.

      );

    1: (

        wYear: Word;

        wMonth: Word;

        wDay: Word;

        wDayOfWeek: Word;

        wHour: Word;

        wMinute: Word;

        wSecond: Word;

        wMilliseconds: Word;

      );

end;