顯示廣告
隱藏 ✕
看板 Programming
作者 tingyun60426. (tingyun60426.bbs@ptt.cc)
標題 [轉寄] Re: [AHK-] 分享以Send指令送中文字串小程式
時間 2010年03月06日 Sat. PM 06:29:02


看板 EzHotKey
作者 Lumania (小糠榔)
標題 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)
※ 看板: Programming 文章推薦值: 0 目前人氣: 0 累積人氣: 569 
r)回覆 e)編輯 d)刪除 M)收藏 ^x)轉錄 同主題: =)首篇 [)上篇 ])下篇
看板名稱: 確定(Enter) 取消(Esc) 搜尋(Space)
查詢帳號: 確定(Enter) 取消(Esc) 搜尋(Space)
搜尋: m)m文 b)進板 c)未分類 a)作者 /)標題 q)取消?[q]

搜尋 送出(Enter) 取消(Esc)

回覆文章至: f)看板 m)作者信箱 b)兩者皆是 q)取消?[f]
要引用原文嗎? y)引用原文 n)不引用 a)全部回覆 r)複製原文 q)取消?[y]
轉錄本文章於看板: 1)使用連結 2)使用複製 q)取消 ?[1]
轉寄至站內信箱於使用者: 確定(Enter) 取消(Esc)
轉寄至站內信箱於使用者: 確定(Enter) 取消(Esc)
修改文章標題為: 確定(Enter) 取消(Esc)
修改文章標題為: 確定(Enter) 取消(Esc) 全部(a)

確定要刪除這篇文章?(可按大U救回) 確定(Enter) 取消(Esc)

刪除理由:

確定(Enter) 取消(Esc)
加到這個分類: 確定(Enter) 下一層(→) 回上層(←) 取消(Esc)
你覺得這篇文章: 1)真讚 2)真瞎 q)取消?[1] (再選一次即可收回)
你覺得這篇文章: 1)值得推薦 2)表示反對 3)單純註解 q)取消?[3]
guest
預覽(Enter) 取消(Esc)
上傳圖片
按ctrl+Enter可輸入下一行。
guest
確定要送出? 確定(Enter) 取消(Esc) 繼續(e)
搜尋: 送出(Enter) 取消(Esc)

▏▎▍▌▋▊▉ 請按任意鍵繼續