home *** CD-ROM | disk | FTP | other *** search
/ POINT Software Programming / PPROG1.ISO / pascal / swag / unitinfo.swg / 0002_Interface Shell Unit.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1993-05-28  |  728 b   |  31 lines
  1. {
  2. Now, I could go in and edit the File by hand...( But I do have a
  3. life )  So I still am asking is it possible to find some sort of
  4. TPU stripper Program to cut out the other sections While keeping
  5. the needed bits still working...
  6.  
  7.   The only thing that comes to mind is building an Interface shell
  8.   Unit, that calls the routines you want to include from your main
  9.   Unit. User's can then ignore your main Compiled .TPU that will
  10.   be required to Compile With your shell Unit. For example here's
  11.   a shell Unit that Uses the ClrScr Procedure from the standard
  12.   TP Crt Unit:
  13. }
  14.  
  15. Unit MyCrt;
  16. Interface
  17.  
  18. Procedure ClrScr;
  19.  
  20. Implementation
  21.  
  22. Uses
  23.   Crt;
  24.  
  25. Procedure ClrScr;
  26. begin
  27.   Crt.ClrScr
  28. end;
  29.  
  30. end.
  31.