windows2k中的资源浏览器的窗口类是:ExploreWClass
你可以通过以下方式自己获得:
procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
pt:TPoint;
Handles:array[0..254]of char;
hwnd:THandle;
begin
GetCursorPos(pt);
hwnd:=WindowFromPoint(pt);
if hwnd<>0 then
begin
GetClassName(hwnd,Handles, 255);
StatusBar1.Panels.Items[0].Text:='句柄:'+intToStr(hwnd);
StatusBar1.Panels.Items[1].Text:='类名:'+String(Handles);
end;
end;