Что нового

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

Hulk777

Новичок
Сообщения
69
Репутация
1
Доброго времени суток.

Имеется код:

Код:
#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

Скриптер
Сообщения
1,457
Репутация
186
Код:
Case $msg = $Button1
		   GUICtrlSetData($Edit1, "Мой текст")
 
Автор
H

Hulk777

Новичок
Сообщения
69
Репутация
1
Благодарю. Получилось так:

Код:
#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


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

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
 
Верх