如何在一个FORM中用鼠标移动FORM中的一个控件,用API

tianjin 2001-07-19 01:17:51
...全文
90 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
tianjin 2001-07-19
  • 打赏
  • 举报
回复
谢谢 :)
Apollo47 2001-07-19
  • 打赏
  • 举报
回复
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Panel1.perform(WM_SysCommand, $F012, 0);
end;

iamfancy 2001-07-19
  • 打赏
  • 举报
回复
使用拖动不就完了吧?
路人丁 2001-07-19
  • 打赏
  • 举报
回复
你为什么非要用API?

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧