home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / WINDOWS / PROGRAM / UCB.ZIP / SUBMENU.003 < prev    next >
Encoding:
Text File  |  1990-12-03  |  928 b   |  26 lines
  1. \comment       Windows 3.0 Application Script (Version 1.00)
  2. \comment                      
  3. \comment       (C) Copyright DEA Software 1990
  4. \comment 
  5. \comment 
  6.            case IDM_MENU_@[2,3]_@[2,7]:
  7.                /* ADD your code to sub Menu "@[(10+@[2,3]),(10+@[2,6])]" */
  8. \if @[10+@[2,3],100+@[2,6]] <> 1
  9. \skip 2
  10.                lpfnDlgProc = MakeProcInstance (@[(10+@[2,3]),(200+@[2,6])]DlgProc, hInst);
  11.                DialogBox (hInst, "@[(10+@[2,3]),(200+@[2,6])]", hWnd, lpfnDlgProc);
  12.                FreeProcInstance (lpfnDlgProc);
  13. \eskip 2
  14. \if @[10+@[2,3],100+@[2,6]] <> 2
  15. \skip 2
  16.                lpfnDlgProc = MakeProcInstance (@[(10+@[2,3]),(200+@[2,6])]DlgProc, hInst);
  17.  
  18.                hDlgModeless = CreateDialog (hInst, "@[(10 + @[2,3]),(200+@[2,6])]", hWnd,
  19.                                             lpfnDlgProc);
  20. \eskip 2
  21.                break;
  22.  
  23. \equ @[2,4] = + 1
  24. \equ @[2,6] = + 1
  25. \equ @[2,7] = + 1
  26.