我有一个pagecontrol控件，里面有tabsheet1和tabsheet2两页，我现在操作tabsheet1，同时我想让tabsheet2的tab不可点，如何做？

Question

我有一个pagecontrol控件，里面有tabsheet1和tabsheet2两页，我现在操作tabsheet1，同时我想让tabsheet2的tab不可点，如何做？
在线等待，马上给分~~
谢谢

Answer 1

procedure TdfrmMrp_EvaluatCostIn.PageControl1Change(Sender: TObject);
begin
  if PageControl1.ActivePageIndex=0   //第一在頁
     begin
        if 不充許移動條件 then
                PageCOntrol1.ActivePage := TabSheet1;   
     end;end;

Answer 2

可不可以把TABSHEET变灰呀？？

Answer 3

TabSheet1.Enabled:=False;  但是你要注意當你限制條件結束時應將TabSheet1.Enabled置為True;

Answer 4

Bes96261(秋水孤鶩) 万分感谢~~~
不过 我试了试 好象不行呀
能不能在显示的时候就让 tabsheet1是可用的 tabsheet2不可用 是灰色的？？
谢谢~~