Автор Тема: Gui с чекбоксами и кнопка применить то что отмечено  (Прочитано 2022 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Hulk777 [?]

  • Новичок
  • *
  • Сообщений: 58
  • Репутация: 1
    • Награды
  • Версия AutoIt: 3.3.12.0
Добрый день. Не могу создать окно с несколькими чекбоксами чтобы в конце была кнопка "Применить". По нажатии ее чтобы применялись отмеченные чекбоксы на запуск батников. Есть что то подобное в скриптах от  AZJIO. Но там выводятся сообщения по выделенным чекбоксам. Под себя не могу поправить. Дайте пожалуйста код на примере одного-двух чекбоксов в окне и кнопки применить с нужными функциями.

Русское сообщество AutoIt


Оффлайн InnI [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 3975
  • Репутация: 1056
    • Награды
  • Версия AutoIt: 3.3.14.0
Hulk777
Цитировать
код на примере одного-двух чекбоксов
(нажмите для показа/скрытия)

Оффлайн alex33 [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1420
  • Репутация: 177
  • Пол: Мужской
    • alekssamos ВКонтакте
    • Награды
  • Версия AutoIt: 3.3.12.0
Код: AutoIt [Выделить]
#include <GUIConstantsEx.au3>
Global $hGUI, $hCheckbox1, $hCheckbox2, $hCheckbox3, $hButton1
$hGUI = GUICreate("checkboxis", 300, 200)
$hCheckbox1 = GUICtrlCreateCheckbox("один", 10, 10, 70, 30)
$hCheckbox2 = GUICtrlCreateCheckbox("два", 85, 10, 70, 30)
$hCheckbox3 = GUICtrlCreateCheckbox("три", 160, 10, 70, 30)
$hButton1 = GUICtrlCreateButton("Применить", 50, 50, 70, 30)
GUISetState(@SW_SHOW, $hGUI)
While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $hButton1
            If _IsChecked($hCheckbox1) Then ConsoleWrite("Первый checkbox отмечен" & @CRLF)
            If _IsChecked($hCheckbox2) Then ConsoleWrite("Второй checkbox отмечен" & @CRLF)
            If _IsChecked($hCheckbox3) Then ConsoleWrite("Третий checkbox отмечен" & @CRLF)
    EndSwitch
WEnd
GUIDelete($hGUI)

Func _IsChecked($idControlID)
    Return BitAND(GUICtrlRead($idControlID), $GUI_CHECKED) = $GUI_CHECKED
EndFunc   ;==>_IsChecked
 


Оффлайн Hulk777 [?]

  • Новичок
  • *
  • Сообщений: 58

  • Автор темы
  • Репутация: 1
    • Награды
  • Версия AutoIt: 3.3.12.0
Спасибо, то что надо. Но появилась еще проблемка. Как задать ожидание выполнения батника? Сейчас так "if GUICtrlRead($Checkbox1) = 1 Then Run('1.cmd')" Как изменить синтаксис чтобы батники выполнялись по очереди?

Русское сообщество AutoIt

Re: Gui с чекбоксами и кнопка применить то что отмечено
« Ответ #3 Отправлен: Май 29, 2015, 14:49:12 »

Оффлайн alex33 [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1420
  • Репутация: 177
  • Пол: Мужской
    • alekssamos ВКонтакте
    • Награды
  • Версия AutoIt: 3.3.12.0
Тебе поможет функция
Код: AutoIt [Выделить]
или
Код: AutoIt [Выделить]

Оффлайн Hulk777 [?]

  • Новичок
  • *
  • Сообщений: 58

  • Автор темы
  • Репутация: 1
    • Награды
  • Версия AutoIt: 3.3.12.0
Спасибо. А как здесь + ставить к репутации?

Оффлайн alex33 [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1420
  • Репутация: 177
  • Пол: Мужской
    • alekssamos ВКонтакте
    • Награды
  • Версия AutoIt: 3.3.12.0
Под сообщением кнопка

Русское сообщество AutoIt

Re: Gui с чекбоксами и кнопка применить то что отмечено
« Ответ #6 Отправлен: Май 29, 2015, 15:00:00 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
2 Ответов
9130 Просмотров
Последний ответ Февраль 21, 2011, 13:55:54
от frazier1979
0 Ответов
3568 Просмотров
Последний ответ Февраль 21, 2011, 14:08:18
от `p r o x y
0 Ответов
2540 Просмотров
Последний ответ Апрель 03, 2011, 04:47:14
от Belfigor
5 Ответов
5791 Просмотров
Последний ответ Сентябрь 06, 2012, 00:17:15
от general66
3 Ответов
2142 Просмотров
Последний ответ Ноябрь 14, 2013, 00:20:44
от AZJIO
4 Ответов
1671 Просмотров
Последний ответ Декабрь 26, 2013, 17:48:35
от InnI
11 Ответов
2218 Просмотров
Последний ответ Июнь 27, 2015, 17:48:19
от madmasles
4 Ответов
1620 Просмотров
Последний ответ Декабрь 20, 2015, 23:12:15
от joiner
2 Ответов
508 Просмотров
Последний ответ Июнь 27, 2017, 11:49:07
от labudator
1 Ответов
323 Просмотров
Последний ответ Декабрь 28, 2017, 17:31:03
от Alofa