OnErrorGosub()

Syntax

OnErrorGosub(@Procedure())

Wenn ein Fehler auftritt, wird Ihr Programm zu der als Parameter angegebenen Prozedur umgeleitet.

Beispiel:

  Procedure ErrorHandler() 
    v=MessageRequester("Es trat ein Fehler auf...","Das Programm fortsetzen?",20) 
    If v=7 
      End 
    EndIf 
  EndProcedure 

  OnErrorGosub(@ErrorHandler())

  ; Wir machen hier eine Division durch Null, was normalerweise bereits durch den
  ; PB Debugger abgefangen wird. Deaktivieren Sie diesen also, um diesen#
  ; ErrorHandler zu testen.
  a = 0 
  b = 1 
  c = b / a     ; dies bringt die ErrorHandler() Prozedur in Aktion

  MessageRequester("Info","Normales Ende")
  End

Unterstützte OS

Windows