OpenOffice.info

DPunch hat geschrieben: Kann es sein, dass ihr beiden etwas aneinander vorbeiredet?

DPunch hat geschrieben:

Stephan hat geschrieben:Und was soll das bei einem DIALOG bewirken?

Vermutlich das, was es auch überall sonst bewirken soll. Nämlich, dass man die Kontrollelemente alle in einer Schleife [...]
ansprechen kann. Bei konsequenter Handhabung der Namensgebung geht das natürlich auch in einem Formular

Ich denke, balu wollte nur nochmal verschärft darauf hinweisen, dass die Namensgebung in diesem Fall eben essenziell ist.

Als aller erstes hatte ich darauf geachtet, dass alle Optionsbutton eine *Durchgehende* Bezeichnung, besser gesagt Name, haben in der Art von OptionButton1 bis hin zu OptionButton19.

Stephan hat geschrieben:Und was soll das bei einem DIALOG bewirken?

optbo = oDialog1.getControl("OptionButton" & Zählvariable)

ThisComponent.DrawPage.Forms.GetByName("Standard").getByName("OptionButton" & Zählvariable)

ja okay, hab ja wirklich noch nicht die Erfahrung, aber ich hatte halt gedacht das es funktionieren könnte. Und nein, ich hatte es vorher nicht getestet.

Nun, da es hier ja darum geht alle Optionsbutton auf Null rückzusetzen, ist das doch ein funktionsfähiger Weg, zumindest in einem DIALOG. Und damit wir uns nicht missverstehen, ist doch ein Dialog das was man in der IDE erstellen kann. Oder nicht?
Das es in einem Formular so nicht geht, wusste ich halt nicht. Werd es mir aber merken.

Und so einen Dialog habe ich ja mittlerweile jetzt auch erstellt. Und ich hatte auch gesucht und überlegt wie ich dort meine Optionsbutton alle auf einmal rücksetzen kann. Das Ergebnis habe ich ja hier in meinem ersten Beitrag kund getan. Das funktioniert ohne Probleme.

Als aller erstes hatte ich darauf geachtet, dass alle Optionsbutton eine *Durchgehende* Bezeichnung, besser gesagt Name, haben in der Art von OptionButton1 bis hin zu OptionButton19.

Öhm sorry, aber kannst Du mir das noch mal etwas deutlicher erklären?

es geht hier um ein "Writer"Formular welches insgesamt 4 Optionsgruppen enthält. Die erste (optgrp1) hat 4 Auswahlmöglichkeiten (A,B,C,D), die 3 anderen (optgrp2 ... 4) haben jeweils 2 (z.B. ja/nein).
U.a. möchte ich erreichen, daß sich immer dann wenn das Formular neu aufgerufen wird (Button in der Symbolleiste) die letzten Eingaben "leeren", das Formular in einen "jungfräulichen" Zustand gebracht wird. Es sind also keinen Optionen mehr gesetzt. Das hat den Hintergrund, daß diese Optionen zu "Pflichtfelder"! werden sollen, die immer neu gesetzt werden müssen und darüber hinaus weitere Möglichkeiten im Formular davon abhängen. So muß z.B. im unteren Teil eine "Tabelle" ausgefüllt werden, wenn in der optgrp4 ein "ja" gewählt wurde.
"Hier liegt auch der der Hund" begraben zu dem vorherigen Thread, wo ich versuche den jeweiligen Status der Gruppen heraus zu finden.
Falls es ebenfalls wichtig sein sollte: Den Options habe ich innerhalb ihrer Gruppe die Werte 1-4 bzw. 1+2 zugewiesen (z.B. ist in optgrp3 und 4 das ja immer eine 1 und das Nein immer eine 2). Ich hab mir davon versprochen - später z.B. bei einer DB-gestützten Auswertung des Formulars, die Werte leichter zuordnen zu können.

	With ThisComponent.DrawPage.Forms.GetByName("Standard")
		For n = 0 to .Count - 1
			On Error Resume Next
			'wenn alle Optionsbuttons-Namen mit "Option" beginnen
			'If LEFT(.GetByIndex(n).RefValue, 6)  = "Option" Then
			'oder:
			'Typ des steuerelements prüfen
			If Right(.GetByIndex(n).ServiceName, 11) = "RadioButton" Then
				.GetByIndex(n).State = 0
			End If
		Next n
	End With

Und was soll das bei einem DIALOG bewirken?

Optionsbuttons in einem Dialog gehören nur dann zu einer Gruppe wenn sie bezüglich des Tab-Index der Dialogsteuerelemente aufeinanderfolgrende Index-Nummern haben.

opiWahn hat geschrieben:Hallo balu,

dank dir für den Tipp.
Habs mal so übernommen und angepasst, aber bei

Code: Alles auswählen

optbu = oDialog1.getControl("optgrp" & oDel)

steigt er aus und sagt mir, daß die Objektvariable nicht belegt ist?

Die Idee, das zurücksetzen des Status der 4 Gruppen (optgrp1-4) so zu lösen

Code: Alles auswählen

Sub ClearForms
	oForm = thisComponent.drawpage.forms.getbyindex(0)
   	For i = 1 to 4
   	optBuDel = oForm.getGroupByName("optgrp" & i)
   	optBuDel.state = 0
   	next i
end Sub

wird mir mit "argument len differ!" aus "... .IllegalArgumentException" quittiert

Okay, ich arbeite wohl mit einem Dialog, aber es müsste wohl auch bei dir funktionieren

Als aller erstes hatte ich darauf geachtet, dass alle Optionsbutton eine *Durchgehende* Bezeichnung, besser gesagt Name, haben in der Art von OptionButton1 bis hin zu OptionButton19.