请大侠指点：关于编辑框中光标的坐标的获取：比如说光标在memo中，而鼠标在memo之外，如何用api函数获取光标的坐标

wuifc 2006-09-06 02:22:38
是编辑框中光标的坐标
而不是鼠标的坐标
...全文
109 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
王集鹄 2006-09-06
  • 打赏
  • 举报
 回复
GetCaretPos()
elilor 2006-09-06
  • 打赏
  • 举报
 回复
Memo.CaretPos
xzl_kye 2006-09-06
  • 打赏
  • 举报
 回复
procedure TForm1.Memo1Change(Sender: TObject);
begin
label1.Caption:=inttostr(memo1.Lines.Count) ;
label2.Caption:=inttostr(length( memo1.Lines[strtoint(label1.Caption)-1]));
end;
delphi中获取memo鼠标所在位置的行和列
关键字=delphi中获取memo鼠标所在位置的行和列。//delphi中获取memo鼠标所在位置的行和列。采集日期=2023-11-23 17:31:01。{delphi中获取memo鼠标所在位置的行和列。采集软件=MKM - 我的知识管理。
Memo光标定位
编程思路直接向Memo组件发送消息EM_LineFromChar并检测返回值，即可获知此组件中光标所在的行号，向Memo组件发送消息EM_LineIndex并检测返回值即可获知此组件中光标所在的列号。编程步骤先在Form上放置三个
Memo 控件光标定位
LRESULT SendMessage （ HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam ） SendMessage( Memo1.Handle, EM_LINEFROMCHAR, Memo1.SelStart, 0); //光标所在的行号 SendMessage( Memo1.Handle, EM_LINEIN
获得Memo、RichEdit的光标位置
光标位置 ： procedure TForm1.Button1Click(Sender: TObject); var Row, Col : integer; begin  Row := SendMessage( Memo 1.Handle, EM_LINEFROMCHAR, Memo 1.SelStart, 0);  Col := CustEdit.SelStart - ...
Delphi中Memo显示行号列号
实例说明 本例是个光标应用的简单技巧，...直接向Memo组件发送消息EM_LineFromChar并检测返回值，即可获知此组件中光标所在的行号，向Memo组件发送消息EM_LineIndex并检测返回值即可获知此组件中光标所在的列...
Delphi

5,388

社区成员

262,730

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

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

+ 用AI写文章