Старожил
Сообщения: 307
Благодарности: 137
|
Профиль
|
Отправить PM
| Цитировать
Такой вопрос, помогите: мучаюсь, не могу реализовать свои замыслы. Вот в этом примере: proba.au3 :
читать дальше »
Код: 
#include <GUIConstants.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form = GUICreate("Dialog", 316, 273, 360, 243)
GUISetIcon("D:\003.ico")
$Button1 = GUICtrlCreateButton("OK", 1, 235, 75, 25, 0)
$Button2 = GUICtrlCreateButton("Очистить", 119, 235, 75, 25, 0)
$Button3 = GUICtrlCreateButton("Выход", 234, 235, 75, 25, 0)
$Edit = GUICtrlCreateEdit("" & @CRLF, 0, 88, 169, 81, $ES_AUTOVSCROLL + $WS_VSCROLL)
GUICtrlSetLimit($Edit, 100)
$Combo = GUICtrlCreateCombo("Ваш Выбор:", 8, 8, 297, 25)
GUICtrlSetData(-1, '1|2|', '')
$Label1 = GUICtrlCreateLabel("Осталось символов:", 8, 48, 109, 17)
$neizvesno = GUICtrlCreateLabel("???", 120, 48, 36, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE,$Button3
Exit
Case $Button1
_Getpicture()
EndSwitch
WEnd
Func _Getpicture()
$i=GUICtrlRead($Combo)
Switch $i
Case 1
GUICtrlCreatePic(@WindowsDir & "\Штукатурка.bmp", 208, 96, 81, 65)
Case 2
GUICtrlCreatePic(@WindowsDir & "\Пузыри.bmp", 208, 96, 81, 65)
Case Else
MsgBox(0, Default, 'Сделайте выбор в элементе Combo')
EndSwitch
EndFunc
Хочу чтоб появлялся рисунок при выборе из Combo (примерно так как появляется, когда я нажимаю на кнопку ОК), но только при выборе из элемента Combo и без нажатия на кнопку ОК. Тоесть выбрал 1 - рисунок поменялся, 2-тоже. И еще, как подключить кнопку Очистить на очистку поля Edit. И еще не могу придумать, чтоб там где у меня $neizvesno велся отсчет от ограничения на ввод символов(у меня100) и до 0 при вводе символов в поле Edit(тоесть сначала там 100, а ввел 1символ - стало 99. Вот такая сложная задача, Сегодня окончил читать тему, все 143 страницы, паралельно изучаю справку, и на Ru.Board сижу, - решения не нашел. Хоть совет прошу.
P.S.
Рисунки взял первые на выбор, можно любыми заменить небольшого формата!(но если нету никаких ?!, то в прикрепленном файле они).
Я на Полезное сообщение нажимал уже не раз, а у меня написано - благодарности 0. Не подумайте что мне сказать спасибо трудно, не знаю еще как...
|