[de-users] Base: gleichen Datensatz beim Formularwechsel anzeigen

Liebe User,

um von einem Formular zum anderen zu wechseln, gibt es ja wunderbare 
Makro-Rezepte:

SUB Zu_Formular_von_Formular(oEvent AS OBJECT)
    DIM stTag AS STRING
    stTag = oEvent.Source.Model.Tag 'Tag wird unter den 
Zusatzinformationen eingegeben
    aForms() = Split(stTag, ",")    'Hier steht zuerst der Formularname 
für das neue Formular, dann der für das alte Formular
    ThisDatabaseDocument.FormDocuments.getByName( Trim(aForms(0)) ).open
    ThisDatabaseDocument.FormDocuments.getByName( Trim(aForms(1)) ).close
    END SUB

Bei einem Formularwechsel - also von FORMULAR_1 zu FORMULAR_2 - wird die 
(im FORMULAR_2) aufgerufene Datei  immer mit dem "ersten" Datensatz geladen.

Gibt es eine Möglichkeit, dass die ID des aktuellen Datensatzes des 
FORMULAR_1 in das neue FORMULAR_2 mit übergeben wird, damit sofort der 
relevante Datensatz geladen und angezeigt werden kann?

Bei mir ist es so, dass ich einen Stammdatensatz habe, zu dem jeweils 
unterschiedliche Unterformulare aufgerufen werden. M. a. W.: Der 
Grunddatenstock ist in jedem Formular gleich, nur es gibt 
formularabhängig unterschiedliche untergeordnete Daten.

Innerhalb eines Formulars lässt sich auf sehr einfache Weise der 
markierte Datensatz erneut aufrufen. Makro-Beispiel:

SUB Reload
    DIM oDoc AS OBJECT
    DIM oDrawpage AS OBJECT
    DIM iRow AS LONG
    DIM oForm AS OBJECT
    oForm=thisComponent.drawpage.forms.getByName("Name")
    oForm.updateRow()
    iRow = oForm.getRow()
       oForm.reload()
       oForm.absolute(iRow)
END Sub

Danke für Hinweise
Gerhard


--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert