Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Do form in a Do While
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00679520
Message ID:
00679522
Vues:
21
This message has been marked as the solution to the initial question of the thread.
Pedro,

If I understand you correctly you need to make the form Modal.

>Hi
>
>I have a Do Form in a DO While .
>
>VFP , make DO Form , but he still make a Do While .
>I see the new Form , but i see too the next messageBox , See Code please .
>How can i force VFP stop when Do Form , and only go on in Do While , when I make the release the new form ?
>
>Can you help me ?
>
>Thanks
>
>
>DO WHILE .T.
>  nCima = nCima - 1
>  IF FactDoc.NumDoc # nCima
>
>    Select FCabElim
>    SET ORDER TO NumDoc
>    GO TOP
>    Seek nCima
>    IF Found()
>	
>	ThisForm.Visible = .F.
>
>	cMessageTitle = 'Atenção'
>	cMessageText = 'A Factura nº  ' + AllTrim(Str(FCabElim.NumDoc)) ;					"Deseja ver os detalhes ? "
>					
>	nDialogType = 4 + 32 + 256
>
>	nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)
>		
>		
>	IF nAnswer = 6
>		
>        	DO FORM FEliDFact WITH FCabElim.NumDoc
>                 *** I want VfP , stops cycle do while , and only
>                 *** go on , when Form FEliDFact release
>
>		
>	ENDIF
>			
>    ELSE  && nCima = FactDoc.NumDoc , por isso sai
>		
>	EXIT
>		
>    ENDIF
>		
> ENDIF
>ENDDO	
>
Caroline
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform