julien cochennec a écrit :
Béryl a écrit :
Bonjour à tous.
Je voudrais savoir si l'on peut créer une interface graphique sous
Base (un ou plusieurs formulaires) et ne passer que par elle pour
gérer une base de donnée. Je veux dire sans afficher celle de Base
(qui tourne en arrière plan, mais qu'on ne voit pas).
Je l'ai vu sous Access mais je n'arrive pas à le reproduire sous OOo.
Merci.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Question que je me suis posé aussi, la solution que j'ai retenu, c'est
de faire un formulaire sous calc (ou writer) avec une macro au
démarrage qui l'affiche en plein écran, ce qui fait qu'on ne voit plus
que les onglets et le formulaire, option assez élégante mais très
"bricolée", qui permet d'avoir un bouton qui sort du mode plein écran
pour pouvoir à tout moment retomber sur openoffice.
Le problème, c'est qu'alors il faut faire un formulaire qui ne soit
pas dans la base, mais je préfère car comme ça, la base est
indépendante du formulaire et les deux sont modifiables indépendamment
également.
Si vous voulez, je vous envoie la macro en plein écran, pas de pb.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Il suffit donc de faire un formulaire sous calc ou writer, d'enregistrer
la macro ci-dessous, puis d'aller dans
outils/personnaliser/évènements->"démarrage de l'application" et
d'affecter la macro.
A l'ouverture suivante, en acceptant les macros, le formulaire s'ouvre
en plein écran avec un bouton pou revenir en mode normal. Cette macro a
été faite avec l'enregistreur et fonctionne sous calc.
sub Affichage
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "FullScreen"
args2(0).Value = True
dispatcher.executeDispatch(document, ".uno:FullScreen", "", 0, args2())
rem ----------------------------------------------------------------------
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "ViewRowColumnHeaders"
args3(0).Value = false
dispatcher.executeDispatch(document, ".uno:ViewRowColumnHeaders", "", 0,
args3())
end sub
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]