groupe d'images / TJpegImage

bonjour,

j'ai un panel (grp_images) avec 15 Timage dessus qui sont des jpeg. Je voudrais pouvoir les intégrer dans un tableau avec d'autres infos :

Code:

---

1 2 3 4 5 6

tab_images : array[0..20] of Record haut, gauche : word; ImageJPG : Tjpegimage; etc...; end;

---

je voudrais pouvoir charger les images dans le tableau sans le faire une par une du style :

Code:

---

1 2 3 4 5

for i:=1 to grp_images.controlcount - 1 do begin tab_images[i].ImageJPG := Tjpegimage.Create; tab_images[i].ImageJPG.Assign(grp_images.controls[i].picture.graphic); .... end;

---

ce n'est pas possible : il n'aime pas les propriétés des images dans le grp_images.controls[i].

Si quelqu'un a une idée... Merci d'avance

Salut :)
Essaie avec:

Code:

---

1 2 3

if grp_images.controls[i] is TJpegImage then tab_images[i].ImageJPG.Assign(TJpegImage(grp_images.controls[i]).picture.graphic);

---

Malheureusement ça ne fonctionne pas (sous delphi 7) :(

C pas grave. je v les charger "à la main"...

merci pour ton aide

Citation:

---

Envoyé par frenchsting

Malheureusement ça ne fonctionne pas (sous delphi 7) :(

---

Ca ne fonctionne pas? C'est à dire? Message d'erreur? Il ne fait rien? Ton unité centrale se transforme d'un coup en machine à coudre?
Essaie d'être plus précis stp :P

Citation:

---

Envoyé par Pedro

Ton unité centrale se transforme d'un coup en machine à coudre?

---

Non en fer à repasser volant... Et ça vole très mal un fer à repasser :lol:

Il refuse de compiler : identificateur non déclaré .picture. Il n'aime pas les cast de type on dirait.

je pense que cela vient du fait que le timage est un héritier du tgraphiccontrol lui même héritier de tcomponent...

J'avoue que je ne suis pas à laisse avec l'héritage entre composants. Je ne sais pas si on peut vraiment faire ça de façon simple.

merci pour ton aide