Question

易语言 超级编辑框怎么添加文字

编辑框有加入文本 超级编辑框没有要怎么添加文字

Answer 1

最简单的方法：
超级编辑框1.内容 ＝ 超级编辑框1.内容 +“超级编辑框”

稍微复杂一点的方法：

.版本 2
.支持库 iext2

.子程序 _按钮1_被单击

超级编辑框加入文本 (超级编辑框1, “abcdefg”)

.子程序 超级编辑框加入文本
.参数 超级编辑框, 超级编辑框
.参数 文本, 文本型

超级编辑框.被选择文本 ＝ 文本

Answer 2

超级编辑框1.内容 ＝ “超级编辑框”

追问

我要的是添加 不是覆盖掉原有的文字
像 编辑框那样 编辑框1.加入文本（）
超级编辑框没有加入文本要用什么代替

追答

.版本 2

.DLL命令 lstrcpyn, 整数型, "kernel32", "lstrcpynA"
.参数 lpString1, 文本型, 传址
.参数 lpString2, 文本型, 传址
.参数 iMaxLength, 整数型

.DLL命令 SendMessage, 整数型, "user32", "SendMessageA"
.参数 句柄, 整数型
.参数 消息, 整数型
.参数 参数, 整数型
.参数 参数, 整数型

/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
.版本 2

.子程序 编辑框_加入文本
.参数 编辑框句柄, 整数型
.参数 欲加入文本, 文本型

SendMessage (超级编辑框1.取窗口句柄 (), 177, SendMessage (超级编辑框1.取窗口句柄 (), 14, 0, 0), -1)
SendMessage (超级编辑框1.取窗口句柄 (), 194, 0, lstrcpyn (欲加入文本, 欲加入文本, 0))
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
看不懂留下 邮箱

追问

真看不懂 我刚开始学
邮箱 398695609@qq.com
可不可以发个源码给我 谢谢了