Zitat:
(if FMain1.Left > Screen.Width then).
Für den Fall, dass du meinen Hinweis nicht nur hier ausgelassen, sondern übersehen hast: Du solltest dann vielleicht auch abprüfen, ob Left + Width < 0 ist. Und auch vertikal kann das Fenster außerhalb des Bereichs liegen.
Außerdem würde ich diese Prüfung wenn dann immer machen, denn der Benutzer könnte ja auch einfach eine ganz andere Auflösung haben.