Redimensionner une fenetre sur une image

Résolu
stolken Messages postés 73 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 1 août 2006 - 27 juin 2006 à 17:49
stolken Messages postés 73 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 1 août 2006 - 27 juin 2006 à 18:43
Bonjour à tous,

Je fais un programme et je voudrais faire une sub qui affiche une image en taille reele dans une nouvelle fenetre, j'ai donc fait ce code mais il ne fonctionne pas.

Private Sub ImageRedim_DblClick()
formtaillereele.ImageReele = LoadPicture(MakeMyPic.File1.Path & "" & MakeMyPic.File1.FileName)
formtaillereel.Width = ImageReele.Width ' erreur : objet requis
formtaillereel.Height = ImageReele.Height
formtaillereele.Show
End Sub

Merci d'avance

3 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 33
27 juin 2006 à 18:12
il doit manquer le nom de la Forme.

puisque tu le met au LoadPicture, je suppose que c'est pas la Forme en cours.

    formtaillereel.Width = formtaillereele.ImageReele.Width

    formtaillereel.Height = formtaillereele.ImageReele.Height


sauf qu'il faut rajouter la taille des bordures, et faire attention à l'unité (Twips)


formtaillereel.Width = formtaillereele.ImageReele.Width + (formtaillereel.Width -  formtaillereel.ScaleWidth)
formtaillereel.Height = formtaillereele.ImageReele.Height + (formtaillereel.Height -  formtaillereel.ScaleHeight)


Daniel
3
stolken Messages postés 73 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 1 août 2006
27 juin 2006 à 17:51
Dsl je me suis mal exprimé, en fait l'image s'affiche bien dans ma nouvelle fenetre en taille reel mais je voudrais que la fenetre prenne la taille de l'image
0
stolken Messages postés 73 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 1 août 2006
27 juin 2006 à 18:43
Merci !
0