Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

[TigerLilly]

Wenn es dich interessiert: Die GExperts haben ein DebugView, das genau das macht, was du möchtest.

Den Quellcode dazu findest du hier:
https://sourceforge.net/p/gexperts/c...ebugWindow.pas

Diese Zeilen sind, was du suchst:

Code:

procedure TfmDebug.SetStayOnTop(OnTop: Boolean);
begin
  FStayOnTop := OnTop;
  if OnTop then
    SetWindowPos(Self.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE + SWP_NOSIZE)
  else
    SetWindowPos(Self.Handle, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE + SWP_NOSIZE);
end;

Siehe auch hier:
https://blogs.msdn.microsoft.com/old...21-10/?p=33263
https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx