home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TPBOOK.ZIP / TPBOOK.EXE / SOURCE.EXE / TMENUITM.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1992-08-07  |  281 b   |  15 lines
  1. { TMENUITM.PAS }
  2.   PMenuItem = ^TMenuItem;
  3.   TMenuItem = record
  4.     Next: PMenuItem;
  5.     Name: PString;
  6.     Command: Word;
  7.     Disabled: Boolean;
  8.     KeyCode: Word;
  9.     HelpCtx: Word;
  10.     case Integer of
  11.       0: (Param: PString);
  12.       1: (SubMenu: PMenu);
  13.   end;
  14.  
  15.