D djrj Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-30 #1 50分：PageControl上的TabSheet如何响应鼠标的双击事件？？？（我要像tencent浏览器一样双击时关闭当前浏览窗口），高手就帮小弟一把啊。(50分)<br />如题
天 天与地 Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-30 #2 TabSheet本身好像没有OnClick和双击事件。通过ActivePage试试。
小 小雨哥 Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-31 #4 接收 PageControl 的鼠标左键双击-->看看当前显示的TabSheet是谁-->去掉它。
D djrj Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-31 #5 TO：天与地 / 小雨哥 两位能否给点代码？ 若能解决再加100分（ 到http://www.delphibbs.com/delphibbs/dispq.asp?lid=1402520）
天 天与地 Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-31 #6 可以实现在PageControl上加一个panel，让Panel充满每个页。Panel有相应双击的事件。 然后 procedure TForm1.Panel1Click(Sender: TObject); begin PageControl1.ActivePage.Free; end; 因为PageControl没有OnDblClick事件，所以在上面加个panel，试试吧，看行不行。
可以实现在PageControl上加一个panel，让Panel充满每个页。Panel有相应双击的事件。 然后 procedure TForm1.Panel1Click(Sender: TObject); begin PageControl1.ActivePage.Free; end; 因为PageControl没有OnDblClick事件，所以在上面加个panel，试试吧，看行不行。
