2015-11-02 105 views
1

所以,目前我基本上覆制使用按Ctrl +ç我發送到窗口資源管理器中的文件夾的名稱。被複制的文本通常充滿了Unicode字符。然後,我使用ClipGet()這樣的:發送Unicode字符

$data = ClipGet() 
Send($data) 

不幸的是,ClipGet()命令不能很好地使用Unicode工作,因此而不是發送文件夾的正確的標題,我得到了一堆?字符。我真的不知道我應該怎麼做Send()正確的文字填充Unicode字符。

回答

1

剪輯得到完美的作品。發送()是問題。

從論壇

;====================================================== 
; 
; Function Name: _SendUnicode("string") 
; Description: Send a unicode or an ASCII string. 
; Parameter(s): $string is the string you want to send. 
; Requirement(s): String Input. 
; Return Value(s): None 
; Author(s):  Robie Zhou ([email protected]) 
; 
;====================================================== 
Func _SendUnicode($string) 
    Local $char 
    Local $code 

    For $i = 1 to StringLen($string) 
     $char = StringMid($string, $i, 1) 
     $code = Asc($char) 
     If $code > 127 Then 
      $code = $code * 256 
      $i = $i + 1 
      $char = StringMid($string, $i, 1) 
      $code = $code + Asc($char) 
     EndIf 
     Send("{ASC " & $code & "}") 
    Next 
EndFunc