Fenster bewegen

[flomei]

Ich hab das mal selber probiert:

Delphi-Quellcode:

begin
Form1.Top:= random(1000);
Form1.Left:= random(1000);
end;

Hat nicht so toll funktioniert. Meine Form ist immer oben links hängen geblieben oder ganz vom Bildschirm verschwunden. Das klappt also nicht.

hm...

Vielleicht könnte es funktionieren, wenn man den Wert in der Klammer ändert. Aber auf welchen Wert?
Auf keinen Fall darf das Fenster den sichtbaren Bereich des Bildschirms verlassen.

Es soll so schön rumspringen wie das hier:Klick mich! Achtung! Speichert vorher ab, wenn ihr nen OS ohne Taskmanager habt. Am besten geht das mit dem Internet Explorer. Zumindest bei mir.


Thx im Voraus!

MfG Florian