Delphi7 控件相对于form的绝对位置

Delphi7里面的控件的位置一般是相对位置，比如说button在一个panel中，那么button.Top就是相对于panel的上边距离，而不是form的距离。那么如何得到相对于form的位置呢。请参照如下代码：

  ctl_point.X := 0;

  ctl_point.Y := 0;

  ctl_point := ctl.ClientToScreen(ctl_point);

  ctl_point := ownerform.ScreenToClient(ctl_point);