Docken einer Form an den Bildschirmrand

[Master_BB]

Hallo,
kann mir jemand sagen wie ich das Automatische Docken meiner MainForm an den
Bildschirmrand umsetze? So wie bei WinAMP hätt ichs gern.
Dachte immer das sowas mit der Property DockSite automatsich läuft aber nix ist.
Es gab auch mal ein Thema hier wo jemand das in etwa frage dem sagte man schau
unter die Demos - wo sind die denn?

Greetz
Master_BB

[BenjaminH]

Überprüf doch einfach beim ziehen der Form, da bekommt deine Form eine Message, wie weit sie vom Bildschirmrand weg ist.
Wenn sie näher als 5pixel eist infach um diese pixel heranrücken.

[jim_raynor]

Ab Delphi 7 gibts zwei Eigenschaften bei den Formularen: Nennen sich ScreenSnap und SnapBuffer. Dürfte genau das sein, was du suchst.

[Kurt56]

ClientWidth:=HilfBtn.Left + HilfBtn.Width +1;
ClientHeight:=ToolBar1.Height+20;
Left:=0;
Top:=0;

Wenn Dein Programm (MainForm) nur aus einer Toolbar besteht, so klemmt diese immer oben links.
Sonst mußt Du die Bildschirmweite oder die ScreenHöhe nehmen und abziehen, wenn Du das Fenster an einem anderen Rabd haben willst

[Master_BB]

hm nach der hilfe zu screensnap zu urteilen ist das tatsächlich exakt das was ich suche,
jedoch gehts nicht hab den buffer auf 50 was schon recht großzügig ist und es will nicht.
Und wie ich herrausgefunden habe muss damit das klappt der BorderStyle der Form <> bsNone sein.
Und da ich gerade das habe muss ich es wohl tatsächlich "simulieren" bzw selber bauen.

[Daniel G]

Benutze doch einfach eine Komponente aus der JEDI-Library:

Die Komponente schimpft sich: TJvFormMagnet
Bin mir nicht sicher, aber vllt. kann man die auch einzeln bekommen.

[xaromz]

Hallo,

ich hab mir mal eine Komponente geschrieben, die genau das macht. Außerdem kann man an alle Fenster des Projekts andocken (Kann man auch ausschalten), das ist praktisch für Toolbars und Werkzeugpaletten.
Ich habs mal angehängt.

Gruß
xaromz

[Matze]

Wenn es nur um den Bildschirmrand geht, kannst du auch das hier mal versuchen: andocken.

[DevilsCamp]

Zitat von Master_BB:

hm nach der hilfe zu screensnap zu urteilen ist das tatsächlich exakt das was ich suche,
jedoch gehts nicht hab den buffer auf 50 was schon recht großzügig ist und es will nicht.
Und wie ich herrausgefunden habe muss damit das klappt der BorderStyle der Form <> bsNone sein.
Und da ich gerade das habe muss ich es wohl tatsächlich "simulieren" bzw selber bauen.

Ich weiß jetzt nicht wie das in Delphi 7 ist, aber bei Delphi 2005 funktioniert das auch bei BorderStyle=bsNone