避免在TPageControl上当前页面下的页面上单击传播

时间:2013-08-06 15:11:05

标签: delphi delphi-7 clx

我有一个包含五个页面的TPageControl,并且显示的页面是交替设置ActivePageIndex属性的方式:

PageControl1.ActivePageIndex := 4;

问题是当前显示的页面所覆盖的页面在上面的页面上按下鼠标时点击了他的按钮,我该如何避免这种行为?如何避免点击当前显示的页面下方的点击(也就是当前索引)?

该应用程序使用CLX作为图形库而不是VCL。

1 个答案:

答案 0 :(得分:0)

Delphi没有点击传播。

我会检查点击的按钮是否放在TabSheet而不是父控件上。在对象检查器的下拉列表中找到所需的按钮,然后按 - 所选项目将成为按钮的父项。它是TabSheet吗?

或者您可以将此代码添加为按钮单击功能的第一行

ShowMessage(TButton(Sender).Parent.Name);