Salut,
Comment fait-on pour afficher dans un TImage une image contenue dans un TImageList ??
Merci
Salut,
Comment fait-on pour afficher dans un TImage une image contenue dans un TImageList ??
Merci
Salut
Avec GetBitmap de TImageList:
@+ Claudius
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 procedure Form1.Button1Click(Sender: TObject); begin ImageList1.GetBitmap(0, Image1.Picture.Bitmap); end;
D'accord merci pour le code,
mais (lol) l'ime est toute petite petite petite petite............
On peut changer la taille = par exemple remettre la taille d'origine ???
a+
Bonjour,
Le conteneur TImageList est seulement fait pour des icônes et autres petites ressources en 16x16px il me semble.
Il te faut donc passer par une autre méthode de chargement de pictures dans un TImage, exemple :
@+
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 procedure TForm1.Button1Click(Sender: TObject); begin Image1.picture.LoadFromFile('toto.jpg'); end;
Le taille des images contenues dans un TImageList peut être définie à la conception. (Il faut le faire avant d'y insérer des images.)
A noter que les images sont stockées non compressées dans le DFM. Ce n'est pas fait pour gérer une large collection.
Oui on peut choisir la taille des images à placer dans le TImageList avant de les charger. Par contre toutes les images devront avoir cette taille.
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager