Example of the ⇘ CAA_Callback.Library:

If the handle is not known any more, the callback can be deleted as shown in the following example:

(* define callback *)

cbDelete.eEvent := CB.BEFORE_RESET;

cbDelete.eClass := CB.ALL_CLASSES;

cbDelete.eSource := CB.ALL_SOURCES;

cbDelete.iPOUFunc := ADR(CAllbackBeforeReset);

 

(* browse all callbacks *)

FOR i:=1 TO CB.GetNumberActiveCallbacks() DO

  (* get handle *)

  h := CB.GetHandleOfCallback(i);

 

  (* if searched callback *)

  IF CB.GetCallback(h)=cbDelete THEN

        (* delete callback *)

        CB.UnregisterCallback(h);

        EXIT;

  END_IF

END_FOR