Object: ITabObject;
Свойство Object возвращает объект, над которым произведено действие.
Sub TabSheetBox1OnObjectActivate(Sender: Object; Args: ITabObjectEventArgs);
Var
s: String;
Begin
s := Args.Object.Id;
End Sub TabSheetBox1OnObjectActivate;
После выполнения события в переменной «s» будет содержаться идентификатор объекта, над которым совершено действие.
См. также: