首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

Tpagecontrol 控件的有关问题

2012-03-16 
Tpagecontrol 控件的问题在用PAGECTROL控件时,用鼠标点击进入某页时,想先弹出一个密码输入验证框,验证通过

Tpagecontrol 控件的问题
在用PAGECTROL控件时,用鼠标点击进入某页时,想先弹出一个密码输入验证框,验证通过再跳入该页,否则保持原来页面不变。就是说出现验证框时该页先不显示,有什么办法吗?请各位大哥兄弟帮忙,急!!!!!!
试过在ONPAGECHANGING响应事件中添加,但是会报错,如我加FORM2.show就报错。在ONPAGECHANGE中添加可以,但是要进行一次操作,就是设置页设回去.求一个有效方法,在这先谢谢大家了!!!

[解决办法]
procedure TForm1.PageControl1Changing(Sender: TObject;
var AllowChange: Boolean);
begin
if PageControl1.ActivePageIndex = 1 then exit;
AllowChange := Application.MessageBox('Are you sure?', 'Sure', MB_OKCANCEL + MB_ICONQUESTION) = ID_OK;

end;

[解决办法]
在OnChange事件写
首先校正密码,
如果校正不对
显示可以显示的页

热点排行