Page 1 sur 1

[Résolu][Base] Ouverture et fermeture de formulaire

MessagePublié: 12 Août 2011 18:53
par jeanmi2403
Bonsoir,
J'ai récupéré l'exemple de Dude (ouvreform31.odb) donné dans la section Techniques pour débuter avec le module Base, et il y a un problème avec la macro OpenForm.
La procédure lancée par le clic sur les boutons produit l'erreur suivante :
OouvreForm31-err.JPG
OouvreForm31-err.JPG (22.07 Kio) Consulté 1351 fois

Il suffit de remplacer
Code : Tout sélectionner   AgrandirRéduire
aProp(1).Value = strMode
par
Code : Tout sélectionner   AgrandirRéduire
aProp(1).Value = openMode


De plus, autre souci, que j'ai la flemme d'essayer de résoudre, le bouton "Quitter" de chaque formulaire, fait appel à une macro ExitForm qui n'existe pas...
 Ajout : Finalement, j'ai pris le temps de le faire 

Rajouté Module1 dans la librairie standard du document, et créé la procédure :
Code : Tout sélectionner   AgrandirRéduire
Sub ExitForm
thiscomponent.currentcontroller.frame.close(true)
End Sub

Mais bien que les noms soient les mêmes, il a quand même fallu réaffecter cette procédure à tous les boutons "Quitter".
OuvreForm34.odb
La base corrigée
(62.48 Kio) Téléchargé 101 fois

 Ajout : En lisant plus loin, je vois que la macro OpenForm peut être avantageusement remplacée par ThisDatabaseDocument.FormDocuments.getByName( "NomFormulaire" ).open 

OuvreForm34-simple.odb
La base et les macros simplifiées
(62.34 Kio) Téléchargé 184 fois

Il faut vraiment lire beaucoup pour arriver à ce résultat :mrgreen:
Cordialement

Re: [Résolu][Base] Ouverture et fermeture de formulaire

MessagePublié: 14 Sep 2011 08:46
par jjcordelette
Bonjour,
Après bien des recherches et une mise en place fastidieuse de ma question, la réponse est là. Sans vous j'étais prés à tout balancer.
Donc un très grand MERCI
Bonne journée

PS me reste à essayer de baliser correctement ma question :wink: