AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop
Thema durchsuchen
Ansicht
Themen-Optionen

Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

Ein Thema von LTE5 · begonnen am 13. Nov 2017 · letzter Beitrag vom 16. Nov 2017
Antwort Antwort
EWeiss
(Gast)

n/a Beiträge
 
#1

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 22:33
HWND_TOPMOST ?
HWND_TOP = fsStayOnTop

gruss
  Mit Zitat antworten Zitat
LTE5

Registriert seit: 13. Nov 2017
355 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#2

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 22:44
SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE); und SetWindowPos(Handle, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE); hab ich schon durch. Funktioniert leider genau so wenig wie fsStayOnTop.
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#3

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 22:46
tja wenn man die Anwendung in den Hintergrund setzt dann nicht Richtig! (HWND_NOTOPMOST)
Dachte eigentlich du wolltest das Gegenteil erreichen.
https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx

gruss

Geändert von EWeiss (13. Nov 2017 um 22:50 Uhr)
  Mit Zitat antworten Zitat
LTE5

Registriert seit: 13. Nov 2017
355 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#4

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 23:01
Ich weiß nicht wovon du schreibst.
Ich habe einen Button wo ich hin- und herwechseln kann. Entweder immer vorne oder nicht.
  Mit Zitat antworten Zitat
Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.684 Beiträge
 
Delphi 5 Professional
 
#5

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 23:07
Ich nutze dafür folgende Funktion
Delphi-Quellcode:
function SetWindowAlwaysOnTop(const AForm: TForm; AOnTop: Boolean): Boolean;
var
  Lattr: HWND;
begin
    if AOnTop then
        Lattr:= HWND_TOPMOST
    else
        Lattr:= HWND_NOTOPMOST;

    Result:= SetWindowPos(AForm.Handle, // handle to window
                 Lattr, // placement-order handle {*}
                 AForm.Left, // horizontal position
                 AForm.Top, // vertical position
                 AForm.Width,
                 AForm.Height,
                 // window-positioning options
                 SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
end;
Aufgerufen z.B. mit SetWindowAlwaysOnTop(Self, True); wird dieses Fenster im Vordergrund gehalten. Natürlich kann es von anderen Fenstern, die ebenfalls TOPMOST sind, überdeckt werden, aber das ist ja klar und wohl bekannt.

Grüße
Dalai
  Mit Zitat antworten Zitat
LTE5

Registriert seit: 13. Nov 2017
355 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#6

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 23:18
Vielleicht liegt mein Problem woanders. Aber wenn mein Systembereichfenster den Fokus hat, dein Code ausgeführt wurde, es also oben bleiben sollte, und ich mit ALT-TAB raustabbe und wieder rein, ist der Effekt oben zu bleiben weg.
  Mit Zitat antworten Zitat
Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.684 Beiträge
 
Delphi 5 Professional
 
#7

AW: Form wirklich oben halten, Alternative zu FormStyle fsStayOnTop

  Alt 13. Nov 2017, 23:35
Spielt es eine Rolle, zu welcher anderen Anwendung du mit Alt+Tab wechselst? Ist diese Anwendung ebenfalls TOPMOST? Wie sieht's in einer Testanwendung aus?

Grüße
Dalai
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:21 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz