程序不按要求运行，看看错在哪里
#include <GUIConstantsEx.au3>#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
dim $edittxt='User:'
;设置输入框默认内容变量
GUICreate("User:")
;设置窗口标题
$myedit = GUICtrlCreateEdit($edittxt,0, 0, 300, 600, 100)
;创建一个标题框,设置数据为变量editxtxt
While 1
;创建一个循环
dim $msg1=0
;初始化循环控制变量
GUICtrlSetData ( $myedit,$edittxt)
GUISetState()
;设置窗口显示
While 1
Dim $jhkz=1
while $jhkz
If WinActive ("User") Then
;MsgBox(4096, "WinActive", "记事本窗口是活动的.")
HotKeySet("{ENTER}", "setmsg")
Dim $jhkz=0
Else
Dim $jhkz=1
;$msg1 = 0
HotKeySet("{ENTER}", "")
EndIf
msgbox(0,'',$jhkz)
WEnd
;msgbox(0,'',11)
;HotKeySet("{Enter}", "setmsg")
;EndIf
$msg = GUIGetMsg()
if $msg1 = 960929 Then ExitLoop
If $msg = $GUI_EVENT_CLOSE Then Exit
Wend
$msg = GUIGetMsg()
$myedit1=GUICtrlread($myedit)
$edittxt=$myedit1& @CRLF& @CRLF& 'User:'
;msgbox(0,'',$edittxt)
If $msg = $GUI_EVENT_CLOSE Then Exit
WEnd
;$myedit1=GUICtrlread($myedit)
;获取输入的内容
;$edittxt=$myedit1& @CRL
;代码待插入
;提交数据到服务器
;GUICtrlSetData ( $myedit,$edittxt)
;更新上次输入的内容到屏幕
;$msg1=0
;本次输入暂停事件
;HotKeySet("{Enter}", "setmsg")
;GUISetState()
;While 1
;if $msg1 = 960929 Then ExitLoop
;Wend
Func setmsg()
$msg1 = 960929
EndFunc
;Func Seedent()
;msgbox(0,'','回车')
;EndFunc
;msgbox(0,'',$edittxt)
；我想要做一个类似CMD的程序 程序窗口在激活的情况下 按回车换行现在是窗口没有激活 系统其他软件按回车无反应了
$myedit = GUICtrlCreateEdit($edittxt,0, 0, 300, 600, $ES_WANTRETURN) wkun 发表于 2018-6-10 22:38
$myedit = GUICtrlCreateEdit($edittxt,0, 0, 300, 600, $ES_WANTRETURN)
这个是可以做到回车 但是做不到捕获回车 然后控制回车跳出循环吧 回车做了全局热键.其它软件当然没反应了 tubaba 发表于 2018-6-11 00:53
回车做了全局热键.其它软件当然没反应了
关键在else中是没有做HotKeySet的 Else
Dim $jhkz=1
;$msg1 = 0
HotKeySet("{ENTER}")
EndIf
感谢各位 刚刚仔细看了看官网的手册 发现取消热键的函数用错了 已经搞定了 感谢各位
页:
[1]