怎样取得光标当前位置? 如果是Memo或RichEdit,都有CaretPos属性 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 送你一个实例,不妨试一下:procedure TForm1.Button4Click(Sender: TObject);varmypt:TPoint;begin GetCursorPos(mypt); edit1.Text:=intTostr(mypt.x);end; var p:tpoint;begingetcursorpos(p);end;//p.x,p.y 就是光标位 这种功能代码应该怎么写? 面试要求 关于showmodal的问题,请帮忙看哈子` duplicate resource错 参数引用有错吗? 如何用LOW()HIGH()函数返回一个二维动态数组的最值啊? 在delphi7中显示AutoCAD的图...... 求助:用动态生成的数据,如何进行数据更新/删除/添加? 我要编一个进销存软件,希望给点建议! 关于动态创建文件夹然后保存的问题 有高手吗?一简单换窗体问题!!! 把数据库(SQL SERVER)数据导入EXCEL时,日期字段内容出现错误,如代号解决.
procedure TForm1.Button4Click(Sender: TObject);
var
mypt:TPoint;
begin
GetCursorPos(mypt);
edit1.Text:=intTostr(mypt.x);
end;
p:tpoint;
begin
getcursorpos(p);
end;
//p.x,p.y 就是光标位