[delphi] Sauvegarder une TImageList

Sauvegarder une TImageList [delphi] - Delphi/Pascal - Programmation

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
Reply

Marsh Posté le 30-04-2003 à 15:29:53   

Reply

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 :D
 
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


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

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?


---------------
Mes photos : http://500px.com/endemyon
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed