Seite 1 von 1

[gelöst] Abfrage von OptionsButton wie?

Verfasst: Di 13. Sep 2022, 18:38
von wega
Hallo zusammen,

mit folgender Sequenz

Code: Alles auswählen

'Dialogaufruf
	Dlg = CreateUnoDialog(DialogLibraries.Standard.Dlg_Biegeschwing)
	Dlg.Execute()	
	
	if OptionsButton1.state then
		fall = 1
	endif
	if OptionsButton2.state then
		fall = 2
	endif
	if OptionsButton3.state then
		fall = 3
	endif
	if OptionsButton4.state then
		fall = 4
	endif
	
	msgbox fall
möchte ich die Variable "fall" setzen.
Das will mir aber nicht gelingen.

Wie muß ich dann aber die Abfrage der OptionsButton gestalten?

Mit Gruß
Werner

Re: Abfrage von OptionsButton wie?

Verfasst: Di 13. Sep 2022, 20:27
von karolus
offenbar existiert ja dieser Dialog "……BiegeSchwing" bereits!

Möchtest du uns entweder ein Dokument mit enthaltenen fertigen Dialog anfügen, oder den Code zum erstellen des Dialogs mitteilen? Das wäre nett!

Re: Abfrage von OptionsButton wie?

Verfasst: Di 13. Sep 2022, 20:45
von wega
Hallo karolus,

vielen Dank für Deine Antwort.

Ich habe aber gerade die Lösung zu meinem Problem gefunden.

Hier meine Lösungssequenz:

Code: Alles auswählen

'Dialogaufruf
	Dlg = CreateUnoDialog(DialogLibraries.Standard.Dlg_Biegeschwing)
	Dlg.Execute()	
	
	if Dlg.getControl("OptionButton1").state <> 0 then
		fall = 1
	endif
	if Dlg.getControl("OptionButton2").state <> 0 then
		fall = 2
	endif
	if Dlg.getControl("OptionButton3").state <> 0 then
		fall = 3
	endif
	if Dlg.getControl("OptionButton4").state <> 0 then
		fall = 4
	endif
	
	msgbox fall
Jetzt wird mir in der msgbox auch die richtige Fallnummer angezeigt.

Mit freundlichem Gruß
Werner