home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1990 / 04 / tricks / ppdemo.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1990-01-15  |  442 b   |  14 lines
  1. (* ------------------------------------------------------ *)
  2. (*                      PPDEMO.PAS                        *)
  3. (*         (c) 1990  Dietmar Meisel & TOOLBOX             *)
  4. (* ------------------------------------------------------ *)
  5. PROGRAM PPdemo;
  6.  
  7. USES PPath;
  8.  
  9. BEGIN
  10.   WriteLn(ProgPath);
  11. END.
  12. (* ------------------------------------------------------ *)
  13. (*                  Ende von PPDemo.PAS                   *)
  14.