delphi 获取鼠标坐标
怎么样获取鼠标移动时候的坐标？如果可以点击一下保存下坐标那就更好了分不多，只有20分希望别嫌弃少我需要源代码问题就是我不会啊会也不用问了啊...
怎么样获取鼠标移动时候的坐标？
如果可以点击一下保存下坐标那就更好了
分不多，只有20分
希望别嫌弃少
我需要源代码
问题就是我不会啊
会也不用问了啊 展开
如果可以点击一下保存下坐标那就更好了
分不多，只有20分
希望别嫌弃少
我需要源代码
问题就是我不会啊
会也不用问了啊 展开
2个回答
展开全部
procedure TForm1.FormClick(Sender: TObject);
var
P: TPoint;
begin
GetCursorPos(P);
Self.Caption := Format('X: %d, Y: %d',[P.X, P.Y]);
end;
var
P: TPoint;
begin
GetCursorPos(P);
Self.Caption := Format('X: %d, Y: %d',[P.X, P.Y]);
end;
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
MOVE 这个事件就可以
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
