Bonjour Michel,
Le 11/08/2014 09:49, Michel Blanchard a écrit :
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.
C'est fait déjà comme cela et avec la macro que j'utilise actuellement 
je n'ai pas de problème, les dimensions sont conservées lors de 
l'ouverture. Mais avec la tienne, la fenêtre est systématiquement 
maximisée, même si je supprime la ligne en question. C'est dommage, 
j'aurai bien aimé pouvoir l'utiliser.
Pour utiliser une macro dans la totalité des applications LO, elle 
doit être sauvegardée dans la bibliothéque "Mes Macros".
Oui, je sais. Comme je te disais, j'y ai déjà enregistré la macro de 
fermeture qui est indépendante du document dans lequel elle est utilisée.
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.
Je sauvegarde ce dossier régulièrement.
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"
Si un jour j'ai plein de courage :-)
Bonne journée,
Bernard
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
--
Bernard Ribot
LibreOffice 4.1.5.3 - 4.2.5.2 - 4.3.1.1 / Windows 7/x86
LibreOffice 3.6.7 / Windows XP
--
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.