Icetips Utilities Documentation 2/26/2010     Thread Limit Class: Init

Previous  Top  Next

This method must be called before calling the AddProcedure method.  It also sets the ProcedureName property. The template generate the call to this method into the WindowManager.Run method at priority 1 so it is the very first code that is executed when the procedure is run. 

Example:

ITThreadLocal  Class(ITThreadLimitClass)

TakeLimit        Procedure,VIRTUAL

              End

ThisWindow.Run  PROCEDURE

Code 

ITThreadLocal.Init('Browsepeople')

ITThreadLocal.SetProcedureLimit(1)

If Not ITThreadLocal.CheckProcedure(ITThreadLimit)

  Return LEVEL:Fatal

End

ReturnValue = PARENT.Run()

RETURN ReturnValue

ThisWindow.Init PROCEDURE

Code

If Not ITThreadLocal.AddProcedure(QuickWindow)

  Return LEVEL:Fatal

End

See also:

CloseWindowHandler

AddProcedure

ProcedureName