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
