Form: Drag'n'Drop

[SvenLittkowski]

Hi. Zuallererst diese Notiz: klar habe ich die Suchfunktion des Forums benutzt und auch etwas gefunden, was in meine Richtug geht. Ich will die Form meines Programmes mittels Drag'n'Drop bewegen können. Hier das Beispiel, welches ich gefunden habe:
http://www.delphipraxis.net/100591-f...bewegen-2.html (dort Seite 3: der Link auf die RAR-Datei)

Jedoch will ich nicht auf eine leere Form klicken, sondern werde auch Klicks auf bestimmten Komponenten haben. Und hier ist mein Problem:
Ich habe vorher noch nie mit Drag'n'Drop gearbeitet, und weiß leider daher auch nicht, wie ich das existierende Beispiel aus der URL oben so abändern kann, daß jenes Drag'n'Drop auch funktioniert, wenn man auf TLabel klickt, oder auf TGroupBox, um einfach zwei Beispiele zu nennen. Ich bin mir recht sicher, daß die Lösung bestimmt nicht schwierig ist, aber mir fehlt halt die Erfahrung. Kann mir jemand mit Codebeispielen weiterhelfen?

[WM_CLOSE]

Delphi-Quellcode:

if (ssLeft in Shift) then
begin
  ReleaseCapture;
  SendMessage(form1.Handle, WM_SYSCOMMAND, SC_MOVE + 1,0);
end;

im Onmousemove

[SvenLittkowski]

Ja, das hat geholfen. Vielen Dank!