bin am Verzweifeln - ich kriege es ums Verrecken nicht hin!
Ich habe zwei Radiobuttons in einer Gruppe und drei in einer weiteren. Die zweite Gruppe darf nur aktiv sein, wenn der erste Radiobutton der ersten Gruppe ausgewählt ist:
Code: Alles auswählen
o vorhandene überschreiben
o nur Buchungsdaten
o alles außer Buchungsdaten
o alle Daten überschreiben
o vorhandene überspringen
Das Problem dabei: Sobald ich in der inneren Gruppe auf einen Eintrag klicke, rast der Punkt in den drei RadioButtons unaufhörlich durch die drei Radiobuttons durch und hört nicht auf.
Ich habe natürlich zwei dsSettingGroup: Die innere enthält die drei dsRadiobuttons (diese haben sie als parent) und die äußere enthält die anderen beiden dsRadobuttons und die innere dsSettingGroup (diese drei Parts haben sie als parent).
Hat irgendeiner von euch ein solches Konstrukt erfolgreich am Laufen? Wo habe ich den Fehler gemacht?
Code: Alles auswählen
::Static2 := dsSettingGroup():new( ::drawingArea, , {70,70}, {295,145} )
::Static2:AutoAccelerator := .F.
::Static2:EnableJump := .F.
::Static2:clipSiblings := .T.
::Static2:type:= XBPSTATIC_TYPE_BGNDFRAME
::Radio1 := dsRadioButton():new( ::Static2,, {8,115}, {280,18} )
::Radio1:caption := "~vorhandene Einlaufnummern überschreiben"
::Radio1:Tooltip := "Bitte geben Sie an, ob bereits vorhandene Einlaufnummern überschrieben werden sollen!"
::Radio1:selected := {|| iif( eversion >= 6.4, ::Static3:enable(), ) }
::Radio1:tabStop := .T.
AAdd( ::editControls, ::Radio1 )
::Static3 := dsSettingGroup():new( ::Static2, , {25,29}, {250,90} )
::Static3:AutoAccelerator := .F.
::Static3:EnableJump := .F.
::Static3:clipSiblings := .T.
::Static3:type:= XBPSTATIC_TYPE_BGNDFRAME
::Radio2 := dsRadioButton():new( ::Static2,, {8,7}, {280,18} )
::Radio2:caption := "vorhandene ~Einlaufnummern überspringen"
::Radio2:Tooltip := "Bitte geben Sie an, ob bereits vorhandene Einlaufnummern übersprungen werden sollen!"
::Radio2:selected := {|| ::Static3:disable() }
::Radio2:selection:= .T.
::Radio2:tabStop := .T.
AAdd( ::editControls, ::Radio2 )
::Radio11 := dsRadioButton():new( ::Static3,, {8,54}, {230,18} )
::Radio11:caption := "~alles außer Buchungsdaten überschreiben"
::Radio11:Tooltip := "Bitte geben Sie an, ob bei bereits vorhandenen Einlaufnummern die Buchungsdaten nicht überschrieben werden sollen!"
::Radio11:tabStop := .T.
AAdd( ::editControls, ::Radio11 )
::Radio12 := dsRadioButton():new( ::Static3,, {8,32}, {230,18} )
::Radio12:caption := "~nur Buchungsdaten überschreiben"
::Radio12:Tooltip := "Bitte geben Sie an, ob bei bereits vorhandenen Einlaufnummern nur die Buchungsdaten überschrieben werden sollen!"
::Radio12:tabStop := .T.
AAdd( ::editControls, ::Radio12 )
::Radio13 := dsRadioButton():new( ::Static3,, {8,10}, {230,18} )
::Radio13:caption := "alle ~Daten überschreiben"
::Radio13:Tooltip := "Bitte geben Sie an, ob bereits vorhandene Einlaufnummern komplett überschrieben werden sollen!"
::Radio13:selection:= .T.
::Radio13:tabStop := .T.
AAdd( ::editControls, ::Radio13 )
Martin