能不能实现这样的功能? 具体是:打开一个文本文件,把内容显示在一个EDIT框(其他也可以)内,用户用鼠标选定一段内容,要求得到鼠标选定内容的行和列值,能作到吗?急!在线等! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 没人用过吗?能在EDIT框内或边上显示行号和列号吗? 选定的起始位置是 SelStart,不过是字符的位置,而不是行和列。可以用 Memo1.CaretPos 得到光标的位置。 StatusBar1.Panels[0].Text := '行: ' + IntToStr(Memo1.CaretPos.y + 1) + ' 列: ' + IntToStr(Memo1.CaretPos.x + 1); 如何打开一个文本文件,把内容显示在Memo1内? memo1.Lines.LoadFromFile('c:\123\.123.txt') memo1.Lines.LoadFromFile('c:\123\123.txt') 能不能实现Memo1内的指定行、列的内容变换背景颜色? 一开源exe资源监测工具,如何使其编译成功 现在打印用什么方法的???? 使媒体播放器窗口变灰(非激活状态) 请问ehlib怎样让单元格的字体垂直居中?? 帮我 各位老大,急呀。。。怎麼樣能從下面的語句中提取圖片。 如何将查询结果保存到另一个数据库中 急急急急急急急!!!!关于计算日期 createfile函数的使用。 delphi怎么多人同时开发 高分求救高手(不够再加):Delphi中如何实现4位小数?在线等候... 请问这是什么错?
没人用过吗?能在EDIT框内或边上显示行号和列号吗?
可以用 Memo1.CaretPos 得到光标的位置。
StatusBar1.Panels[0].Text := '行: ' + IntToStr(Memo1.CaretPos.y + 1)
+ ' 列: ' + IntToStr(Memo1.CaretPos.x + 1);