[Résolu] Fermeture formulaire

Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.

Modérateur : Vilains modOOs

Règles du forum
:alerte: Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !
Ayana
Membre OOrganisé
Membre OOrganisé
Messages : 71
Inscription : 27 avr. 2006 08:25

[Résolu] Fermeture formulaire

Message par Ayana »

Bon OK, j'arrête pas de poser des questions, et pas très fûte-fûte, mais c'est que j'ai un peu de mal à faire la transition Access/OOo :oops:


Voilà, j'ai beau avoir cherché et testé tout un tas de codes, je n'arrive à rien.
Je cherche un truc tout simple, c'est-à-dire fermer un formulaire grâce à un bouton.
Je n'ai vu qu'une possibilité, c'était de créer une macro.
Le problème, c'est que j'ai beau regarder, je ne vois pas l'erreur.

J'ai créé ma macro, et dans l'éditeur Basic, quand je la compile et exécute, ça me ferme bien la fenêtre.
Mais dès que j'ouvre mon formulaire et que je clique sur le bouton que j'ai créé et auquel j'ai associé la macro (dans "Après avoir lâché la touche"), ça ne marche pas.


Voilà ma macro :

Code : Tout sélectionner

Option Explicit

Sub FermetureDoc
Dim Ferme as Object

Ferme=ThisComponent.Dispose

End Sub
Dernière modification par Ayana le 17 mai 2006 14:16, modifié 1 fois.
--= Ayana =--

OOo 2.0.1
XP Pro 2002 SP2
antoskin
Membre OOrganisé
Membre OOrganisé
Messages : 93
Inscription : 18 avr. 2006 10:13

Message par antoskin »

Tu peux être plus précise stp? En gros ta macro fonctionne quand tu la lances depuis l'éditeur de macro mais quand tu la lances depuis le bouton sur ton formulaire ça ne marche pas?
Dernière modification par antoskin le 17 mai 2006 13:53, modifié 1 fois.
Windows XP SP 2, OOo 2.0.2
Ayana
Membre OOrganisé
Membre OOrganisé
Messages : 71
Inscription : 27 avr. 2006 08:25

Message par Ayana »

C'est exactement ça :D



J'avais mis la macro dans "materiel>Standard>Module1>FermetureDoc".
materiel est le nom de mon formulaire.
Si je la mets dans "MesMacros", ça ne marche pas du tout !! Il me met "Impossible d'accéder à l'objet". :roll:
--= Ayana =--

OOo 2.0.1
XP Pro 2002 SP2
antoskin
Membre OOrganisé
Membre OOrganisé
Messages : 93
Inscription : 18 avr. 2006 10:13

Message par antoskin »

Je ne pourrai pas te dire ce qui ne va pas dans ton code, par contre voilà une macro de fermeture de formulaire qui fonctionne :

Code : Tout sélectionner

Sub FermetureDoc
	Dim oFrame as object

    oFrame = thisComponent.CurrentController.getFrame()
    oFrame.close(True) 
End Sub
Windows XP SP 2, OOo 2.0.2
Ayana
Membre OOrganisé
Membre OOrganisé
Messages : 71
Inscription : 27 avr. 2006 08:25

Message par Ayana »

J'essaie et je te dis si ça marche.
Si ça marche pas, ça vient pas du code ..... :roll:
--= Ayana =--

OOo 2.0.1
XP Pro 2002 SP2
Ayana
Membre OOrganisé
Membre OOrganisé
Messages : 71
Inscription : 27 avr. 2006 08:25

Message par Ayana »

Et bien ça ne vient pas du code ..... :?
--= Ayana =--

OOo 2.0.1
XP Pro 2002 SP2
antoskin
Membre OOrganisé
Membre OOrganisé
Messages : 93
Inscription : 18 avr. 2006 10:13

Message par antoskin »

Associe la macro à l'évènement : "Lors du déclenchement" de ton bouton. Ca doit venir de là.
Windows XP SP 2, OOo 2.0.2
Ayana
Membre OOrganisé
Membre OOrganisé
Messages : 71
Inscription : 27 avr. 2006 08:25

Message par Ayana »

Le code marche bien en fait, même tout à l'heure quand j'ai dit que ça marchait plus et que ça me mettait unh message d'erreur.

En fait, quand j'ouvre mon formulaire et que je vais après voir les macros, le formulaire est toujours ouvert.
Là je teste la macro, et hop, il ferme le formulaire.
Et si j'essaie une 2e fois la macro, là ça ne marche pas, étant donné que le formulaire est déjà fermé.
Voilà l'explication de mon mesage d'erreur.

Mais je ne sais pas comment il fait pour fermer le formulaire alors que ce n'est pas lui qui est actif.
--= Ayana =--

OOo 2.0.1
XP Pro 2002 SP2
Ayana
Membre OOrganisé
Membre OOrganisé
Messages : 71
Inscription : 27 avr. 2006 08:25

Message par Ayana »

Merci antoskin, ça marche, t'es un vrai génie !!!!


:D :D :D :D :D


Merciiiiiiiiiiiiiiiii :D :D :D :D
--= Ayana =--

OOo 2.0.1
XP Pro 2002 SP2