INIT
(Available in 00 TS Base(GUI) - TS_Base_6_StatusBoxDialog)
Source
METHOD INIT( uoOwner, uoErrorOrStatusHL, udwLevel ) CLASS TS_StatusBox
LOCAL oStatusBoxGlobalData AS _TS_StatusBoxGlobalData
LOCAL cSeverity2String AS STRING
LOCAL struWinBitmap IS _WinBitmap
LOCAL oGlobalData AS _TS_GlobalData
LOCAL dwSeverity AS DWORD
LOCAL pszBitmap AS PSZ
LOCAL dwLevel AS DWORD
#IFDEF TS_TRACETIMED_ENABLE
_TS_TraceTimedEnter( SysAddAtom( PSZ( _CAST, __APPLICATION__ ) ), SysAddAtom ; ...
... ( PSZ( _CAST, __MODULE__ ) ), SysAddAtom( PSZ( _CAST, __ENTITY__ ) ) )
#ENDIF
oStatusBoxGlobalData:=_TS_ModuleGetStatusBoxGlobalData( )
oGlobalData:=oStatusBoxGlobalData:_GlobalData
pszBitmap:=NULL_PSZ
SELF:_ButtonCount:=0U
SELF:_OButtons:=ArrayCreate