; 编辑框追加文本  By FeiYue

AppendEdit(hEdit, text) {
  text .= "`r`n"
  SendMessage, 0xB1, -2, -1,, ahk_id %hEdit%  ; EM_SETSEL
  SendMessage, 0xC2, 0, &text,, ahk_id %hEdit%  ; EM_REPLACESEL
  SendMessage, 0x115, 7, 0,, ahk_id %hEdit%  ; WM_VSCROLL
}

Gui, Font, s16
Gui, Add, Edit, w500 r10 HwndhEdit
Gui, Show
AppendEdit(hEdit, "记录开始")
Loop 20 {
  AppendEdit(hEdit, A_Index)
  Sleep, 100
}
AppendEdit(hEdit, "记录结束")
return

GuiClose:
GuiEscape:
ExitApp

 

声明：站内资源为整理优化好的代码上传分享与学习研究，如果是开源代码基本都会标明出处，方便大家扩展学习路径。请不要恶意搬运，破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点，所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益，请联系我们进行删除下架。