Bonjour,
Comment conserver le ration hauteur/largeur lors du redimensionnement
fenêtre d'application ?
Merci de votre aide
Jean-Marie
Bonjour,
Comment conserver le ration hauteur/largeur lors du redimensionnement
fenêtre d'application ?
Merci de votre aide
Jean-Marie
Bonjour,
Comment conserver le ration hauteur/largeur lors du redimensionnement
fenêtre d'application ?
Merci de votre aide
Jean-Marie
Bonjour,
Comment conserver le ration hauteur/largeur lors du redimensionnement
fenêtre d'application ?
Merci de votre aide
Jean-Marie
Bonjour,
Comment conserver le ration hauteur/largeur lors du redimensionnement
fenêtre d'application ?
Merci de votre aide
Jean-Marie
Bonjour,
Comment conserver le ration hauteur/largeur lors du redimensionnement
fenêtre d'application ?
Merci de votre aide
Jean-Marie
Je te conseille de sousclasser le message WM_SIZING envoyé au
formulaire lorsque la fenêtre se redimensionne...
regarde l'exemple ci-dessous :
'***
' Form1
'Code
End Function
'***
Note qu'avec cette exemple tu ne peux pas faire de pas à pas durant le
subclassing, cela aura pour effet de faire planter VB.
Je te conseille de sousclasser le message WM_SIZING envoyé au
formulaire lorsque la fenêtre se redimensionne...
regarde l'exemple ci-dessous :
'***
' Form1
'Code
End Function
'***
Note qu'avec cette exemple tu ne peux pas faire de pas à pas durant le
subclassing, cela aura pour effet de faire planter VB.
Je te conseille de sousclasser le message WM_SIZING envoyé au
formulaire lorsque la fenêtre se redimensionne...
regarde l'exemple ci-dessous :
'***
' Form1
'Code
End Function
'***
Note qu'avec cette exemple tu ne peux pas faire de pas à pas durant le
subclassing, cela aura pour effet de faire planter VB.
Pourquoi pas simplement l'événement resize du form
Pourquoi pas simplement l'événement resize du form
Pourquoi pas simplement l'événement resize du form
Salut! :O)
> Pourquoi pas simplement l'événement resize du form
Je n'ai pas essayé craignant un effet de "scintellement" du formulaire..
L'effet serait peut-être le même.. :OP
Mon code ne fonctionne toutefois pas correctement car il ne préserve pas
ratio.... il faut donc apporter les modifications suivantes :
ajouter cette ligne dans le Form_Load :
'***
m_fRatioLargeurHauteur = Me.Width / Me.Height
'***
ajouter la déclaration suivante dans le module :
'***
Public m_fRatioLargeurHauteur As Single
'***
remplacer la ligne suivante du module :
'***
rc.Bottom = rc.Bottom + (rc.Right - rc.Left - (Form1.Width /
Screen.TwipsPerPixelX))
'***
par celle-ci :
'***
rc.Bottom = ((rc.Right - rc.Left) / m_fRatioLargeurHauteur) + rc.Top
'***
et remplacer la ligne suivante du module :
'***
rc.Right = rc.Right + (rc.Bottom - rc.Top - (Form1.Height /
Screen.TwipsPerPixelY))
'***
par celle-ci :
'***
rc.Right = ((rc.Bottom - rc.Top) * m_fRatioLargeurHauteur) + rc.Left
'***
--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
Merci de poster les réponses au groupe afin d'en faire profiter à tous
Salut! :O)
> Pourquoi pas simplement l'événement resize du form
Je n'ai pas essayé craignant un effet de "scintellement" du formulaire..
L'effet serait peut-être le même.. :OP
Mon code ne fonctionne toutefois pas correctement car il ne préserve pas
ratio.... il faut donc apporter les modifications suivantes :
ajouter cette ligne dans le Form_Load :
'***
m_fRatioLargeurHauteur = Me.Width / Me.Height
'***
ajouter la déclaration suivante dans le module :
'***
Public m_fRatioLargeurHauteur As Single
'***
remplacer la ligne suivante du module :
'***
rc.Bottom = rc.Bottom + (rc.Right - rc.Left - (Form1.Width /
Screen.TwipsPerPixelX))
'***
par celle-ci :
'***
rc.Bottom = ((rc.Right - rc.Left) / m_fRatioLargeurHauteur) + rc.Top
'***
et remplacer la ligne suivante du module :
'***
rc.Right = rc.Right + (rc.Bottom - rc.Top - (Form1.Height /
Screen.TwipsPerPixelY))
'***
par celle-ci :
'***
rc.Right = ((rc.Bottom - rc.Top) * m_fRatioLargeurHauteur) + rc.Left
'***
--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
Merci de poster les réponses au groupe afin d'en faire profiter à tous
Salut! :O)
> Pourquoi pas simplement l'événement resize du form
Je n'ai pas essayé craignant un effet de "scintellement" du formulaire..
L'effet serait peut-être le même.. :OP
Mon code ne fonctionne toutefois pas correctement car il ne préserve pas
ratio.... il faut donc apporter les modifications suivantes :
ajouter cette ligne dans le Form_Load :
'***
m_fRatioLargeurHauteur = Me.Width / Me.Height
'***
ajouter la déclaration suivante dans le module :
'***
Public m_fRatioLargeurHauteur As Single
'***
remplacer la ligne suivante du module :
'***
rc.Bottom = rc.Bottom + (rc.Right - rc.Left - (Form1.Width /
Screen.TwipsPerPixelX))
'***
par celle-ci :
'***
rc.Bottom = ((rc.Right - rc.Left) / m_fRatioLargeurHauteur) + rc.Top
'***
et remplacer la ligne suivante du module :
'***
rc.Right = rc.Right + (rc.Bottom - rc.Top - (Form1.Height /
Screen.TwipsPerPixelY))
'***
par celle-ci :
'***
rc.Right = ((rc.Bottom - rc.Top) * m_fRatioLargeurHauteur) + rc.Left
'***
--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
Merci de poster les réponses au groupe afin d'en faire profiter à tous