if i got a Error i use BEGIN SEQUENCE / RECOVER where i want to QUIT ( all )
Code: Select all
IF HB_ISOBJECT( oControl )
bOldError := ERRORBLOCK( { | e | BREAK( e ) } )
BEGIN SEQUENCE
// here call Sub-Class
RECOVER USING oError
ERRORBLOCK( bOldError )
MsgInfo("Problem VLC Engine"+ CRLF + CRLF + oError:description + " : " + oError:operation,"Error VLC ActiveX "+ LTRIM(HB_VALTOSTR( oError:osCode )) )
QUIT // here QUIT hole App
END SEQUENCE
ERRORBLOCK( bOldError )
p.s. some TIMER are running ... can this be a Problem to QUIT ?