看看我的问题“Delphi中关于控件拖动的问题”,高手给我提供的方案我觉得对你回有帮助的

解决方案 »

  1.   

    1.定义四个小方块类放在框的四周,自己写这些小方块的拖放事件
    2.放四个TPanel 4X4见方,平时隐藏着,点中时显示,在Panel的MouseMove里写事件,不过闪烁很大。
      

  2.   

    我觉得你应该划一个矩形区域,注意不是矩形,这个矩形区域是有句柄的,然后在这个区域上操作,参考API函数:CreateRectRgn
      

  3.   

    谢谢各位的提示,由于本人刚刚学用delphi,还是不大清楚,望各位能提供一个详细的方法!!!