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.
Executing the example requires this procedure is set as the OnProtectionFail event handler for the TabSheetBox component 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: