ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Forum AtoutFox : Re: [FIC] Adaptation messagebox

Sujet
... 12 13 14 15 16 17 18 19 20 21 ...
Accès à un classeur EXCELL 2007 alahem1 - 27/07/2012 19h48
UniversalThread est a vendre Mike Gagnon - 25/07/2012 12h24
aide sur la fonction ASCAN joe.mojito - 24/07/2012 11h20
msoutl32.ocx Jean à Grenoble - 24/07/2012 07h38
double-clic sur le titre d'une fenêtre Jean à Grenoble - 22/07/2012 23h34
Enregistrer l'image d'un formulaire dans un fichier PNG Nakutakoin - 22/07/2012 19h44
[PostGreSql] Accès à une base de données alahem1 - 20/07/2012 15h52
SQL - Dédoublonner un curseur selon des critères hiérarchisés FoxInCloud - 18/07/2012 11h16
GROUP BY ... HAVING FoxInCloud - 17/07/2012 11h20
Annonce vue sur LinkedIn Thierry N - 12/07/2012 18h56
Erreur: le fichier .scx n'est pas une table houcineph - 12/07/2012 14h16
Serveur 2008 ! Jean à Grenoble - 09/07/2012 15h27
Liste des régime de sécurité sociale Luc - 06/07/2012 13h40
Analyse Projet PHILIPPE - 04/07/2012 14h05
XFRX et progressbar OlivierL - 04/07/2012 11h28
[FIC] Adaptation messagebox alahem1 - 27/06/2012 23h40
[HS] Le dessin et l'ordinateur eric leissler - 27/06/2012 17h00
Je serai absent de la réunion avec Mike ! Jean à Grenoble - 26/06/2012 15h53
(HS) Anniversaire de Alan Turing en LEGO ! Francis Faure - 22/06/2012 22h40
LECTURE D'UN FICHIER WINDEV VERSION 4 EXTENSION .FIC O.Abderrazak - 21/06/2012 16h00
... 12 13 14 15 16 17 18 19 20 21 ...

Flux RSS des derniers messages

Vous devez vous identifier pour pouvoir poser une question ou répondre.

jeu. 28 juin 2012, 08h12

GLS
France
atoutfox.public.association

Re: [FIC] Adaptation messagebox

Bonjour Alain,

mchoix = MESSAGEBOX("Avez vous créer un compte pour consulter votre bourse ?",4+32+0,_screen.titreforme)

IF mchoix = 6

  MESSAGEBOX("Il y a un compte....",0+16+0,_screen.titreforme)

ELSE

  MESSAGEBOX("Il n'y a pas un compte...",0+16+0,_screen.titreforme)

ENDIF

F.i.c demande de transposer la MESSAGEBOX dans wMessageBox(). Il s'agit d'un formulaire avec sa représentation HTML / JAVASCRIPT qui sera poussé dans la réponse à la requête précédente du navigateur WEB ayant déclencher le traitement VFP.

Une fois poussée dans le navigateur, si wMESSAGEBOX() doit retourner une valeur, alors c'est à la demande du navigateur par la requête déclenchée grâce au clic sur un des boutons de la fenêtre wMessageBox() que sera effectué ce traitement.

Hors entre temps, ce n'est plus le formulaire initial appelant qui reçoit les requêtes mais le nouveau formulaire wMessageBox(). Il faut que ce formulaire puisse rappeler le formulaire initial et déclencher dans ce forumlaire ou dans un des objets enfants du formulaire une de leurs méthodes/événements.

Voila pourquoi dans wMessageBox(), le premier paramètre passé est le nom de la méthode à rappeler du formulaire initial. Cette méthode rappelée devra avoir un paramètre à récupérer (LPARAMETERS tuUserChoice) qui récupère la valeur du retour standardisé VFP de MESSAGEBOX().

Le traitement et l'appel aux autres messages box d'affichage simple, s'effectue dans cette méthode appelée.

* Appel de wMessageBox depuis la méthode / l'objet déclenchant cette question

= thisForm.wMessageBox('thisform.wFormCallBack' ","Avez vous créer un compte pour consulter votre bourse ?",4+32+0,_screen.titreforme)



* dans la méthode THISFORM.wFormCallBack() du formulaire initial

LPARAMETERS tuUserChoice



IF VARTYPE(tuUserChoice)="N"



   IF tuUserChoice=6

thisForm.wMessageBox('' ", "Il y a un compte....",0+16+0,_screen.titreforme)

   ELSE

   ENDIF

ENDIF

IF mchoix = 6



ELSE

  thisForm.wMessageBox('' ", "Il n'y a pas un compte....",0+16+0,_screen.titreforme)

ENDIF

C'est

Permalink : http://www.atoutfox.org/nntp.asp?ID=0000009339

11 967 messages dans le forum • Liste complète des messages