Einzelnen Beitrag anzeigen

Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.197 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: borderloses formular verschieben ?

  Alt 28. Apr 2004, 22:00
Du hast dir ja schon fast den Tipp selbst gegeben.

- Stelle fest wenn die linke Maustaste auf deinem Formular gedrückt wird (OnMouseDown)
- Merke sowohl die Mausposition (absolut zum Screen) und die Position des Fensters
- Bei jedem MouseMove berechne die veränderung der Mouse-Position zum Screnn und korrigiere die Fenster-Position
- Wenn die Mousetaste losgelassen wird (OnMouseUp) wird die aktion beendet.
  Mit Zitat antworten Zitat