home *** CD-ROM | disk | FTP | other *** search
/ Frostbyte's 1980s DOS Shareware Collection / floppyshareware.zip / floppyshareware / DPSX / TOOL-INC.ZIP / TOP.INT < prev    next >
Encoding:
Text File  |  1990-08-16  |  351 b   |  15 lines
  1. (*
  2.  * top - utility library for simple "pull-down" windows
  3.  *        uses functions in popup.inc (3-1-89)
  4.  *
  5.  *)
  6.  
  7. const
  8.    top_pulled:  boolean = false;
  9.    top_entry:   integer = 0;
  10.  
  11. procedure top_menu(topx,topy:   integer);
  12.    {top level pulldown window processor; display the top level window
  13.     and process pulldowns related to it}
  14.  
  15.