Fenster anhand eines Teils des "Namens" finden?

[Sharky]

Zitat von Christian Seehase:

Moin Sharky,

das einfachste wäre wahrscheinlich, wenn Du Dir mal die entsprechenden Threads durchsiehst, und dann gezielt Deine Verständnisprobleme bezüglich des Ablaufes ansprichst.

Hai Christian,

mit Hilfe von Luckies Demo zu EnumWindow habe ich das hier gebastest:

Delphi-Quellcode:

function EnumWindowsProc(const hWnd : Longword; Param: lParam): LongBool; stdcall;
var
  Buffer: array[0..1024] of Char;
begin
  Result := True;
  GetWindowText(hWnd, Buffer, sizeof(Buffer));
  if lstrlen(Buffer) = 0 then
   begin
    exit;
   end
  else
   begin
    Form1.Memo1.Lines.Add (buffer);
   end;
end;

  {****************************************************}

procedure TForm1.Button1Click(Sender: TObject);
var
 LPARRAM : DWord;
begin
 EnumWindows (@EnumWindowsProc,Integer(@LPARRAM));
end;

Jetzt habe ich alle Fenstertitel in einem Memo.

Ist das von der Logik richtig?