Show
(Available in 00 TS Base(GUI) - TS_Base_6_StatusBoxDialog)
Source
METHOD Show( ) AS DWORD PASCAL CLASS TS_StatusBox
LOCAL oStatusBoxGlobalData AS _TS_StatusBoxGlobalData
LOCAL lSuperModalStatusBox AS LOGIC
LOCAL oPreviousStatusBox AS TS_StatusBox
LOCAL pstruSavBoxInfo AS _TS_StatusBoxBoxInfo
LOCAL pstruWinInfo AS _TS_StatusBoxWinInfo
LOCAL struBoxInfo IS _TS_StatusBoxBoxInfo
LOCAL oApp AS OBJECT
#IFDEF TS_TRACETIMED_ENABLE
_TS_TraceTimedEnter( SysAddAtom( PSZ( _CAST, __APPLICATION__ ) ), SysAddAtom ; ...
... ( PSZ( _CAST, __MODULE__ ) ), SysAddAtom( PSZ( _CAST, __ENTITY__ ) ) )
#ENDIF
oPreviousStatusBox:=_TS_ErrorSysSetErrorBoxCount( TRUE, SELF, TRUE )
IF oPreviousStatusBox<>NULL_OBJECT
oPreviousStatusBox:Disable