Information générale
Catégorie:
Gestionnaire d'écran & Écrans
Try this code as all open forms are kept as an array of objects in activeforms collection.
************
llFound=.f.
For Each loForm IN _SCREEN.ACTIVEFORMS
IF UPPER(ALL(loForm.Caption))='MYFORM'
llFound=.T.
EXIT
ENDIF
ENDFOR
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement