Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Determining the active form.....
Message
De
15/07/1998 13:49:22
Larry Santos
Local Data System
Philippines
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00117679
Message ID:
00117709
Vues:
17
Hi,

They create again the form

Thanks

>Larry,
>
>For my single instance forms, the menu item has a Skip Form clause of FormRunning( "frmTheFormName" )
>
>the FormRunning udf just loops through the _screen.Forms collection and returns .t. if it finds it.
>
>
* FormRunning.PRG 08-Mar-98
>
>* determine if a particular form is running.
>
>* It checks the Name property
>
>lparameter pcFormName
>
>local i, llRetVal
>
>llRetVal = .f.
>pcFormName = upper( pcFormName )
>
>for i = 1 to _screen.FormCount
>   if ( upper( _screen.Forms[i].Name ) == pcFormName )
>      llRetVal = .t.
>      exit
>   endif
>endfor
>
>return llRetVal
>
>>Hi,
>>
>> This is my last question for this topic.
>>
>> Could you please tell me the exact code for:
>>
>>
>> 1. I check for a form if they already active.
>> 2. if the form is not active I use do form "myform"
>> 3. if its already active I want to activate it instead of do form "myform"
>>
>>Thanks
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform