Tester si la fenêtre d'un formulaire est maximizée
2 réponses
archives
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire principal.
Quand je redimensionne le formulaire principal, la méthode Resize des sous
formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal est
maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les lancer
manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonsoir.
il faut utiliser l'api IsZoomed
dans un module standard mettre: Option Compare Database Option Explicit Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
Dans ton formulaire, mettre: If IsZoomed(Me.hwnd) <> 0 Then Debug.Print "Je suis maxi." End If
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"archives" a écrit dans le message de news: 416c2254$0$27893$
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire principal. Quand je redimensionne le formulaire principal, la méthode Resize des sous formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal est maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les lancer manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?
Merci de votre aide
Bonsoir.
il faut utiliser l'api IsZoomed
dans un module standard mettre:
Option Compare Database
Option Explicit
Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
Dans ton formulaire, mettre:
If IsZoomed(Me.hwnd) <> 0 Then
Debug.Print "Je suis maxi."
End If
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"archives" <musicales@mp3th.net> a écrit dans le message de news:
416c2254$0$27893$8fcfb975@news.wanadoo.fr...
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire
principal.
Quand je redimensionne le formulaire principal, la méthode Resize des sous
formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal est
maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les
lancer
manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?
dans un module standard mettre: Option Compare Database Option Explicit Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
Dans ton formulaire, mettre: If IsZoomed(Me.hwnd) <> 0 Then Debug.Print "Je suis maxi." End If
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"archives" a écrit dans le message de news: 416c2254$0$27893$
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire principal. Quand je redimensionne le formulaire principal, la méthode Resize des sous formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal est maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les lancer manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?
Merci de votre aide
archives
Merci Raymond, il y a des fonctions pas faciles à devinerdans la documentation standard.
"Raymond [mvp]" a écrit dans le message de news:
Bonsoir.
il faut utiliser l'api IsZoomed
dans un module standard mettre: Option Compare Database Option Explicit Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
Dans ton formulaire, mettre: If IsZoomed(Me.hwnd) <> 0 Then Debug.Print "Je suis maxi." End If
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"archives" a écrit dans le message de news: 416c2254$0$27893$
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire principal. Quand je redimensionne le formulaire principal, la méthode Resize des sous
formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal est
maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les lancer manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?
Merci de votre aide
Merci Raymond, il y a des fonctions pas faciles à devinerdans la
documentation standard.
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news: ewifg2IsEHA.2636@TK2MSFTNGP09.phx.gbl...
Bonsoir.
il faut utiliser l'api IsZoomed
dans un module standard mettre:
Option Compare Database
Option Explicit
Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
Dans ton formulaire, mettre:
If IsZoomed(Me.hwnd) <> 0 Then
Debug.Print "Je suis maxi."
End If
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"archives" <musicales@mp3th.net> a écrit dans le message de news:
416c2254$0$27893$8fcfb975@news.wanadoo.fr...
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire
principal.
Quand je redimensionne le formulaire principal, la méthode Resize des
sous
formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal
est
maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les
lancer
manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?
Merci Raymond, il y a des fonctions pas faciles à devinerdans la documentation standard.
"Raymond [mvp]" a écrit dans le message de news:
Bonsoir.
il faut utiliser l'api IsZoomed
dans un module standard mettre: Option Compare Database Option Explicit Declare Function IsZoomed Lib "user32.dll" (ByVal hwnd As Long) As Long
Dans ton formulaire, mettre: If IsZoomed(Me.hwnd) <> 0 Then Debug.Print "Je suis maxi." End If
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"archives" a écrit dans le message de news: 416c2254$0$27893$
Bonsoir,
J'utilise des formulaires comme sous formulaires d'un formulaire principal. Quand je redimensionne le formulaire principal, la méthode Resize des sous
formulaires s'exécute.
Sauf que j'ai remarqué que lorsque la fenêtre du formulaire principal est
maximizée, ces méthodes Resize ne s'exécutent plus. Il me reste à les lancer manuellement, mais...
Comment tester si la fenêtre d'un formulaire est maximizée ?