[fr-users] Re: Initiation laborieuse à Base - Le retour

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 à users+help@fr.libreoffice.org 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