oX = NEWOBJECT('cAppHook') *------------------------------------------------------- *-- Class: cMainApp *-- *-- Descrip: AppHook *------------------------------------------------------- DEFINE CLASS cAppHook AS CUSTOM oScreen = _SCREEN PROCEDURE oScreen.RESIZE() WAIT WINDOW NOWAIT 'Here' ENDPROC PROCEDURE oScreen.MINIMIZE() WAIT WINDOW 'Here Minimize...' ENDPROC ENDDEFINE