如何保持图片总在上面

Question

做一个图片可以到窗体上拖动的。。
窗体上有好多控件,如何保持图片总是在最上层？ 
 

Answer 1

把 Image 放到一个 Panel 中，把Panel设置到最上层(选中Panel, 菜单Edit->Bring to Front)，然后在Image的OnMouseDown事件中：
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  ReleaseCapture;
  Panel1.Perform(WM_SYSCOMMAND, $F012, 0);
end;

Answer 2

有没有更好的方法呢，不要放到panel中的可不可以实现？