Dynamisch erstellte Form per gedrückter Maustaste verschiebe

[Logic]

Hallo,

ich hab eine Form dynamisch erstellt und hier im Forum folgenden Code gefunden:

Delphi-Quellcode:

  ReleaseCapture;
  Perform(wm_syscommand, $f012, 0);

Dieser Funktion, funktioniert bei meinen Anwendungen auch perfekt, nur leider wenn ich der dynamisch erstellten Form die OnMouseDown zuweisen will, kann ich nur eine OnMouseDown einer anderen Form verwenden... wenn ich aber das tue wird die andere Komponente nur verschoben.

Wie kann ich mir ne eigene Procedure bauen, die das Problem umgeht?

Thx
Logic