设置PageControl的owndraw属性为TRUE. procedure TForm1.pgc1DrawTab(Control: TCustomTabControl; TabIndex: Integer;procedure TForm 你的当前访问异常,请进行认证后继续阅读剩余内容。 提交