Textinhalt eines Objekts einer anderen Anwendung

[toms]

Meinst du die Form mit der Person drauf?

Delphi-Quellcode:

var
  wndMain, wndChild: HWND;
begin
  wndMain := FindGarenaMainWindow;
  if wndMain <> 0 then
  begin
    wndChild := FindWindowEx2(wndMain,'#32770', 2);
    if wndMain <> 0 then
    begin
      ShowMessage('Window found. Handle: ' + IntToStr(wndChild));
      FlashControl(wndChild); // internal function
    end;
  end;
end;

FindWindowEx2:

Delphi-Quellcode:

function FindWindowEx2(hParent: HWND; ChildClassName: string; ChildNr: Word): HWND;
var
  i: Word;
  hChild: HWND;
begin
  Result := 0;
  hChild := 0;
  Dec(ChildNr);
  for i := 0 to ChildNr do
  begin
    hChild := FindWindowEx(hParent, hChild, PChar(ChildClassName), nil);
    if hChild = 0 then
      Break;
    Result := hChild;
  end;
end;