先用FindWindow找找到Button的父窗口的窗口句柄再用FindWindowExHWND FindWindowEx( HWND hwndParent, // handle to parent window HWND hwndChildAfter, // handle to child window LPCTSTR lpszClass, // class name LPCTSTR lpszWindow // window name );找到按钮句柄,OK??
如 var h, h2 : Handle; begin h := FindWindow(nil, 'xxx'); h2 := FindWindowEx(h, nil, nil, 'xxx2'); end;如果知道类名,最好加上类名,不加问题也不大
一定行的,我已经试过了procedure TForm1.Button1Click(Sender: TObject); var h,h2 : HWND; begin h:=FindWindow(nil, 'Form1'); if h<>0 then h2 := FindWindowEx(h, 0, nil, 'aaaaaaa'); if h2<>0 then Application.MessageBox('找到啦~~~', 'ok', MB_OK) else Application.MessageBox('没找到~~~', 'ok', MB_OK); end;被查找的窗体上有一个Button,caption是'aaaaaaa'enjoy it
to Crob(我干嘛这么帅); 请问,我要把被查窗体上的button的属性改为'ok',如何做呢?也就是你获得button的handle值?
HWND hwndParent, // handle to parent window
HWND hwndChildAfter, // handle to child window
LPCTSTR lpszClass, // class name
LPCTSTR lpszWindow // window name
);找到按钮句柄,OK??
var
h, h2 : Handle;
begin
h := FindWindow(nil, 'xxx');
h2 := FindWindowEx(h, nil, nil, 'xxx2');
end;如果知道类名,最好加上类名,不加问题也不大
var h,h2 : HWND;
begin
h:=FindWindow(nil, 'Form1');
if h<>0 then
h2 := FindWindowEx(h, 0, nil, 'aaaaaaa'); if h2<>0 then
Application.MessageBox('找到啦~~~', 'ok', MB_OK)
else Application.MessageBox('没找到~~~', 'ok', MB_OK);
end;被查找的窗体上有一个Button,caption是'aaaaaaa'enjoy it
请问,我要把被查窗体上的button的属性改为'ok',如何做呢?也就是你获得button的handle值?
对了,你的api用得很不错啊,给点经验如何?