获取鼠标坐标

1 procedure TForm1.FormClick(Sender: TObject);2 var3P: TPoint;4 begin5GetCursorPos(P);6Self.Caption := Format('X: %d, Y: %d',[P.X, P.Y]);7 end;转载于:https://www.cnblogs.com/...

weixin_34255055

63人浏览 · 2015-02-05 17:04:00

weixin_34255055 · 2015-02-05 17:04:00 发布

1 procedure TForm1.FormClick(Sender: TObject);
2 var
3   P: TPoint;
4 begin
5   GetCursorPos(P);
6   Self.Caption := Format('X: %d, Y: %d',[P.X, P.Y]);
7 end;

转载于:https://www.cnblogs.com/BlackList-Sakura/p/4275308.html

https://edu.csdn.net/learn/39067/627173?utm_source=2019755004

汇聚全球AI编程工具，助力开发者即刻编程。

更多推荐

AI编程的未来：程序员的角色转变

随着人工智能（AI）技术的迅猛发展，AI编程已经成为软件开发领域的重要组成部分。本文的目的是全面探讨AI编程的未来发展趋势以及这些趋势将如何影响程序员的角色。我们将分析程序员在AI编程时代需要具备的新技能、面临的挑战以及可能的职业发展路径。范围涵盖了AI编程的核心概念、算法原理、实际应用场景以及相关的工具和资源。本文将按照以下结构展开：首先介绍核心概念与联系，帮助读者建立对AI编程和程序员角色转变