Re: [請問] 怎麼送出input1的文字-autoit

看板EzHotKey作者UndeadSion (UndeadSion)時間15年前 (2009/06/27 14:17)推噓1(1推 0噓 0→)

留言1則, 1人參與討論串2/2 (看更多)

※ 引述《ledup (我是男子漢)》之銘言： : 我想要按f8 然後會在記事本自動輸出我打在 : $input1裡面的文字，不過怎麼只有打出3 而以 : 而且我裡面也沒有打3啊，超奇怪 : 程式碼要怎麼改，麻煩高手幫幫我以下參考看看，如果是要逐字送出的話，請按 F9 ---------------->8---------------->8---------------- 請沿此線剪下 ---- #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> HotKeySet("{F8}","keyit") ; F8 一次貼上 HotKeySet("{F9}","keyit2") ; F9 逐字送出 $Form1 = GUICreate("GUI 設計編輯區", 620, 407, -1, -1) $Edit1 = GUICtrlCreateEdit("", 20, 10, 580, 380) ; 改用 Edit 比較方便 GuiSetState() While 1 $Msg = GUIGetMsg() Switch $Msg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func keyit() If Not WinExists("[TITLE:未命名 - 記事本; CLASS:Notepad]") Then Return $Text = GUICtrlRead($Edit1) ControlCommand("[LAST]", "", "Edit1", "EditPaste", $Text) EndFunc Func keyit2() If Not WinExists("[TITLE:未命名 - 記事本; CLASS:Notepad]") Then Return $hNotepad = ControlGetHandle("[LAST]", "", "Edit1") $Text = StringSplit(StringReplace(GUICtrlRead($Edit1), @CR, ""), "") For $i = 1 To $Text[0] DllCall("user32.dll", "int", "PostMessageW", "hwnd", $hNotepad, _ "uint", 0x286, "wparam", AscW($Text[$i]), "lparam", 0) Sleep(100) Next EndFunc ---------------->8---------------->8---------------- 請沿此線剪下 ---- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 60.248.159.124