Delphi StyleControls之标题栏Tabs

用户不存在丶
2020-08-26

RAD Studio 10.3 测试√

控件 scStyledForm 下的 Tabs 下的子项的 OnClick 事件【进行 cxPageControl 的面板切换】


procedure TForm1.scStyledForm1Tabs0Click(Sender: TObject);

begin

  cxPageControl1.ActivePageIndex := 0;// 切换cxPageControl控件下的活动面板【0表示左边第1个面板】

end;


procedure TForm1.scStyledForm1Tabs1Click(Sender: TObject);

begin

  cxPageControl1.ActivePageIndex := 1;// 切换cxPageControl控件下的活动面板【1表示左边第2个面板】

end;

样式



cxPageControl 隐藏标签



阅读102