home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / ECO30603.ZIP / ECO30603.LZH / ECOLIBCS / DEMOS / DEMO_DAT.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1993-03-08  |  143 b   |  11 lines
  1. uses
  2.   eco_lib
  3.  
  4.   ;
  5.  
  6.  
  7. begin
  8.   writeln(__longint2date(__date2longint(__longint2date(__curdate2longint))));
  9.   writeln(__curdate);
  10. end.
  11.