V
VitAl2013
Гость
Есть ли возможность вызвать значение переменной на исполнение? Предполагается предварительная генерация айтишного скрипта.
$b = (значение берём из цикла)
$a = "Button"&$b&" = GUICtrlCreateButton(""Target"&$b&""", 10*"&$b&", 5*"&$b&", 20, 20)"
Opt('GUIOnEventMode', 1)
$GUI = GUICreate('Test GUI window', 500, 200)
$N = 10; Number of buttons
Local $Button[$N]
$delta = 9
For $i = 0 to $N - 1
$Button[$i] = GUICtrlCreateButton('Button' & $i, 49 * $i + 1, 1, 48, 20)
Next
GUISetState()
GUISetOnEvent(-3, '_Exit')
While 1
Sleep(100)
WEnd
Func _Exit()
Exit
EndFunc
Opt('GUIOnEventMode', 1)
...
GUISetState()
GUISetOnEvent(-3, '_Exit')
...
Func _Exit()
Exit
EndFunc
$delta = 9
ну писалось на коленке, поэтому уже нигде ;)VitAl2013 сказал(а):не вижу где используется
VitAl2013 сказал(а):Сразу вопрос по ходу скрипта: что дают строки?
Opt('GUIOnEventMode', 1); Режим прорисовки GUI. кури хелп на тему "GUI Concepts"
...
GUISetState(); Отображение окна. По умолчанию окно скрыто
GUISetOnEvent(-3, '_Exit'); Если окном получен сигнал "-3" ($GUI_EVENT_CLOSE) то вызвать функцию _Exit()
Func _Exit(); Функция которая вызывается - Завершить скрипт
Exit
EndFunc
Всё вопрос снят - это я недоглядел что снова по привычке кейсы заполняю.Затянулся хэлпом - понял что другой режим работы. А на обычном работать не будет? Я попытался и какие-то странные ошибки полезли. Также в этом (1) режиме у меня не работают радиобатоны как следует, точнее не работают вложенные функцииповешанные на радиобатоны. Это может быть следствием такого режима работы? Как поступить?Код:GUICtrlSetState($Label1, $GUI_ENABLE/DISABLE)
То что теперь всё работает через функции я тоже вкурил, и как расписать по эвентам тоже. Контрольные мессаджи вылетают, а элементы в интерфейсе не энэйблятся.
For $i = 1 to $N
$sData = _Crypt_DecryptData(FileRead($sDestinationFile), $vCryptKey, $CALG_RC4)
Где?есть правильце об ответе в старых тема
Полный код в студию (включая содержимое читаемых файлов).не работает
Execute('$iButton = GUICtrlCreateButton("Кнопка", 20, 20, 50, 20)')
$iButton = Execute('GUICtrlCreateButton("Кнопка", 20, 20, 50, 20)')
$sData = Execute('_Crypt_DecryptData(FileRead($sDestinationFile), $vCryptKey, $CALG_RC4')
#Include <Crypt.au3>
$sDestinationFile = "2w.au3"
$vCryptKey = "Моя комбинация"
;$sData = _Crypt_DecryptData(FileRead($sDestinationFile), $vCryptKey, $CALG_RC4)
$sData = Execute('_Crypt_DecryptData(FileRead($sDestinationFile), $vCryptKey, $CALG_RC4')
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 264, 244, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 112, 80, 75, 25)
$Input1 = GUICtrlCreateInput("Input1", 16, 16, 121, 21)
$Input2 = GUICtrlCreateInput("Input2", 16, 48, 121, 21)
$Input3 = GUICtrlCreateInput("Input3", 16, 120, 121, 21)
$Button2 = GUICtrlCreateButton("Button2", 144, 120, 43, 25)
$Button3 = GUICtrlCreateButton("Button3", 64, 152, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Global
Local
While
Wend
Case
Select
Exit
;~ и т.д.....
Ну к примеру Global/Local можно ещё запустить кое как:Не получится у Вас так запустить, такие ключевые слова как
Execute('Assign("sVar", "Data", 2)')
ConsoleWrite(Execute('$sVar') & @LF)