请教按钮数量问题 ( 积分: 50 )

请教各位大大，现在知道一个窗体的句柄(只知道句柄)，怎么样确定他拥有的控件数量？

请教各位大大，现在知道一个窗体的句柄(只知道句柄)，怎么样确定他拥有的控件数量？

Self.ControlCount啊

self应该为本身对象指针吧，我需要的是一个句柄的对象(通过句柄，得到对象)

你要获得其他程序中窗体的控件数量？<br>有个子类化的东西可以办到。

var<br> &nbsp;Childhandle, MainHandle: THandle;<br>begin<br> &nbsp;Childhandle := FindWindowEx(Mainhandle, 0, 'TButton', nil);<br> &nbsp;后面你自己看着处理就行了，发送消息等等<br><br><br>EnumChildWindows这个东西是列子窗口的，下面是例子代码，网上可以找到<br><br> &nbsp;function &nbsp;EnumChildWndProc(AhWnd:HWnd;<br> &nbsp; &nbsp;AlParam:lParam):boolean;stdcall;<br><br>implementation<br><br>{$R *.dfm}<br>function &nbsp;EnumChildWndProc(AhWnd:HWnd;<br> &nbsp;AlParam:lParam):boolean;stdcall;<br>var<br> &nbsp;WndClassName: array[0..254] of Char;<br>begin<br> &nbsp;GetClassName(AhWnd,wndClassName,254);<br> &nbsp;with form1.memo1 do<br> &nbsp; &nbsp;lines.add( string(wndClassName)); &nbsp; &nbsp;result:=true;<br>end;<br><br>procedure GetChild(AHandle : Thandle);<br>begin<br> &nbsp;memo1.Lines.Clear;<br> &nbsp;if hWnd&lt;&gt;0 then &nbsp; &nbsp; EnumChildWindows(hWnd,@EnumChildWndProc,0);<br>end;<br>end.

非常感谢chenybin大大的帮助，您的方法解决了困惑了我很久的疑难，谢谢！<br>同时谢谢saridon的热情帮助，真的谢谢。

多人接受答案了。