Unterformular ausblenden/verstecken/unsichtbar
Verfasst: Fr, 08.01.2010 22:50
Hallo Gemeinde,
nach Nächten der Suche und erfolglosem Probieren suche ich hier nach Hilfe. Nutze OO 3.1.1 Portable.
Habe in Base eine Kundenverwaltung erstellt, Dateneingabe über ein Formular mit 4 Unterformularen. Jedes Unterformular enthält Daten aus einer zugeordneten Tabelle. Ich möchte per Schaltfläche ein oder zwei Unterformulare "austauschen", z.B. Unterformular_K1 durch Unterformular_K2 ersetzten. Bei dem Schritt das Unterformular_K1 auszublenden bekomme ich allerdings eine Fehlermeldung:
> Basic Laufzeitfehler.
> Es ist eine Exception aufgetreten.
> Type: com.sun.star.lang.IllegalArgumentException
> Message: cannot coerce argument type during corereflection call!
Laut diesem Beitrag soll es gehen: viewtopic.php?f=18&t=13127&p=52530&hili ... lar#p52530, vielleicht auch nur mit der Version 2.0.4??
Den Code habe ich bewusst so aus dem Beitrag übernommen.
Wenn ich allerdings anstelle von "Unterformular_K1" ein beliebiges Eingabefeld auswähle, wird es wie gewünscht ausgeblendet/versteckt. Im Buch von Herrn Krumbein und auch bei Dannenhoefer wird behauptet, dass sich Unterformulare wie Kontrollfelder ansprechen lassen...
Wer kann helfen?
VG kuki
nach Nächten der Suche und erfolglosem Probieren suche ich hier nach Hilfe. Nutze OO 3.1.1 Portable.
Habe in Base eine Kundenverwaltung erstellt, Dateneingabe über ein Formular mit 4 Unterformularen. Jedes Unterformular enthält Daten aus einer zugeordneten Tabelle. Ich möchte per Schaltfläche ein oder zwei Unterformulare "austauschen", z.B. Unterformular_K1 durch Unterformular_K2 ersetzten. Bei dem Schritt das Unterformular_K1 auszublenden bekomme ich allerdings eine Fehlermeldung:
> Basic Laufzeitfehler.
> Es ist eine Exception aufgetreten.
> Type: com.sun.star.lang.IllegalArgumentException
> Message: cannot coerce argument type during corereflection call!
Laut diesem Beitrag soll es gehen: viewtopic.php?f=18&t=13127&p=52530&hili ... lar#p52530, vielleicht auch nur mit der Version 2.0.4??
Den Code habe ich bewusst so aus dem Beitrag übernommen.
Code: Alles auswählen
Sub HideCtrlField
oDoc = ThisComponent
oView = oDoc.getCurrentController()
oForm = oDoc.DrawPage.Forms.GetByName("MainForm")
oSubForm = oForm.GetByName("Unterformular_K1")
msgbox "Unter-Formular = " & oSubForm.Name
vCtrl = oView.getControl(oSubForm) '<--- hier kommt die Fehlermeldung!
vCtrl.Visible = false
End Sub
Wer kann helfen?
VG kuki