FindWindow i HWND

[zeno32167]

Witam. Mam taki kod pod przyciskiem.

void __fastcall TForm4::Button3Click(TObject *Sender)
{
HWND d = FindWindow(NULL,"SRO_Client") ;

//SendMessage(d,WM_LBUTTONDOWN,120,149);
//SendMessage(d,WM_LBUTTONUP,120,149);

}

Problem polega na tym że tych okien SRO_Client mam odpalonych 6. I jak wysyłam komunikat czyli kliknięcie myszką to to idzie do losowego clienta.

Wie ktoś jak sprawdzić HWND wszystkich odpalonych clientów i wrzucić te wszystkie HWND np do TMemo, albo TBox.(najgorsze jest to że to jest typ void a do memo i box idzie String, nie umiem zrobić konwersji).

Zakładając że mam już te HWND, jak wysłać wiadomość do konkretnego clienta(dzięki znajomości HWND moge to wysłac do konkretnego ale w jaki sposób podac ten parametr?)?

Dziękuję za pomoc, czekam na sugestie

[Cyfrowy Baron]

Opis wyliczania okien znajduje siÄ™ w serwisie Cyfrowy Baron w dziale: porady | ciekawostki | wyliczanie okien.

Co do rozróżnienia okien, to jeżeli wszystkie mają tą samą nazwę klasy, ale różne nazwy okien to po tym można je rozróżnić. Funkcja FindWindow pobiera dwa argumenty, pierwszy to tytuł okna, a druga to nazwa klasy.
W ostatniej aktualizacji serwisu Cyfrowy Baron znajdziesz opis pobierania uchwytu do okna wskazywanego przez kursor myszy.

[zeno32167]

dobrze tylko problem polega na tym ze te procesy maja taką samą nazwę okna i nazwę klasy, jedyne co je różni to HWND, ale dziękuję za nakierowanie

edit:

okienka umiem wyszukać i wrzucić je sobie na liste, tylko problem polega na tym że wszystkie wyglądają tak samo i nie ma do nich HWND.

lekko zmodyfikowany kod z Cyfrowego Barona:

bool CALLBACK EnumWindowsProc(HWND hWnd, TListView *ListView)
{
char WindowName[80], ClassName[80];

GetWindowText(hWnd, WindowName, 80);
GetClassName(hWnd,ClassName, 80);
AnsiString CLIENT = "CLIENT" ;
if(ClassName==CLIENT)
{
ListView->Items->Add();
int i = ListView->Items->Count-1;
ListView->Items->Item[i]->Caption = AnsiString(WindowName);
ListView->Items->Item[i]->SubItems->Add(AnsiString(ClassName));
ListView->Items->Item[i]->Update();
}

return true;
}
//-----------------------------------------------------------------------------------------
void __fastcall TForm5::Button1Click(TObject *Sender)
{
ListView1->Items->Clear();
EnumChildWindows(GetDesktopWindow(),(WNDENUMPROC)EnumWindowsProc, (LPARAM)ListView1);
}