comment mettre plusieurs images bout à bout dans un picturebox ?

Question

Bonjour, j'ai plusieurs images JPG qui ont toutes les mêmes dimensions hauteur et largeur.

Je souhaite les mettre bout à bout dans un seul picture box. J'incrémenterai donc à chaque fois la taille du picturebox à chaque ajout d'une image dedans mais le soucis est que je ne trouve pas le moyen d'y copier bout à bout mes images. Quelles sont les instructions à utiliser ?

Mes images à copiées sont chargées dans des picturesbox, mais je peux les charger dans un imagebox si besoin.

Merci pour votre aide.

scoval · Answer

bonjour 

si tu modifie la longueur de ta picturebox pourquoi tu ne peut simplement pas créer une nouvelle picturebox avec ta nouvelle image à coté de celle que tu as déjà ? 

cordialement 


_____________________________________________________________________________

Je suis un petit débutant qui deviendra bientôt un grand avertis

cs_lechti62 · Answer

non en fait la taille de lapicture box ne change pas, enfin du moins pour la propriété WIDTH. Par contre il va falloir qu'elle adapte la propriété SCALEWIDTH pour que tout tienne dedans, mais bien sur visuellement ce sera plus petit.

Calade · Answer

Bonjour,

La propriété Picture d'un PictureBox ne peux contenir qu'une seule image. Alors soit tu te créés une image contenant toutes celles que tu voudrais afficher (mais j'imagine que cela ne te convient pas surtout si le nombre d'images est inconnu).

Dans ce cas, tu imbriques dans ta pictureBox autant de contrôles PictureBox ou Image que de photos à insérer en gérant leurs coordonnées.

Perso' je préfèrerais des contrôles Image plus léger.

Calade

cs_lechti62 · Answer

ben si,j'arrive à mettre bout à bout mes images (lues dans une boucle)

Picture1.PaintPicture Picture7.Picture, depart_image, 0, taille_image, 975, 0, 0, taille_image, 975

depart_image est incrémenté à chaque fois de la taille de l'image

Le soucis est que je dois tout afficher dans le picturebox sans avoir à redimensionner celui ci.

Il faut donc qu'à chaque nouvel ajout d'une image, que l'interieur du picturebox se réduise pour que toutes les images devenues plus petites tiennent dedans.

Calade · Answer

Il faut donc qu'à chaque nouvel ajout d'une image, que l'interieur du picturebox se réduise pour que toutes les images devenues plus petites tiennent dedans.

Tu veux dire qu'avec 1 image, celle-ci occupe l'intégralité de ta PictureBox, avec 2 chacune occupe la moitié, etc...

Si c'est cela, il te faut à chaque insertion réafficher toutes tes photos en tenant compte du nombre de celles-ci, mais ce que j'ai dit dans mon précédent post reste valable.
Calade

cs_lechti62 · Answer

"Tu veux dire qu'avec 1 image, celle-ci occupe l'intégralité de ta PictureBox, avec 2 chacune occupe la moitié, etc... "

oui c'est ce que je veux faire. Pour l'instant elles s'affichent toutes bout à bout mais finissent par dépasser la largeur du picture box, moi ce que je veux c'est qu'elles se redimenssionnent toutes pour tenir dedans. 

Je charge chaque image dans un picture unique (affichées une par une dans une boucle), et je copie l'image en cours dans le picture qui doit toutes les contenir.

Je pensais que la propriété SCALEWIDTH permettait de réduire le contenu d'un picture box,mais il semble que non, car il ne change rien du tout.

Misère c'est la galère.

cs_lechti62 · Answer

la solution pourrait être de redimensionner chaque image avant qu'elle ne soit copiée dans dans le picture qui doit toutes les contenir,plutot que de redimensionner le picture qui les contient toutes.

Il me suffit de calculer leur taille par rapport à leur nombre, mais je ne sais pas non plus comment redimensionner une image en lui fixant un rapport taille/largeur

Calade · Answer

En tout état de cause une PictureBox ne peut contenir qu'UNE SEULE Picture, sauf comme je l'ai déjà dit à utiliser autant de contrôle Picture/Image contenu dans ton contrôle Picture Initial qui ne servirait ici que de contrôle conteneur.


Calade

Calade · Answer

Connais-tu le nombre d'images à l'avance ?


Calade

cs_lechti62 · Answer

oui,je connait lenombre d'image à l'avance.

J'ai aussi testé avec une image et la fonction STRETCH à true, dans le controle image je peux redimensionner chaque image en plus petit mais une fois recopiée dans le picturebox avec paintpicture elles reprennen leur taille normale, erf çaaurait été trop simple.

Calade · Answer

Le contrôle Picture ne possède pas de propriété Stretch.

Pour ton cas je pense que le plus simple est de diviser la largeur et la hauteur de chaque image par leur nombre. Puis tu les insère chacune dans un contrôle Image dont la propriété Stretch sera modifié  (je ne me rappelle jamais quelle est la valeur pour retailler la photo, il te suffit de tester, tu as 1 chance sur 2) et les Width et Height selon les résultats de tes divisions. Chaque contrôle image devra être positionné précisément là aussi par calcul soit à l'intérieur de ta PictureBox initiale soit directement sur ta Form.


Calade

cs_lechti62 · Answer

oui mais je connait certes le nombre d'image recuépéré dans une variable mais je ne peux pas savoir avant d'executer mon programme, combien d'images seront créées, donc je ne peux pas mettre d'avant les controles images censés afficher chaque image.

A moins qu'en VB il soit possible de créer des occurences d'un controle existant (des copies multiples avec des propriétes propres, d'un controle image placé), mais j'en doute .

cs_cheyenne · Answer

Bonjour,

Une autre piste avec 2 contrôles :

Tu dimensionnes le premier contrôle avec une largeur de x images.

Tu importes dans le deuxième chaque image que tu recopies à tour de rôle dans le premier à la nouvelle position en utilisant Bitblt ou PaintImage.

Cheyenne

cs_cheyenne · Answer

Bonjour,

Une autre piste avec 2 contrôles :

Tu dimensionnes le premier contrôle avec une largeur de x images.

Tu importes dans le deuxième chaque image que tu recopies à tour de rôle dans le premier à la nouvelle position en utilisant Bitblt ou PaintImage.

Cheyenne

Calade · Answer

@Cheyenne Perso', cela me parait bien compliqué d'utiliser des API.

Mais pour ma gouverne qu'est-ce que PaintImage ?

Je ne le connais pas en VB6 et ne l'ai trouvé ni dans le MSDN ni dans l'aide .NET ?

@lechti62

A moins qu'en VB il soit possible de créer des occurences d'un controle existant (des copies multiples avec des propriétes propres, d'un controle image placé), mais j'en doute .

Si tu utilises bien VB6 (et non VBA) tu as la propriété Index qui fait exactement ça.

Calade

cs_lechti62 · Answer

bon, je vais voir car j'ai trouvé un autre solution et ça fonctionne

en fait je copie chaque image dans un controle Picturebox, mais ensuite je transferre l'image de celui ci dans un Imagebox avec la fonction Stretch=true et c'est donc l'imagebox dont je me sert et comme ça j'obtient le resultat que je voulait

Calade · Answer

en fait je copie chaque image dans un controle Picturebox, mais ensuite je transfère l'image de celui ci dans un Imagebox 

Je n'en vois vraiment pas l'intérêt si ce n'est celui d'alourdir inutilement ton code.


Calade

cs_cheyenne · Answer

@Calade,

Non ce n'est pas compliqué les API.

J'ai envoyé une autre solution avec 2 contrôles, comme tu le fais, mais en utilisant StrechtBitBlt au lieu de BitBlt.
Mais le post n'a pas l'air d'être présent, j'ai dû faire un fausse manip !

PaintImage, c'est un lapsus je voulais dire Paint.Picture, décidément, ce n'est pas le bon jour...

Ta solution est plus simple.

Bonne prog.

A+ Cheyenne

Calade · Answer

@Cheyenne
Non ce n'est pas compliqué les API. 
 Je suis entièrement d'accord avec toi, j'ai simplement dit que ça l'était dans ce cas précis.


Calade

cs_cheyenne · Answer

@Calade

Je ne veux pas polémiquer, mais tu ne l'as pas dit explicitement. C'était un sous-entendu...

Quand je dis que ce n'est pas le jour, HI

Amicalement de Cheyenne

Calade · Answer

@Cheyenne,
Effectivement, il fallait lire dans mes pensées et à travers la Toile en plus. Désolé mais ça je ne sais pas le faire en VB6 !!!
Je devrais peut-être passer à .NET, qu'en penses-tu ?


Calade

cs_cheyenne · Answer

@Calade,

Etant donné que .NET est beaucoup plus orienté Internet que VB6 (c'est un euphémisme que de le dire) effectivement, il faudrait peut-être envisager de t'y mettre afin de mieux transmettre tes pensées par la Toile. 

Si c'est bien cela que tu as voulu exprimer 

Cheyenne

Calade · Answer

A peu près, mais si je doit d'abord transformer mes pensées en objet...

Ceci dit je crois qu'il vaut mieux arrêter là nos élucubrations qui déraillent un peu par rapport à l'objet initial du post. Sinon les admins vont nous tomber dessus.

A+
Calade

cs_cheyenne · Answer

Oui, nous digressons allègrement...

Bonne soirée à toi.

Amicalement de Cheyenne

cs_ShayW · Answer

Salut
meme si on ne connait pas d'avance le nombre d'image

Load Me.Picture2(Me.Picture2.UBound + 1)
et après utilises le left top pour positionner
dans le picture1 qui sert de container

Calade · Answer

A adapter car notre ami travailles en VB6 et ton code est en .NET.


Calade

cs_ShayW · Answer

Load Me.Picture2(Me.Picture2.UBound + 1) 

c'est bien du vb6 non !!

Calade · Answer

Désolé, mais je viens de voir que cela à un rapport avec les groupes de contrôles.

J'aurais encore appris quelque chose aujourd'hui.


Calade

cs_ShayW · Answer

par ex si tu as besoin de placer 64 labels
tu ne vas pas les mettre un par un sur ta form

place seulement un label modifies ses propriétées
et ensuite copy et past
à la question veux tu créer un array de label 
réponds oui e

tu as meslabels(0) et meslabels(1) sur ta form
effaces meslabels(1)

for i = 1 to 63
 load meslabels(i)
next i

Calade · Answer

Merci du tuyau.

Calade

Comment mettre plusieurs images bout à bout dans un picturebox ?

30 réponses

Votre réponse

Discussions similaires