| |
|
|
Erasmus.Herold | Hallöchen ...
Kann me alguien a una pequeño Ejemplo (con z.B. 3 Radiobutton) erklären, Yo abfragen kann, welcher el drei Button ausgewählt wurde?
Aus el Doku para "GetCheck" erschließt se No el Zuweisung a el 3 Buttons uno Gruppe a el auszulesenden Valor.
Gracias para el Unterstützung y el winzige Ejemplo.
Saludo Erasmus |
|
|
| |
|
|
|
H.Brill |
Declarar Largo Radio1, Radio2, Radio3, exit, ende
ende = 0
Ventana 600, 400
Crear("GroupBox", %HWnd, "Meine Auswahl", 10, 10, 120, 140)
Radio1 = Crear("Radio Button", %HWnd, "Auswahl 1", 20, 40, 100, 25)
Radio2 = Crear("Radio Button", %HWnd, "Auswahl 2", 20, 80, 100, 25)
Radio3 = Crear("Radio Button", %HWnd, "Auswahl 3", 20, 120, 100, 25)
exit = Crear("Button", %HWnd, "EXIT", 20, 180, 60, 25)
Sinestar encargado ende
Waitinput
If GetCheck(Radio1)
DrawText 150, 50, "Radiobutton 1 gewählt !"
ElseIf GetCheck(Radio2)
DrawText 150, 50, "Radiobutton 2 gewählt !"
ElseIf GetCheck(Radio3)
DrawText 150, 50, "Radiobutton 3 gewählt !"
EndIf
If Clicked(exit)
ende = 1
EndIf
EndWhile
End
El GroupBox dient sí sólo a Übersichtlichkeit. Como braucht lo auch no necesariamente una Handle dafür. Wichtig es, daß uno GetCheck no con otro Check-Características (z.B. Clicked) vermischt. Como reagiert el Button no mehr en él, por qué De todos modos. Darum el extra If Clicked().
PS: GetCheck son sólo True oder False (1 oder 0) zurück. Was passieren se, si uno en una dieser Radiobuttons drückt, restos dir überlassen. Se puede z.B. una variable con una cierto Valor füllen. Wird vielfach verwendet, en una Formular auszufüllen z.B. Herr/Frau wo entonces el String s = "Herr" oder s = "Frau" gesetzt se. |
|
|
| Benutze XPROFAN X3 + FREEPROFAN Wir sind die XProfaner. Sie werden von uns assimiliert. Widerstand ist zwecklos! Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | 11.06.2019 ▲ |
|
|
|
|
Erasmus.Herold | Gracias!
Perfekt erklärt. Funktioniert. |
|
|
| |
|
|
|
Jörg Sellmeyer | El Groupbox dient de paso no a a grafischen Aufhübschung pero sortiert el Radiobuttons auch en ihrer Función. Darum es sinnvoller, el Groupbox después de el Buttons a redactar. El Buttons oberhalb el Groupboxzeile reagieren entonces como separate Auswahlmöglichkeiten. Un zweite Gruppe (oder weitere) puede entonces extra abgefragt/markiert voluntad. |
|
|
| |
|
|
|
Erasmus.Herold | Gracias para el Zusatzinfo. |
|
|
| |
|
|
|
Georg Teles | Jörg war más rápido
Der Gruppen-Rahmen se a optischen Gruppierung innerhalb de Dialogboxen eingesetzt, aber auch para Gruppieren el Radiobuttons.
aquí como Ejemplo
Declarar Largo Radio1, Radio2, Radio3, Radio4, Radio5, Radio6, exit, ende
ende = 0
Ventana 600, 400
Radio1 = Crear("Radio Button", %HWnd, "Auswahl 1", 20, 40, 100, 25)
Radio2 = Crear("Radio Button", %HWnd, "Auswahl 2", 20, 80, 100, 25)
Radio3 = Crear("Radio Button", %HWnd, "Auswahl 3", 20, 120, 100, 25)
Crear("GroupBox", %HWnd, "Meine Auswahl", 10, 10, 120, 140)
exit = Crear("Button", %HWnd, "EXIT", 20, 180, 60, 25)
Radio4 = Crear("Radio Button", %HWnd, "Auswahl 4", 150, 40, 100, 25)
Radio5 = Crear("Radio Button", %HWnd, "Auswahl 5", 150, 80, 100, 25)
Radio6 = Crear("Radio Button", %HWnd, "Auswahl 6", 150, 120, 100, 25)
Crear("GroupBox", %HWnd, "Meine Auswahl 2", 140, 10, 120, 140)
Sinestar encargado ende
Waitinput
If GetCheck(Radio1)
DrawText 300, 50, "Radiobutton 1 gewählt !"
ElseIf GetCheck(Radio2)
DrawText 300, 50, "Radiobutton 2 gewählt !"
ElseIf GetCheck(Radio3)
DrawText 300, 50, "Radiobutton 3 gewählt !"
EndIf
If GetCheck(Radio4)
DrawText 300, 70, "Radiobutton 4 gewählt !"
ElseIf GetCheck(Radio5)
DrawText 300, 70, "Radiobutton 5 gewählt !"
ElseIf GetCheck(Radio6)
DrawText 300, 70, "Radiobutton 6 gewählt !"
EndIf
If Clicked(exit)
ende = 1
EndIf
EndWhile
End
Grüße |
|
|
| |
|
|
|
Erasmus.Herold | |
|
| |
|
|