在编辑框双击行，取得行内容。有无办法

dnxl

这时候就要用到万能sendmessage了

明靓

源码在此处:https://bbs.125.la/thread-14704052-1-1.html  

神女软件定制

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_编辑框1_被双击	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类 型	静态	数组	备 注
s	文本型
p	整数型
p2	整数型

s ＝ 编辑框1.内容
p ＝ 倒找文本 (s, #换行符, 编辑框1.起始选择位置 ＋ 1, 假)
如果 (p ＝ -1)
p ＝ 1
p ＝ p ＋ 1

p2 ＝ 寻找文本 (s, #换行符, 编辑框1.起始选择位置 ＋ 1, 假)
如果真 (p2 ＝ -1)
p2 ＝ 取文本长度 (s) ＋ 1

调试输出 (取文本中间 (s, p, p2 － p))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _编辑框1_被双击, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 s, 文本型<br /> .局部变量 p, 整数型<br /> .局部变量 p2, 整数型<br /> <br /> s ＝ 编辑框1.内容<br /> p ＝ 倒找文本 (s, #换行符, 编辑框1.起始选择位置 ＋ 1, 假)<br /> .如果 (p ＝ -1)<br />     p ＝ 1<br /> .否则<br />     p ＝ p ＋ 1<br /> .如果结束<br /> <br /> p2 ＝ 寻找文本 (s, #换行符, 编辑框1.起始选择位置 ＋ 1, 假)<br /> .如果真 (p2 ＝ -1)<br />     p2 ＝ 取文本长度 (s) ＋ 1<br /> .如果真结束<br /> <br /> 调试输出 (取文本中间 (s, p, p2 － p))

crary06

  

子程序名	返回值类型	公开	备 注
_编辑框1_鼠标左键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类 型	静态	数组	备 注
str	文本型

str ＝ 编辑框1.被选择文本
如果真 (str ≠ “”)
置剪辑板文本 (str)

.版本 2<br /> <br /> .子程序 _编辑框1_鼠标左键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 str, 文本型<br /> <br /> str ＝ 编辑框1.被选择文本<br /> .如果真 (str ≠ “”)<br />     置剪辑板文本 (str)

suisui

编辑框没有 可以考虑换列表框

冰墩墩

https://bbs.125.la/thread-14704052-1-1.html

啊森哥哥

易正易则 发表于 2021-10-28 00:02

也是一样 多行文本就无法这样干....  我的文字如果很长这一行实际被分成了2行或者3行  按照这个取法 还是只能取到一行 取不完整

啊森哥哥

feng787 发表于 2021-10-28 01:13
这个可以实现，获取光标所在行文本，拿去改成双击事件触发就行了

也是一样 多行文本就无法这样干....  我的文字如果很长这一行实际被分成了2行或者3行  按照这个取法 还是只能取到一行 取不完整

啊森哥哥

小笨瓜 发表于 2021-10-28 00:04

就这个图片而言 实际是一句话   放不下自动分到了第二行  这种就取不完整。