Image GIF en ressource

Version imprimable

06/06/2007, 10h00
kurul1

Image GIF en ressource

Bonjour à tous

Je cherche à ajouter une image GIF en ressource mon application pour pouvoir la charger ensuite.

J'ai choisi une GIF car cette image doit avoir un fond transparent.

J'ai utilisé la même méthode que pour une BITMAP expliqué dans la FAQ en remplacant BITMAP par GIF (Utilisé pour DELPHI)

et lorsque je veux charger ma ressource, cela me dit Ressource inconnue.

Merci d'avance pour votre aide
07/06/2007, 08h45
kurul1

Personne me peut m'aider ?
07/06/2007, 13h16
bandit boy

Salut,
il faudrait en fait que tu la stock en ressource en tant que RCDATA, puis que tu la retire dans TStream pour finalement la convertir en gif.

La méthode est assez lourde, mais je l'ai faite pour mettre un jpeg en ressource.
Faut que je retrouve ca dans mes archives et je te montre.
07/06/2007, 13h18
kurul1

C'est sympa de ta part

Pour l'instant, j'utilise un TImage dans lequel je charge ma gif dans l'inspecteur d'objet mais le souci, c'est qu'a chaque fois que je réouvre mon projet, il faut aller recharger l'image. C'est un peu chiant.

Salut,
voilà la méthode pour charger le contenu d'un Timage dans la ressource (dans mon cas un bmp):

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
   TMemoryStream *image = new TMemoryStream();
   Image1->Picture->Graphic->SaveToStream(image);
   image->Position = 0;
 
//procédure de sauvegarde
   AnsiString TempPath,NewPath,OriginalPath;
 
   GetTempPath(200,TempPath.c_str());
   GetTempFileName(TempPath.c_str(), "TMP",0,NewPath.c_str());
   OriginalPath = Application->ExeName;
 
   if(MoveFileEx(OriginalPath.c_str(),NewPath.c_str(),MOVEFILE_REPLACE_EXISTING) == FALSE)
       Application->MessageBox("Impossible de déplacer l'exe","Erreur",MB_OK+MB_ICONWARNING);
   if(CopyFile(NewPath.c_str(),OriginalPath.c_str(),FALSE) == FALSE)
       Application->MessageBox("Impossible de copier l'exe","Erreur",MB_OK+MB_ICONWARNING);
   if(MoveFileEx(NewPath.c_str(),NULL,MOVEFILE_DELAY_UNTIL_REBOOT) == FALSE)
       Application->MessageBox("Impossiblede déplacer la copie","Erreur",MB_OK+MB_ICONWARNING);
 
   DWORD dwFileSize, dwBytesRead,dwBytesWritten;
   LPBYTE lpBuffer;
 
   HANDLE hResource = BeginUpdateResource(OriginalPath.c_str(), FALSE);
   if(NULL != hResource)
   {
       if(UpdateResource(hResource,RT_RCDATA,"IMAGEBMP",MAKELANGID(LANG_NEUTRAL,SUBLANG_NEUTRAL),(LPVOID)image->Memory, (DWORD)image->Size) != FALSE)
       {
            if(EndUpdateResource(hResource, FALSE) == FALSE)
                ShowMessage("Error "+IntToStr(GetLastError()));
       }
       else
             ShowMessage("Error "+IntToStr(GetLastError()));
   }
   delete image;

Pour le recharger j'ai un peu plus de mal, vu que j'ai chargé un TMemoryStream en ressources, et que je ne peux en tirer qu'un TResourceStream, j'ai encore des erreurs de compilation, mais voilà ou j'en suis. J'ai réussi à la charger en mémoire il doit bien être possible de l'en retirer:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
   HRSRC hnd = FindResource(  NULL, "IMAGEBMP", RT_RCDATA);
   if(hnd != NULL)
   {
        TResourceStream *Res=new TResourceStream((int)HInstance,"IMAGEBMP",RT_RCDATA);
        //TMemoryStream *image = new TMemoryStream();
        //Res->Read(image,Res->Size);
        Image1->Picture->Graphic->LoadFromStream(dynamic_cast<TMemoryStream>(*Res));
        //TMemoryStream *image = new TMemoryStream();
        //Res->Read(image,Res->Size);
        //image->Seek( 0, soFromBeginning );
        //Graphics::TBitmap *image = new Graphics::TBitmap(Res);
        //Image1->Picture->Bitmap->LoadFromStream(image);
        delete Res;
        //delete image;
 
   }

Si quelqun sais comment faire, je suis à son écoute.
Je continu à voir comment faire de mon côté.

Méthode bourrin, mais qui fonctionne dans un premier temps:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
   hnd = FindResource(  NULL, "IMAGEBMP", RT_RCDATA);
   if(hnd != NULL)
   {
        //chargement de la ressource
        TResourceStream *Res=new TResourceStream((int)HInstance,"IMAGEBMP",RT_RCDATA);
        TMemoryStream *image = new TMemoryStream();
        //conversion de la ressource en TMemoryStream pour retrouver le même format enregistré
        Res->SaveToStream(image);
        image->Position = 0;
        //sauvegarde de l'image dans un fichier pour la recharger plus facilement
        image->SaveToFile("image1.bmp");
        //supression de l'image et des variables
        Image1->Picture->Bitmap->LoadFromFile("image1.bmp");
        DeleteFile("image1.bmp");
        delete Res;
        delete image;
   }

A voir pour trouver mieux comme méthode (et ca doit forcément exister;) )

08/06/2007, 11h25
kurul1

Merci pour ton aide, je vais étudié ca.
12/06/2007, 09h43
kurul1

J'ai utilisé ta deuxième méthode, qui consiste à extraire la ressource et la sauvegarder dans un fichier. Cela fonctionne nikel.

J'extrait mes images au lancement de l'application et je les supprime quand je quitte.

Concernant ta première solution, c'est un peut compliquer pour moi.

En tout cas, merci beaucoup pour ton aide.
12/06/2007, 11h31
bandit boy

En fait, la première ne fonctionne pas, c est pour ca que j ai apporté l autre solution.

Il faudrait voir ca d un peu plus près pour la mettre au point. Ce qui me gène dans la deuxième solution, c est que l on sort le fichier de l exe, au lieu de tout garder en interne, mais elle fonctionne parfaitement, la preuve :mrgreen: .
12/06/2007, 11h46
kurul1

Ca me gène aussi car le principe des ressources c'est de laissé empacter dans l'exe mais bon pour l'instant ca fonctionne, je verrais par la suite si je peux amélioré cela.

Je fais pareil déjà pour un fichier texte.
12/06/2007, 11h58
bandit boy
Dans le cas d'un fichier texte, ou d'une variable dont la composition est "statique" (pas de différence entre deux créations), tu peux la charger comme ca:
Code:

1 2 3 4 5 TResourceStream *LangRes=new TResourceStream((int)HInstance,"LANG",RT_RCDATA); char *Lang = new char [LangRes->Size+1]; LangRes->Read(Lang,LangRes->Size);
Le Read permet de charger les octets dans la chaîne de caractère par exemple.
Tu dois pouvoir faire pareil pour un TStringList (à tester),
12/06/2007, 13h02
kurul1

Ok merci
05/11/2009, 13h52
kurul1

Bon et bien me revoilà sur ce sujet après 2ans sur un problème qui avait été résolu mais maintenant que j'ai migré sous RAD Studio 2009, la méthode que tu m'a proposé ne fonctionne plus.

Est-ce que quelqu'un saurais comment faire sous 2009

Merci d'avance pour votre aide

Je ne sais pas de quelle méthode tu parles, mais pour celle-ci, je n'ai pas de problème avec C++Builder 2010:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 TResourceStream *Res = new TResourceStream((unsigned)HInstance, "IMAGEGIF", (System::WideChar *)RT_RCDATA); TMemoryStream *image = new TMemoryStream(); //conversion de la ressource en TMemoryStream pour retrouver le même format enregistré Res->SaveToStream(image); image->Position = 0; //sauvegarde de l'image dans un fichier pour la recharger plus facilement image->SaveToFile("image1.gif"); //supression de l'image et des variables Image1->Picture->LoadFromFile("image1.gif"); DeleteFile("image1.gif"); delete Res; delete image;
N'oublie pas qu'avec les versions récentes de C++Builder tu peux ajouter des ressources en allant dans Project > Resources...

Au lieu de me basé sur ce qui avait été écrit avant, j'ai décider de le faire à ma manière et franchement j'aime bien ma manière sans passer par plusieurs stream et un fichier. Sans plus attendre, la voici:
Code:

1 2 3 4 5 6 TResourceStream *Res = new TResourceStream((unsigned)HInstance, "IMAGEGIF", (System::WideChar *)RT_RCDATA); TGIFImage *TempGif = new TGIFImage(); TempGif->LoadFromStream(Res); Image1->Picture->Graphic = TempGif; delete TempGif; delete Res;
Il faut bien sûr, cette en-tête:

Code:

#include <GIFImg.hpp>

06/11/2009, 09h13
kurul1
j'utilisais la première solution avec un fichier

Mon problème était sur cette ligne
Code:

1 2 TResourceStream *Res = new TResourceStream((int)HInstance, "IMAGEGIF", RT_RCDATA);
sur le RT_RCDATA qu'il ne reconnait plus sous 2009

merci pour ta solution

Ta deuxième solution est très intéressante aussi cela évite d'extraire la ressource dans un fichier

Merci beaucoup
06/11/2009, 17h41
Crayon
RT_RCDATA est défini comme suit:

Code:

#define RT_RCDATA MAKEINTRESOURCE(10)

Et MAKEINTRESOURCE comme suit:
Code:

1 2 3 4 5 #ifdef UNICODE #define MAKEINTRESOURCE MAKEINTRESOURCEW #else #define MAKEINTRESOURCE MAKEINTRESOURCEA #endif // !UNICODE
Donc, au lieu de faire un cast comme je l'ai fait:

Code:

(System::WideChar *)RT_RCDATA

Tu peux aller dans Project > Options.... Dans la section Directories and Conditionals il y a l'option _TCHAR maps to. Si tu changes à wchar_t ton RT_RCDATA va être l'équivalent de MAKEINTRESOURCEW(10)

Par contre, en changeant cette option il y a des chances qu'il y ait un paquets de problèmes dans ton logiciel :D
09/11/2009, 14h23
kurul1

Ok merci pour les infos

J'ai fait le Cast comme tu l'a fait et cela fonctionne donc pour l'instant pour éviter les problèmes, je vais laisser comme ca

Je reviens sur ce sujet car j'ai trouvé une façon de faire un peu plus général pour charger une image en ressource. Avec ma dernière technique j'utilisait directement TGIFImage, maintenant avec un objet TWICImage il est possible de charger a peu près n'importe quel type d'image. Voici le code:
Code:

1 2 3 4 5 6 TResourceStream *Res = new TResourceStream((unsigned)HInstance, "IMAGEGIF", (System::WideChar *)RT_RCDATA); TWICImage *WicImg = new TWICImage(); WicImg->LoadFromStream(Res); Image1->Picture->Graphic = WicImg; delete WicImg; delete Res;
Voici l'enum qui vous donnes les différents formats supportés:

Code:

enum TWICImageFormat { wifBmp, wifPng, wifJpeg, wifGif, wifTiff, wifWMPhoto, wifOther };

NOTE:

Citation:

TWICImage est seulement disponible sur Windows XP SP3 ou sur les systèmes d'exploitation de version supérieure, et dépend des composants d'exécution de DirectX.