[VB6] Redimensionnement d'image

Redimensionnement d'image [VB6] - VB/VBA/VBS - Programmation

Marsh Posté le 14-06-2012 à 15:19:25    

Rebonjour :)
 
Cette fois ci j'ai un autre souci. En effet je dois redimensionner mes .jpg pour qu'elle soient à la taille 150*200 px. J'ai essayé de faire :  
 
Picture1.Picture = LoadPicture(path & nom, 0, 0, 150, 200)
 
Où path & nom est le chemin de mon image. Mais l'image ne se redimensionne pas ! je ne trouve absolument rien sur internet pour redimensionner en VB6, vous pourriez m'aider s'il vous plaît ?
 
Merci !
 
 
EDIT :
 
Je viens également d'essayer ceci :
 
Picture1.Picture = LoadPicture(path & nom)
Picture2.PaintPicture Picture1.Picture, 0, 0, 150, 200
SavePicture Picture2.Picture, destination & number & ".png"
 
Mais j'ai une erreur :
 
Erreur d'exécution '380' :
Valeur de propriété incorrecte
 
 
EDIT2 :
 
Encore un test non concluant... J'ai essayé de le faire avec un image control mais quand je sauvegarde la taille reste identique à l'originale.


Message édité par Mnoxis le 14-06-2012 à 15:37:18
Reply

Marsh Posté le 14-06-2012 à 15:19:25   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed