windows通过进程名获取控件句柄

//--------------------------------------------------------------------------- #include <vcl.h> #include <tlhelp32.h> #include <Winuser.h> #include <windows.h> #pragma hdrstop #include "Main1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TMain *Main; //--------------------------------------------------------------------------- __fastcall TMain::TMain(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- DWORD TMain::GetProcessIDByName(AnsiString strProcessName) { HANDLE hProcessSnap; PROCESSENTRY32 pe32; AnsiString strExeName; hProcessSnap = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS, 0 ); if( hProcessSnap == INVALID_HANDLE_VALUE ) { return 0; } memset(&pe32, 0, sizeof(PROCESSENTRY32)); pe32.dwSize = sizeof(PROCESSENTRY32); if(!Process32First(hProcessSnap, &pe32)) { CloseHandle(hProcessSnap); return 0; } while(true) { strExeName = pe32.szExeFile; if(strExeName == strProcessName) { CloseHandle(hProcessSnap); return pe32.th32ProcessID; } if(!Process32Next(hProcessSnap, &pe32)) { CloseHandle(hProcessSnap); return 0; } } } typedef struct _WNDINFO { DWORD dwProcessID; HWND hWnd; }WNDINFO; BOOL CALLBACK MyEnumWndProc(HWND hwnd, LPARAM lParam) { WNDINFO* pWndInfo = (WNDINFO*)lParam; DWORD processID = 0; GetWindowThreadProcessId(hwnd, &processID); if(processID == pWndInfo->dwProcessID) { pWndInfo->hWnd = hwnd; return FALSE; } return TRUE; } HANDLE TMain::GetWindowHandleByName(AnsiString strProcessName) { DWORD processID = GetProcessIDByName(strProcessName); if(0 == processID) { return NULL; } WNDINFO wndInfo; memset(&wndInfo, 0, sizeof(WNDINFO)); wndInfo.dwProcessID = processID; wndInfo.hWnd = NULL; EnumWindows(MyEnumWndProc, (LPARAM)&wndInfo); return wndInfo.hWnd; } HANDLE TMain::GetChildHWndByName(AnsiString strClassName, AnsiString strName) { HANDLE handle = GetWindowHandleByName(edtProcessName->Text); if(NULL == handle) { return NULL; } return FindWindowEx(handle, NULL, strClassName.c_str(), strName.c_str()); } void TMain::DoCommand(HANDLE handle) { map<UINT, AnsiString>::iterator itor; AnsiString strMessage = edtMessage->Text; for(itor = m_mapMessageType.begin(); itor != m_mapMessageType.end(); ++itor) { if(itor->second == cmboxMessageType->Text) { SendMessage(handle, itor->first, (WPARAM)strMessage.c_str(), (WPARAM)strMessage.c_str()); } } } void __fastcall TMain::btOkClick(TObject *Sender) { HANDLE handle = GetChildHWndByName(edtButtonClass->Text, edtButtonName->Text); if(NULL == handle) { MessageBox(Main->Handle, "Not find the process", "Warning", MB_OK); return; } DoCommand(handle); } //--------------------------------------------------------------------------- void __fastcall TMain::btQuitClick(TObject *Sender) { Main->Close(); } //--------------------------------------------------------------------------- void __fastcall TMain::FormCreate(TObject *Sender) { cmboxMessageType->Items->Add("WM_BUTTONCLICK"); cmboxMessageType->Items->Add("WM_SETTEXT"); cmboxMessageType->Items->Add("WM_CLOSE"); m_mapMessageType[WM_LBUTTONDOWN] = "WM_BUTTONCLICK"; m_mapMessageType[WM_LBUTTONUP] = "WM_BUTTONCLICK"; m_mapMessageType[WM_SETTEXT] = "WM_SETTEXT"; m_mapMessageType[WM_CLOSE] = "WM_CLOSE"; } //---------------------------------------------------------------------------