EnumChildWindows(父窗体句柄,@EnumChildWndProc //回调函数,0 //这个通常为零,不管它,实现自己想要的就算了,以后再研究)
回调函数书写格式:
function EnumChildWndProc(AhWnd:LongInt;AlParam:lParam):boolean;stdcall;
var
WndClassName: array[0..254] of Char; //保存窗口所属类
WndCaption: array[0..254] of Char; //保存窗口标题
Msg:AnsiString; //保存欲显示给用户的结果
begin
result:=true;//继续枚举,直到最后一个子窗口被枚举;
result:=false;//相反;
GetClassName(AhWnd,wndClassName,254); //获取子窗口类名
GetWindowText(AhWnd,WndCaption,254); //获取子窗口标题
//获取类名或标题就可以用if句柄判断;
if wndClassName = '类名' then
begin
Showmessage('类名');//测试;
end;
end;