Вывод информации в Edit по нажатии кнопки

[Hulk777]

Доброго времени суток.

Имеется код:

#include <WindowsConstants.au3>

$GUI=GUICreate("", 500, 150, -1 , -1, $WS_OVERLAPPEDWINDOW)

$Edit1=GUICtrlCreateEdit('', 10, 10, 293, 130)

$Button1=GUICtrlCreateButton('кнопка', 350, 10, 100, 22)


GUISetState ()

While 1
   $msg = GUIGetMsg()
   Select
       Case $msg = -3
           Exit
   EndSelect
WEnd

Подправьте пожалуйста чтобы по нажатии кнопки "кнопка" в Edit выводило текст "Мой текст"...

 

[alex33]

Case $msg = $Button1
		   GUICtrlSetData($Edit1, "Мой текст")

 

[Hulk777]

Благодарю. Получилось так:

#include <WindowsConstants.au3>

$GUI=GUICreate("", 500, 150, -1 , -1, $WS_OVERLAPPEDWINDOW)

$Edit1=GUICtrlCreateEdit('', 10, 10, 293, 130)

$Button1=GUICtrlCreateButton('кнопка', 350, 10, 100, 22)


GUISetState ()

While 1
    Switch GUIGetMsg()
        Case -3
            Exit
        Case $Button1
            GUICtrlSetData($Edit1, "Мой текст")
    EndSwitch
WEnd

А если текст длинный как перенос и пробел прилепить?

 

[alex33]

А если текст длинный как перенос и пробел прилепить?

Посмотри здесь. А так:

"Это очень" & @CRLF & "длинная строка" & _
	"с переносами"

 

[Alofa]

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>

$GUI = GUICreate("", 250, 150, -1, -1, $WS_OVERLAPPEDWINDOW)
$Edit1 = GUICtrlCreateEdit('', 10, 15, 150, 120, BitOR($WS_VSCROLL, $ES_MULTILINE))
GUICtrlSetFont(-1, 12)
$Button1 = GUICtrlCreateButton('кнопка', 170, 30, 70, 42)
GUISetState()

While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			GUICtrlSetData($Edit1, 'К элементу Edit примените стиль $ES_MULTILINE, он ' & _
					'определяет многострочный элемент. По умолчанию в одну строку.')
	EndSwitch
WEnd