如何得到TControl类的对象的句柄？或者，如何自行响应和处理TControl对象的消息？

[Libran]

另外，怎样通过Compoments[i]知道该Compoment是否是从TControl继承？是从TWinControl还是TGraphicControl继承？

[pp616]

用ClassParenth函数
或用InheritsFrom函数可知道继承情况。

处理消息需要重载DefaultHandler可以对所有的消息进行默认处理。

[warton]

gz

[ljianq]

TControl应该没有句柄，TWinControl才有句柄；
判断Component是否是TControl可以这样：

for (int i=0;i<ComponentCount;i++) {
TControl* temp=dynamic_cast<TControl*>(Components[i]);
if (temp) //是从TControl
}

[烟波三千里人鬼五百年]

dynamic_cast在类型转换失败的时候会返回一个NULL指针，据此就可以达到你的目的。
代码如 ljianq() 所言.....

[huzhangyou]

libran你是不是放分来了？

[huzhangyou]

如果是
给我一点
如果不是
就算了
信仰只好555555555地走了

[Libran]

详细点儿说：
我需要响应Form上的某个不确定的可视控件的鼠标事件，想到的方法是：
1，判断Compoment[i]是否为可视控件，我的判断是看它是否从TControl继承；
2，拦截消息，我打算重置WndProc，但若非TWinControl无法获得其句柄；
3，能否通过鼠标点击即获得该位置的Control？

例如：
Form上可能有几个Edit、Button或者Panel，我要做到任选其中一个，响应它的MouseDown事件，有什么好办法？

[Lewolf]

寻找某个位置的控件，使用TWincontrol的ControlAtPos方发，希望几个控件响应同一个事件处理函数，可以使用Sender参数作为判断是那个控件触发的事件。