本文共 415 字，大约阅读时间需要 1 分钟。

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;

样式：