Previous: SwapVectors procedure To the Table of Content Next: DOSCall Unit

- 4.24.2.35 -
Standard Units
Dos Unit
Dos Unit Procedures and Functions

UnpackTime procedure

Targets: MS-DOS only


Dos Unit, WinDos Unit

Converts a Longint to a record.

Declaration:
procedure UnpackTime(Time: Longint; 
                      var DateTime: TDateTime);
Remarks:
UnPackTime can be used in conjunction with GetTime, FindFirst, and FindNext.
These routines return a file's four byte packed date and time stamp. To pack a DateTime record, use PackTime.

Example:
uses
  Dos;
var
  Fi  : Text;
  Time: Longint;
  DT  : DateTime;
begin
  Assign(Fi,'USER.DOC');
  Reset(Fi);
  GetFTime(Fi,Time);
  UnPackTime(Time,DT);
  WriteLn('Year:   ',DT.Year);
  WriteLn('Month:  ',DT.Month);
  WriteLn('Date:   ',DT.Day);
  Close(Fi);
end.



Previous: SwapVectors procedure To the Table of Content Next: DOSCall Unit
SwapVectors procedure Table of Content DOSCall Unit

- 4.24.2.35 -