Bonjour,
En ce qui concerne la propriété IsMaximized tu peux effectivement
supprimer la ligne mais comme dans LO les formulaires sont des objets
writer, pour retrouver une fenêtre normale il faut revenir en mode
édition et la sauvegarder telle que tu le souhaite.
Pour utiliser une macro dans la totalité des applications LO, elle doit
être sauvegardée dans la bibliothéque "Mes Macros".
En cas de changement de version ou bien de déplacement vers une autre
machine il faut récupérer le dossier basic du dossier roaming>user>4 et
l'installer au nouvel emplacement.
Tu trouvera une foule de renseignements sur le site :
wiki.documentfoundation.org/Documentation/Publications/fr
et pour LO basic la bible : "Programmation OpenOffice et LibreOffice de
Bernard Marcelly et Laurent Godart"
Cordialement
Michel B.
Le 10/08/2014 17:45, Bernard Ribot a écrit :
Le 10/08/2014 10:03, Michel Blanchard a écrit :
Bonjour,
Il est possible d'utiliser une macro unique qui permet d'ouvrir
n'importe quel formulaire.
Il faut indiquer dans les propriétés générales du *bouton* ouvrant le
formulaire, le nom du formulaire dans la propriété *"complément
d'information"*.
La macro ci-dessous est ensuite affectée à la propriété *"exécuter
action"* de l'onglet évènements du bouton.
Le nom du formulaire est récupéré par la ligne de code "nomFormulaire
= bouton.Model.tag"
*Sub OuvrirFormulaire(evt As Object)
rem ---------------ouvrir un
formulaire----------------------------------------------------------------
Dim bouton As Object, nomFormulaire As String
bouton = evt.Source
nomFormulaire = bouton.Model.tag
LibOForm
=ThisDatabaseDocument.FormDocuments.getByName(nomFormulaire).open
LibOForm.currentController.frame.ContainerWindow.IsMaximized = true
End Sub*
Cordialement
Michel B.
Le 10/08/2014 09:31, Bernard Ribot a écrit :
Le 10/08/2014 08:21, demande_aide_fr@libreoffice.org a écrit :
Bonjour
Voici une nouvelle question envoyée à l'aide du formulaire de
demande d'aide
(http://fr.libreoffice.org/get-help/poser-une-question/).
Si vous répondez, merci de penser à utiliser la fonction "répondre
à tous" de votre logiciel de courrier électronique de façon que le
demandeur reçoive une copie de votre réponse.
Email: - gerard.daubois@laposte.net
Sujet: - base de données
Question: - Comment ouvrir et fermer un formulaire dans la base de
données Liboffic.
Je débute en ooobasic par contre, j'ai beaucoup programmé en vba.
Cordialement et merci pour votre réponse
Bonjour,
Pour ouvrir un formulaire à partir d'un autre formulaire, tu
associes cette macro à un bouton du formulaire "lanceur" :
Sub OuvrirForm
'Etablit la connexion
ThisDatabaseDocument.CurrentController.connect("","")
'Ouvre le formulaire nommé Table1
ThisDatabaseDocument.FormDocuments.getByName( "Table1" ).open
End Sub
Et pour fermer le formulaire "lancé" et retourner au formulaire
"lanceur" tu associes cette macri à un bouton :
Sub QuitterForm
oFrame = thisComponent.CurrentController.getFrame()
oFrame.close( True )
End Sub
Bernard
Re-bonjour Michel,
J'ai essayé ta macro qui fonctionne mais j'aimerais que le formulaire
ne s'ouvre pas pas maximisé. J'ai essayé (au pif, je ne connais rien
en LO Basic) : ...IsMaximized = false, ... IsMinimized = trur et même
d'enlever carrément la ligne, rien n'y fait.
Autre chose : ce serait possible une macro indépendante de la base de
données ? En lui fournissant "base.formulaire" dans "compléments
d'information". Ce serait pour mettre la macro dans les macros
communes (Mes macros) comme je peux le faire avec la macro QuitterForm.
Bernard
--
Envoyez un mail à users+unsubscribe@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
Context
Privacy Policy |
Impressum (Legal Info) |
Copyright information: Unless otherwise specified, all text and images
on this website are licensed under the
Creative Commons Attribution-Share Alike 3.0 License.
This does not include the source code of LibreOffice, which is
licensed under the Mozilla Public License (
MPLv2).
"LibreOffice" and "The Document Foundation" are
registered trademarks of their corresponding registered owners or are
in actual use as trademarks in one or more countries. Their respective
logos and icons are also subject to international copyright laws. Use
thereof is explained in our
trademark policy.