Discussion :

[manu00]

Bonjour,

J'ai mis en place des images et je voudrais les populer a partir d'un imagelist au lancement de l'application

J'ai donc fais ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
for i := 1 to 22  do
  ImageList1.GetBitmap(i, Image+inttostr(i)+.Picture.Bitmap);
end;

pour essayer de mettre l'image numero i dans la zone image numero i mais ce ne fonctionne pas

Une suggestion ?

Merci !!

[létudiant (EPSI)]

avant toute chose je débute dans delphi donc je peut me tromper

Si j'ai bien compris tu veut faire défiler des images a l'ouverture de ton application..?? car j'ai pas trop compris ce que tu veut dire par "populer"

1. le truc bien con: as-tu déclaré i?

2.N'y a t'il pas le moyen de contourné la difficulté en prenant un Timage en en changeant la propriété Picture? tu change cette propriété a l'aide d'un Timer! ainsi ca peut te faire défiler des image toutes les 20 sec par exemple

[Qwazerty]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
for i := 1 to 22  do
  ImageList1.GetBitmap(i, FindComponent( 'Image' + inttostr(i)).Picture.Bitmap);
end;

SAlut
essais voir comme cela, mais je sais pas si c'est la methode la plus propre.
A+
Qwaz

[Pedro]

Salut
Le plus pratique serait quand même d'utiliser un TList ou TObjectList et y mettre tes images dedans...

[Clorish]

Salut
Le plus pratique serait quand même d'utiliser un TList ou TObjectList et y mettre tes images dedans...

Oui 2 SOlutions s'offrent a toi :

- Gestion dynamique : Tu dois creer tes composant TImage dynamiquement (Image := TImage.Create(...)) et pour gerer le nombre de ces composants, un array of TImage peut etre une solution si le nombre de TImage a manipuler est Fixe. Pour avoir acces a des methodes d'ajouts et de suppression, prefere les TObjectList.

- Gestion statique : Si ce que tu desire c'est manipuler des TImages placé en mode conception, dans ce cas, les methodes FindComposant sont tres efficaces (Marchent aussi pour une gestion dynamique).

Sinon, dans bon nombre de cas, une proprietee ImageIndex et/ou ImageList permette de lier un objet a une TImageList et y affecter automatiquement l'image associé.

Une autre solution est de recuperer une Instance de TBitmap ou autres TGraphic de la TImageList, et de l'assigner (methode Assign du composant cible) a una autre classe. TImagList propose des proprietees Pictures.Graphic, Picture.Bitmap, etc .... pour ce genre de chose.