Form soll nicht verschiebbar sein!

[turboPASCAL]

Jo, also ist dass das Problem der OOP mit ihren Gettern und Settern die
jeden "Schnurtz" einzeln ausführen.

Setz man nun FormX.Left := 100 & FormX.Top := 120 wird erst
das Fenster erst auf die X-Position verschoben, das ruft nun WM_WindowPosChanging
auf und danach wird das Fenster erst auf die Y-Position verschoben welches auch wieder
WM_WindowPosChanging aufruft bzw. auslöst.
Da diese aber nun "sagt" SWP_NoMove wird nun mal nix verschoben. ;)

[Matz4000]

Hab ne viel einfachere Lösung als die Algorithmen :

Delphi-Quellcode:

Form1.borderstyle:=bssingle;

Damit gibts einfach keine "VerschieberPfeile" mehr, die auftreten wenn sich der Zeiger am Rand der Form befindet.

Dann kann man noch im Objektinspektor bei Bordericons biMaximize auf false schalten, und alles ist gut ;)

[rollstuhlfahrer]

EINSPRUCH: Ich verwende sehr häufig den BorderStyle = bsSingle. Dadurch ändern die Forms ihre Größe nicht mehr (gewünscht). Aber sie sind weiterhin frei auf dem Bildschirm platzierbar. Wenn du auf die Titelleiste klickst und dann die gedrückte Maus umherbewegst, wirst du sehen, dass sich das Fenster (oder nur der Rahmen, je nach Einstellung) mitbewegt.

Bernhard