override message function before closedown

Close your application immediately without any messagebox like “Record changed, save?”.

!------------------------------------------------------------------------------------------
! hook prototype
mmessage (STRING,,,,UNSIGNED=0,BOOL=FALSE),UNSIGNED,PROC ! hook message

!------------------------------------------------------------------------------------------
! Hook procudure
mmessage  function(msg,tit,ico,but,def,sty)
 code
 return(BUTTON:NO)


!------------------------------------------------------------------------------------------
! hook messagebox and now close the app
 system{Prop:MessageHook} = address(mmessage)
 post(Event:CloseDown,,1)

Schreibe einen Kommentar