home *** CD-ROM | disk | FTP | other *** search
- /* Anlegen des Programmobjektes für das CD-Menü */
- CALL RxFuncAdd 'SysLoadFuncs','Rexxutil','SysLoadFuncs'
- CALL SysLoadFuncs
- PROG='OS2MENU.EXE'
- PFAD=Translate(Filespec('D',directory())||'\VOGEL')
- TITEL='OS/2 Spezial 3/96'd2c(10)'Die CD-ROM'
- Result = SysCreateObject('WPProgram', TITEL, '<WP_DESKTOP>','EXENAME='PFAD'\'PROG';STARTUPDIR='PFAD';PROGTYPE=PM', 'R')
- if result <> 1 then say "Es ist ein Fehler beim Anlegen des Objektes aufgetreten !"
- exit
-