输入框的读取和同步,求教!
本帖最后由 xlan 于 2009-10-14 22:33 编辑想实现的功能是,在Input1中输入文字,Input2可以同步。
下面是个例子。。 例如:在Input1中输入“小胖”,Input2中能自动显示“他是小胖”
感谢,在线等解答!#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Dim $xp = "他是"
$Form1 = GUICreate("Form1", 282, 178, 193, 115)
$Input1 = GUICtrlCreateInput("", 32, 24, 65, 21)
$Input2 = GUICtrlCreateInput($xp, 32, 64, 65, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd 我不会这个,随便写个,基本满足要求
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Dim $xp = "他是"
$Form1 = GUICreate("Form1", 282, 178, 193, 115)
$Input1 = GUICtrlCreateInput("", 32, 24, 100, 21)
$Input2 = GUICtrlCreateInput($xp, 32, 64, 100, 21,$es_readonly)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
$1 = GUICtrlRead($Input1)
$2 = $xp
$2 &= $1
GUICtrlSetData($Input2,$2)
WEnd
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Dim $xp = "他是"
$Form1 = GUICreate("Form1", 282, 178, 193, 115)
$Input1 = GUICtrlCreateInput("", 32, 24, 65, 21)
$Input2 = GUICtrlCreateInput("", 32, 64, 65, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
GUICtrlSetData($Input2,$xp&GUICtrlRead($Input1))
WEnd
哇,楼上的更厉害
这就是高手和菜鸟的区别,人家一行,菜鸟多行 汗 殊途同归 你就别挖苦我了 你们两都很厉害,过于谦虚等于骄傲,呵呵!:face (20): 占楼收藏。 呵呵 学习啦 这个有用 学习...
楼上很多强人 收藏学习了。。
页:
[1]