Bonjour
ac2s-software wrote
>
> J'utilise la méthode suivante...
Quelques remarques en complément...
Le test prévu par ac2s-software dans sa procédure est utile, qui vérifie
l'existence du formulaire avant de tenter de l'ouvrir.
Sinon, la procédure la plus courte serait quelque chose comme :
Sub PysOpen
ThisDatabaseDocument.CurrentController.connect("","")
PysForm = ThisDatabaseDocument.FormDocuments.getByName("F_Client").open
End Sub
Je voulais surtout insister sur le fait que la méthode .open permet de
renvoyer l'objet formulaire (dans la variable PysForm pour cet exemple).
Cette technique permet de manipuler (masquer, afficher, etc.) ensuite le
formulaire par programme via la variable qui le "représente", durant la
durée de vie de cette dernière (la variable peut être globale).
Appliquée à la méthode loadComponent cela donnerait par exemple :
sub PysOpen1
dim PysConn as object
dim PysProp(0) As New com.sun.star.beans.PropertyValue
PysConn = ThisDatabaseDocument.DataSource.getConnection("","")
PysProp(0).Name = "ActiveConnection"
PysProp(0).Value = PysConn
PysForm =
ThisDatabaseDocument.FormDocuments.loadComponentFromURL("F_Client",
"_blank", 0, PysProp())
end sub
Cordialement
Pierre-Yves
--
View this message in context:
http://nabble.documentfoundation.org/Initiation-laborieuse-a-Base-Le-retour-tp3628405p3634758.html
Sent from the Users mailing list archive at Nabble.com.
--
Envoyez un mail à [email protected] pour savoir comment vous
désinscrire
Les archives de la liste sont disponibles à
http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne
pourront pas être supprimés
