W wwiipp Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-20 #1 在PageControl1里新加了几个Tsbsheet,怎么样在鼠标移动到哪页的时候时显示该页信息?比如鼠标移到Tsbsheet1自动显示该页内容,移到Tsbsheet2自动显示该页内容? 小弟初学希望多多帮助!!!!
在PageControl1里新加了几个Tsbsheet,怎么样在鼠标移动到哪页的时候时显示该页信息?比如鼠标移到Tsbsheet1自动显示该页内容,移到Tsbsheet2自动显示该页内容? 小弟初学希望多多帮助!!!!
A abc_def Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-20 #2 不明白你的意思， 是指什麼信息？ 鼠标點擊哪頁就顯示哪頁啊。
H hs-kill Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-20 #3 procedure TForm1.PageControl1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin PageControl1.Pages[PageControl1.IndexOfTabAt(x,y)].Show; end;
procedure TForm1.PageControl1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin PageControl1.Pages[PageControl1.IndexOfTabAt(x,y)].Show; end;
W wwiipp Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-20 #5 我用了第三方控件rzpagecontrol1为什么用rzpagecontrol1.Pages[rzpagecontrol1.IndexOfTabAt(x,y)].Show;不能实现鼠标移到该页面不能实现自动转？
我用了第三方控件rzpagecontrol1为什么用rzpagecontrol1.Pages[rzpagecontrol1.IndexOfTabAt(x,y)].Show;不能实现鼠标移到该页面不能实现自动转？
H hs-kill Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-21 #6 .......这个 就不好说了，我的代码是标准VCL，第3方控件可能使用了自己的实现方法，也许一些属性没有
