OVH Cloud OVH Cloud

Isloaded ??

3 réponses
Avatar
le meruvien
bonjour, quelle est la syntax exact de "isloaded" ??
(je veut detecter à l'ouverture d'un état, si le formulaire "recap" est
ouvert, si oui, mettre sa propriété "visible" à non.
merci

3 réponses

Avatar
Gafish
Bonjour,

Sauf erreur de ma part (mais comme je suis sous 97 je suis sur de rien),
IsLoaded est une fonction qui n'est pas intégrée (mais elle est dispo sur le
net, et même dans la bdd comptoirs de mémoire) il faut donc l'intégrer dans
un module standard.
Ceci étant fait, tu l'appeles de la façon suivante :
IsLoaded("MonFormulaire")
en remplaçant ici MonFormulaire par le nom de ton form

Arnaud

"le meruvien" a écrit dans le message news:
420b929f$0$8201$
bonjour, quelle est la syntax exact de "isloaded" ??
(je veut detecter à l'ouverture d'un état, si le formulaire "recap" est
ouvert, si oui, mettre sa propriété "visible" à non.
merci




Avatar
Guy DETIENNE
Salut ;O)

Pour compléter la réponse de Gafish, voici la fonction :

Public Function IsLoaded(ByVal strFormName As String) As Boolean

If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <> 0 Then
If Forms(strFormName).CurrentView <> 0 Then
IsLoaded = True
End If
End If

End Function

Guy

"le meruvien" a écrit dans le message de
news:420b929f$0$8201$
bonjour, quelle est la syntax exact de "isloaded" ??
(je veut detecter à l'ouverture d'un état, si le formulaire "recap" est
ouvert, si oui, mettre sa propriété "visible" à non.
merci




Avatar
Raymond [mvp]
Bonsoir.

pour 2000/2002/2003:
If CurrentProject.AllForms("recap").IsLoaded Then
End If

pour 97
Function isloaded(FormName)
IsLoaded = (SysCmd(acSysCmdGetObjectState, acForm, FormName) <> 0)
End Function

If IsLoaded("recap") = true Then
' recap est chargé
else
' recap n'est pas chargé
end if


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Gafish" a écrit dans le message de news:

Bonjour,

Sauf erreur de ma part (mais comme je suis sous 97 je suis sur de rien),
IsLoaded est une fonction qui n'est pas intégrée (mais elle est dispo sur
le
net, et même dans la bdd comptoirs de mémoire) il faut donc l'intégrer
dans
un module standard.
Ceci étant fait, tu l'appeles de la façon suivante :
IsLoaded("MonFormulaire")
en remplaçant ici MonFormulaire par le nom de ton form

Arnaud

"le meruvien" a écrit dans le message news:
420b929f$0$8201$
bonjour, quelle est la syntax exact de "isloaded" ??
(je veut detecter à l'ouverture d'un état, si le formulaire "recap" est
ouvert, si oui, mettre sa propriété "visible" à non.
merci