Mover objetos por la forma

[odrack]

Que tal compañeros!!

Quisiera porder mover ciertos objetos dentro de la forma, pero no logro conseguirlo.

Tengo el objeto TabbedNotebook y en el evento onclic tengo el siguiente codigo

Código Delphi [-]
var cor1:tpoint;
begin
  cor1:=Mouse.CursorPos;
  tabbednotebook1.top:=cor1.X;
  tabbednotebook1.left:=cor1.Y;
  showmessage('X:'+INTTOSTR(cor1.X)+' Y:'+INTTOSTR(cor1.Y));
end;

con esto logro que se desplace a cierto punto, pero no lo puedo arrastrar a donde yo quisiera, espero que me puedan orientar con esto!!