点tab事件应该写到这里
业务模型\系统空间\简洁风格\界面库\窗体库\标准风格主窗体
,如例
位置是
procedure TSTANDARDSTYLEMAINFORM.TabClick(Sender: TObject);
begin
ShowContainer((Sender as TTabButton).FuncContainer);
if (Sender as TTabButton).FuncContainer.FuncURL='Biz:\COLLABORATION\DESKTOPFUNC.FUNC' then//如果点击的是工作台功能,showmsg
begin
jsdialogs.ShowMsg('a','b');
end;
end;