Fenster einer fremden Anwendung auswählen und hWnd erhalten?

[zeras]

Ich mache das, indem ich die Maus auf den Fenstertitel halte. Nach 5 Sekunden bekomme ich dann das handle. Das habe ich irgendwo zusammenkopiert. Vielleicht hilft es.
Damit mache ich Screenshots von allem, was ich vorher mal mit der Maus gezeigt hatte.

Delphi-Quellcode:

var
   buffer: array [0..255] of Char;
   p: TPoint;

begin
  Caption:= '';
  GetCursorPos(p);
  GetClassName(WindowFromPoint(p), buffer, length(buffer));
  Caption:= 'Classname: '+ string(buffer);

  //wir können 2 verschiedene Fenster suchen lassen
  if RBWindowSearch1.Checked then begin
    EClassName1.Text:=string(buffer);
  end
  else begin
    EClassName2.Text:=string(buffer);
  end;

  GetWindowText(WindowFromPoint(p), buffer, length(buffer));
  Caption:= Caption+ '   WindowText: '+ string(buffer);
  beep;
  Timer1.Enabled:=False;
  caption:=fMain.HeadCaption; //Kopf wieder mit Ori beschreiben
  BtnStart2FindClass.Enabled:=True;
end;