私は AutoIt GUI に取り組んでいます。これは、自分用の小さなサンプル ボックスであり、編集ボックスに別のテキスト行を追加する方法を知りたいと思っていました..
現在、(「ボタン 1」を押すと) 編集ボックスに次のように表示されます。
'Button 1 was pressed'
別のボタンを押すとリセットされます。すでに編集ボックスにあるテキストを削除せずに、新しいテキスト行を追加するにはどうすればよいですか? -前もって感謝します。
Opt("GUIOnEventMode", 1)
$Form2 = GUICreate("line trial", 552, 178, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form2Close")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form2Minimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form2Maximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "Form2Restore")
$editbox = GUICtrlCreateEdit("", 8, 8, 409, 169)
GUICtrlSetData(-1, "editbox")
GUICtrlSetResizing(-1, $GUI_DOCKRIGHT)
GUICtrlSetOnEvent(-1, "editboxChange")
$Group1 = GUICtrlCreateGroup("Options", 424, 0, 121, 137)
$Button1 = GUICtrlCreateButton("Button1", 432, 16, 51, 17)
GUICtrlSetOnEvent(-1, "Button1Click")
$Button2 = GUICtrlCreateButton("Button2", 432, 40, 51, 17)
GUICtrlSetOnEvent(-1, "Button2Click")
$Button3 = GUICtrlCreateButton("Button3", 432, 64, 51, 17)
GUICtrlSetOnEvent(-1, "Button3Click")
$Button4 = GUICtrlCreateButton("Button4", 432, 88, 51, 17)
GUICtrlSetOnEvent(-1, "Button4Click")
$Button5 = GUICtrlCreateButton("Button5", 432, 112, 51, 17)
GUICtrlSetOnEvent(-1, "Button5Click")
$Button6 = GUICtrlCreateButton("Button6", 488, 16, 51, 17)
GUICtrlSetOnEvent(-1, "Button6Click")
$Button7 = GUICtrlCreateButton("Button7", 488, 40, 51, 17)
GUICtrlSetOnEvent(-1, "Button7Click")
$Button8 = GUICtrlCreateButton("Button8", 488, 64, 51, 17)
GUICtrlSetOnEvent(-1, "Button8Click")
$Button9 = GUICtrlCreateButton("Button9", 488, 88, 51, 17)
GUICtrlSetOnEvent(-1, "Button9Click")
$Button10 = GUICtrlCreateButton("Button10", 488, 112, 51, 17)
GUICtrlSetOnEvent(-1, "Button10Click")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button11 = GUICtrlCreateButton("Exit", 424, 144, 59, 25)
GUICtrlSetOnEvent(-1, "Button11Click")
$Button12 = GUICtrlCreateButton("Clear", 496, 144, 51, 25)
GUICtrlSetOnEvent(-1, "Button12Click")
GUISetState(@SW_SHOW)
Global $File1 = "test.txt"
While 1
Sleep(100)
WEnd
Func Button10Click()
GUICtrlSetData($editbox, "Button 10 was pressed ")
FileWriteLine($File1, "Button 10 was pressed")
EndFunc
Func Button11Click()
If FileExists("test.txt") Then
FileDelete ( "test.txt" )
exit
Else
exit
EndIf
EndFunc
Func Button12Click()
GUICtrlSetData($editbox, "")
EndFunc
Func Button1Click()
GUICtrlSetData($editbox, "Button 1 was pressed")
FileWriteLine($File1, "Button 1 was pressed")
EndFunc
Func Button2Click()
GUICtrlSetData($editbox, "Button 2 was pressed ")
FileWriteLine($File1, "Button 2 was pressed")
EndFunc
Func Button3Click()
GUICtrlSetData($editbox, "Button 3 was pressed ")
FileWriteLine($File1, "Button 3 was pressed")
EndFunc
Func Button4Click()
GUICtrlSetData($editbox, "Button 4 was pressed ")
FileWriteLine($File1, "Button 4 was pressed")
EndFunc
Func Button5Click()
GUICtrlSetData($editbox, "Button 5 was pressed ")
FileWriteLine($File1, "Button 5 was pressed")
EndFunc
Func Button6Click()
GUICtrlSetData($editbox, "Button 6 was pressed ")
FileWriteLine($File1, "Button 6 was pressed")
EndFunc
Func Button7Click()
GUICtrlSetData($editbox, "Button 7 was pressed ", 1)
FileWriteLine($File1, "Button 7 was pressed")
EndFunc
Func Button8Click()
GUICtrlSetData($editbox, "Button 8 was pressed ")
FileWriteLine($File1, "Button 8 was pressed")
EndFunc
Func Button9Click()
GUICtrlSetData($editbox, "Button 9 was pressed
FileWriteLine($File1, "Button 9 was pressed")
EndFunc
Func editboxChange()
Global $editline1 = GUICtrlRead($editbox)
GUICtrlSetData($editbox, $editline1)
EndFunc
Func Form2Close()
exit
EndFunc