[решено] Использование кнопки с точкой (ну это как поставить галочку=)

[sashadeg]

простите, за глупое название темы, не знаю как правильно выразиться... модераторы, измените пожалуйста название темы если можно(и если знаете, как правильно

Вот что мне нужно:

1. Вылазит окно в котором задаётся вопрос. нужно из 2 вариантов выбрать один (поставить точку на том котором считаете нужным)

2. при выборе первого варианта переменная $p = test1

3. при выборе второго варианта переменная $p = test2

4. далее скрипт продолжает своё выполнение используя переменную "$p" в соответствии с выбранным вариантом ранее

[proxy]

возмжно, в этом случае, проще отдельное GUI окошко нарисовать....

[sashadeg]

если вы не поняли то вот что примерно мне нужно, чтобы было в окошке

[beve]

Цитата sashadeg:



вот что примерно мне нужно, чтобы было в окошке

[решено] Использование кнопки с точкой (ну это как поставить галочку=)

Вот:

Код:

Код: Выделить всё

#include 
Global $p
$Form1 = GUICreate("Test", 196, 96, 193, 173)
$Label1 = GUICtrlCreateLabel("Сделайте ваш выбор сер:", 24, 8, 166, 17)
$Radio1 = GUICtrlCreateRadio("$p=test1", 24, 32, 113, 17)
$Radio2 = GUICtrlCreateRadio("$p=test2", 24, 48, 113, 17)
$Ok_Button = GUICtrlCreateButton("ok", 24, 72, 57, 17, 0)
GUISetState(@SW_SHOW)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
        Exit
Case $Ok_Button 
Select 
    Case GUICtrlRead($Radio1) = $GUI_CHECKED 
    $p="test1"
    Exitloop
    Case GUICtrlRead($Radio2) = $GUI_CHECKED 
    $p="test2"
    Exitloop
EndSelect 
    EndSwitch
WEnd
GUISetState(@SW_HIDE)
MsgBox(0, "Результат", "$p="&$p) 

Только непонятно, нужна кнопка ОК или не нужна, а чтобы при любом[/i] выборе скрипт сам продолжал свою работу?

Но если нужно без кнопки ОК, то вот:

Код:

Код: Выделить всё

#include 
Global $p
$Form1 = GUICreate("Test", 196, 96, 193, 173)
$Label1 = GUICtrlCreateLabel("Сделайте ваш выбор сер:", 24, 8, 166, 17)
$Radio1 = GUICtrlCreateRadio("$p=test1", 24, 32, 113, 17)
$Radio2 = GUICtrlCreateRadio("$p=test2", 24, 48, 113, 17)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
    Exit
Case $Radio1 
        If BitAND(GUICtrlRead($Radio1), $GUI_CHECKED) Then 
        $p="test1"
    ExitLoop
    EndIf 
Case $Radio2 
    If BitAND(GUICtrlRead($Radio2), $GUI_CHECKED) Then 
    $p="test2"
    ExitLoop
    EndIf
EndSwitch
WEnd
GUISetState(@SW_HIDE)
MsgBox(0, "Результат", "$p="&$p) 

[sashadeg]

Спасибо!!! Очень помогло... ТО ЧТО ДОХТОР ПРОПИСАЛ

[sashadeg]

Закройте тему пожалуйста и поставте тег [решено]

[Creat0R]

Цитата sashadeg:



поставте тег [решено]

[решено] Использование кнопки с точкой (ну это как поставить галочку=)

Вы кажется, и сами можете этот тег поставить