M macrowdw Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-19 #1 现在有很多浏览器如腾讯explore,internet wander,fast browser中的多页面浏览功能,都可以双击Tabsheet顶部关闭页面,请问保何实现?
W woodstock Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-19 #3 按时间判断,设置一个全局变量,记录第一次按下时间,然后计算第二次按下时间, 如果时间小于某个值, 就释放当前页面。
M macrowdw Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-19 #5 可是如何判断点击的是Tab,而不是整个Tabsheet,那些浏览器是什么样子我不知道,在拓创上有人说可以用 tabsheet 写 WM_LBUTTONDBLCLK 处理函数,请高手出招!
X xiao_min Unregistered / Unconfirmed GUEST, unregistred user! 2001-07-19 #6 procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin if (msg.message =WM_LBUTTONDBLCLK) and (msg.hwnd =pagecontrol1.Handle) then pagecontrol1.ActivePage.Free; end;
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin if (msg.message =WM_LBUTTONDBLCLK) and (msg.hwnd =pagecontrol1.Handle) then pagecontrol1.ActivePage.Free; end;