Discussion :

[kurul1]

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

[kurul1]

Personne me peut m'aider ?

[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.

[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.

[bandit boy]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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é.

[bandit boy]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 )