Ein Formular "immer sichtbar" zu machen

Ein Formular "immer sichtbar" zu machen

Ein Formular "immer sichtbar" zu machen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

Wie man ein Formular immer sichtbar bleiben, zusätzlich zu anderen Formen
Ein Formular 'immer sichtbar' zu machen
Um einem Formular immer über andere Formen sichtbar entweder Zugehörigkeit zu derselben Anwendung sowie andere Anwendungen, können wir die FormStyle-Eigenschaft in FsStayOnTop ändern. Später können wir wieder zur normalen wechseln, indem FormStyle auf FsNormal. Jedoch ist nicht empfehlenswert die FormStyle-Eigenschaft zur Laufzeit zu ändern. Wir verwenden stattdessen die Windows API-Funktion SetWindowPos, übergeben sie HWND_TOPMOST als zweiten Parameter um den Effekt zu aktivieren:
procedure TForm1.Button1Click(Sender: TObject);
  begin
    SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0,
      SWP_NOMOVE + SWP_NOSIZE);
  end;
Um diesen Effekt zu deaktivieren, rufen wir Sie SetWindowPos erneut, diesmal WND_NOTOPMOST als zweiten Parameter übergeben:
procedure TForm1.Button2Click(Sender: TObject);
  begin
    SetWindowPos(Handle, WND_NOTOPMOST, 0, 0, 0, 0,
      SWP_NOMOVE + SWP_NOSIZE);
  end;