看板 - 閱讀文章

您現在的位置是 EzHotKey - 自動化軟體--可以討論程式語言喔 。
^ 返回文章列表 | < 前一篇 | 下一篇 > 

作者: Lumania (小糠榔) 看板: EzHotKey
標題: Re: [AHK-] 分享以Send指令送中文字串小程式
時間: Thu Oct 23 14:49:11 2008

經過一些修改過，英文中文可以混雜送出
程式碼如下，參考看看

SendBig5(xx)
{
    i:=StrLen(xx)
    if i=0
       return
    loop,
    {
        tmp1 := NumGet(xx, 0, "UChar")
        if tmp1<128
        {
           i--
           stringtrimleft, xx, xx, 1
        }
        else
        {
           tmp1 := ( tmp1<<8) | NumGet(xx, 1, "UChar")
           i-= 2
           stringtrimleft, xx, xx, 2
        }
        send, {ASC %tmp1%}
        if i=0
            break
    }
}

^Numpad2::
keywait, ctrl
winwaitactive, A
SendBig5("檢驗abc~!的,，(1天)")
return

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.69.13.1
※ 編輯: Lumania         來自: 210.69.13.1          (10/24 08:59)