Sub TabSheetBoxOnProtectionFail(Sender: Object; Args: ITabProtectionFailedEventArgs);
Begin
//set of operators
End Sub TabSheetBoxOnProtectionFail;
Sender - a parameter, indicating the component, in which the event has occurred.
Args - a parameter, which allows to define additional event parameters.
The OnProtectionFail event occurs when table protection fails.
To execute the example, the procedure has to be set as an event handler to the event OnProtectionFail for the component TabSheetBox named TabSheetBox1.
Sub TabSheetBox1OnProtectionFail(Sender: Object; Args: ITabProtectionFailedEventArgs);
Var
s: String;
Begin
s:=Args.Message;
End Sub TabSheetBox1OnProtectionFail;
After executing the event the "s" variable will contain an information message.
See also: