[dmdx]

Разобрался

Код:

var
 p : TPoint;   
p :=      ClientToScreen(ToolBarSend.ClientRect.TopLeft);
ToolBarSend.ManualFloat(Rect(P.X,P.Y,P.X+ToolBarSend.Width,P.Y+ToolBarSend.Height));