edit文本框写入和读取问题？？高手帮帮忙呀！！！！[已解决]

alice148

问题：
     点击[浏览]选取了一个文件，显示在第一行。但是选取第二个文件就覆盖了第一行了。如何让它第二个文件显示在第二行，第二个显示在第三行.........

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("窗体1", 413, 299, 302, 218)
$Edit1 = GUICtrlCreateEdit("", 48, 40, 185, 89)
$Button1 = GUICtrlCreateButton("浏览", 240, 40, 39, 27, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        Case $Button1
                        a1()
        EndSwitch
WEnd

Func a1()

$var = FileOpenDialog("选择启动的程序", "", "所有文件(*.*)",GUICtrlRead($Edit1))


If FileExists($var)=0 Then
Else

GUICtrlSetData($Edit1,$var)

EndIf

EndFunc

lynfr8

30行
成GUICtrlSetData($Edit1,$var&@CRLF,"a")即可

kindkind

楼上牛！"a" 是edit的某个状态参数吧！
找到了：对于 Edit (编辑框), Input (输入框): 若此参数有定义而且不是 "" 则参数“数据”所含字符串将被插入到指针所在位置后（并非覆盖原有内容）。


下面是我改的！

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("窗体1", 413, 299, 302, 218)
$Edit1 = GUICtrlCreateEdit("", 48, 40, 185, 89)
$Button1 = GUICtrlCreateButton("浏览", 240, 40, 39, 27, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        Case $Button1
                        a1()
        EndSwitch
WEnd

Func a1()

$var = FileOpenDialog("选择启动的程序", "", "所有文件(*.*)",GUICtrlRead($Edit1))


If FileExists($var)=0 Then
Else

$var = GUICtrlRead($Edit1) & $var
GUICtrlSetData($Edit1,$var & @CRLF)

EndIf

EndFunc

alice148

谢谢 lynfr8 ！！
久了没来了。2楼的方法自己已经在发前就知道了，是可以达到目的。可是右滚动条不会跟随数据的输入向下滚动，，不过还是谢谢了！！

现在在想读取Edit (编辑框),是数据写到INI里去