Date: prev next · Thread: first prev next last
2012 Archives by date, by thread · List index


Le 02/11/2012 11:35, Blanchard Michel a écrit :
Le 02/11/2012 09:40, pierre-yves.samyn a écrit :
Bonjour

Tout d'abord un conseil d'usage des listes. Dans ton courrielleur ou webmail il faut utiliser l'option "Répondre à la liste" ou "Répondre à tous" sinon le message
ne va qu'au destinataire et non à la liste.

Message du 01/11/12 18:15
De : "Blanchard Michel"
L'ouverture du form se réalise bien avec ContainerWindow.IsMaximized = true mais mon souci c'est la méthode fullscreen. mon objectif étant d'essayer de
m'approcher d'une appli access avec disparition complète des menus
Au temps pour moi, je n'avais pas compris cela...

Donc ci-dessous deux possibilités :

1. "DemarrageTailleForm" ouvre le formulaire, et suppime les menus

2. "DemarragePleinEcran", euh... comme son nom l'indique :)

Ci-dessous les procédures

Sub DemarrageTailleForm

ThisDatabaseDocument.CurrentController.connect("","")
LibOForm =ThisDatabaseDocument.FormDocuments.getByName("F_menu_principal").open
LibOForm.CurrentController.Frame.LayoutManager.HideCurrentUI = true

End Sub


Sub DemarragePleinEcran

dim document   as object
dim dispatcher as object

dim args1(0) as new com.sun.star.beans.PropertyValue

ThisDatabaseDocument.CurrentController.connect("","")
LibOForm =ThisDatabaseDocument.FormDocuments.getByName("F_menu_principal").open

document   = LibOForm.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

args1(0).Name = "FullScreen"
args1(0).Value = true

dispatcher.executeDispatch(document, ".uno:FullScreen", "", 0, args1())

End Sub


Cordialement
Pierre-Yves
Bonjour
OK pour le DemarragePleinEcran mais l'ouverture des formulaires secondaires (à partir du F_menu_principal) se réalise en arrière plan ?
Cordialement
Michel
Bonjour,
Ce qui me manquait c'était de faire un peu de ménage dans mon code !!
Merci de ta patience
je joins deux applis qui pourraient intéresser d'autres utilisateurs, voire pour les améliorer
Cordialement
Michel
http://www.inforbur.com/Facturation.zip
http://www.inforbur.com/comptabilite.zip
Cordialement
Michel


Une messagerie gratuite, garantie à vie et des services en plus, ça vous tente ?
Je crée ma boîte mail www.laposte.net




--
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

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.