home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TP_ADV.ZIP / LIST0802.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1989-07-31  |  651 b   |  26 lines
  1. Unit OvrTwo;
  2. { This is simply an interface unit to unit OvrOne.  It is     }
  3. { called from the driver procedure in OvrThre, and will call  }
  4. { the interfaced procedure Proc1.  It is included as an       }
  5. { example of an overlayd application.                         }
  6.  
  7. {$O+,F+}            { Instruct compiler this can be overlayed }
  8.  
  9. Interface
  10.  
  11. Uses OvrOne;
  12.  
  13. Procedure OvrTwo1;
  14.  
  15. Implementation
  16.  
  17. Procedure OvrTwo1;
  18. { This procedure will simply make a call to the procedure     }
  19. { interfaced in unit OvrOne.                                  }
  20.  
  21. Begin
  22.   Proc1;           { Call the procedure...                    }
  23. End;
  24.  
  25. End.
  26.