Macro Apertura Formulari

[Cinghiale78]

viewtopic.php?f=13&t=2370

In questo post il fendente propone un codice interessante e funzionante per aprire formulari cliccando un pulsante:

Codice: Seleziona tutto

    Sub OpenForm( oEvent as variant, aFormName as string) as variant
    Dim args(1) As New com.sun.star.beans.PropertyValue
    Dim container as variant

    container = oEvent.Source.Model.Parent.ActiveConnection.Parent.DatabaseDocument.FormDocuments

    args(0).Name = "ActiveConnection"
    args(0).Value = oEvent.Source.Model.Parent.ActiveConnection
    args(1).Name = "OpenMode"
    args(1).Value = "open"
    container.loadComponentFromURL(aFormName,"_blank",0,args())

    End Sub

    Sub onClickOpenInserisci ( oEvent as variant )
    OpenForm(oEvent, "Inserisci nuovo utente")
    End sub

La macro apre il formulario in un'altra finestra, preferirei aprirlo nella stessa finestra.
E' possibile?

[charlie]

Ciao, la macro apre il formulario "chiamato" in un'altra finestra perché è in un'altra finestra.
Se hai l'esigenza di avere due formulari nella stessa finestra (se il display li contiene), puoi inserirli entrambi a livello MainForm.
Sarebbero però visualizzati contemporaneamente.

[Cinghiale78]

In realtà sono delle pagine di menu e sottomenu quindi non ha molto senso, per questo avrei preferito che l'istanza rimanesse sulla finestra attiva anziché crearne una nuova; anche così va bene, perché non devo prevedere pulsanti per tornare al menu precedente: è sufficiente chiudere la finestra.