木头人 发表于 2011-5-23 13:10:37

请教如何将EDIT框的内容写入文本？<已经解决>

本帖最后由 木头人 于 2011-5-23 23:16 编辑

GUICtrlCreateEdit 框内的内容如果写入文本呢？
并且实现如果为手工一直输入的话，无须换行。
如果手工输入回车的话，再换行。
写入文本时如果有回车动作的则自动换行。
谢谢

papapa314 发表于 2011-5-23 16:32:54

本帖最后由 papapa314 于 2011-5-23 16:36 编辑

回复 1# 木头人



#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 377, 299, 192, 124)
$Edit1 = GUICtrlCreateEdit("", 64, 32, 241, 177)
$Button1 = GUICtrlCreateButton("Button1", 112, 240, 115, 33)
GUISetOnEvent($GUI_Event_CLose,"quit")
GUICtrlSetOnEvent($Button1,"write")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        Sleep(100)
WEnd

Func quit()
Exit
EndFunc


Func write()
                FileWrite("写入的文本.txt",GUICtrlRead($Edit1))
                MsgBox(0,"","写入成功",3)
EndFunc

itljl 发表于 2011-5-23 17:28:50

用guiread啊。
页: [1]
查看完整版本: 请教如何将EDIT框的内容写入文本？<已经解决>