Sauvegarder une TImageList [delphi] - Delphi/Pascal - Programmation
Marsh Posté le 30-04-2003 à 15:48:40
Je sais pas si c'est ce qu'il y a de mieux :
img: TBitmap;
img := TBitmap.Create;
img.Handle := liste.GetImagesBitmap;
img.SaveToFile('c:\bidule.bmp';
img.Handle := liste.GetMaskedBitmap;
img.SaveToFile('c:\bidule_mask.bmp';
img.Free; // faut voir si ça bousille pas l'imagelist aussi
pour le charger:
img.LoadFromFile('c:\bidule.bmp';
img2.LoadFromFile('c:\bidule_mask.bmp';
liste.Add(img, img2);
pour le liste.add il faut que tu spécifies à l'imagelist à l'avance la taille des images si c'est différent du 16x16 par défaut
Marsh Posté le 07-05-2003 à 10:16:04
J'ai essayé dans tout les sens d'utiliser ta méthode, mais cela ne marche pas, je n'ai pas d'erreur à l'execution, mais l'image sauvegardée est une image carré dont le bas contient du bruit (l'image contient mes icones par rangés de 4 + une rangé contenant du bruit), cela ne donne pas une image de 16/16*nombres d'icones. Au chargement seules les 4 premieres images sont chargées après c'est n'importe quoi. Que faire?
Marsh Posté le 30-04-2003 à 15:29:53
Bonjour,
Je charge des icônes dans une TImageList lors de l'exécution d'un programme. Je voudrais sauvegarder ces images pour pouvoir les récupérer automatiquement lors d'une utilisation ultérieure. C'est possible?
---------------
Mes photos : http://500px.com/endemyon