Ziel-Cursor wie in WinSpy++?

[PeterPanino]

Zitat von quendolineDD:

2. Beim Mousedown und gedrückt halten das Fenster per Drag&Drop in WinSpy++ ziehen, malt einen Rahmen um das Fenster?

Nein, umgekehrt: Von meinem Programm zum fremden Fenster ziehen -> malt einen Rahmen um das fremde Fenster.

Das fremde Fenster identifizieren geht schon:

Delphi-Quellcode:

function TForm1.GetCurrentWindowHandle: HWND;
var
  pt: TPoint;
begin
    GetCursorPos(pt);
    Result := WindowFromPoint(pt);
end;

procedure TForm1.TimerTimer(Sender: TObject);
begin
  Form1.Caption := GetWindowCaption(GetCurrentWindowHandle);
end;

Nur, wie kann ich einen Rahmen um das fremde Fenster malen?