Comment intégrer une image dans un programme Delphi

Version imprimable

28/02/2010, 09h51
DanCode

Comment intégrer une image dans un programme Delphi
Voilà, j'ai encore un petit problème.
J'utilise dans un petit programme une image que j'affiche quand l'utilisateur presse sur un bouton. Pour le moment, l'image est chargée à partir d'un fichier image que j'ai placé dans le dossier actif. C'est à dire qu'à l'initialisation (FormCreate), je charge l'image dans une TImage sur ma Form.
Code:

1 2 3 4 procedure TForm2.FormCreate(Sender: TObject); begin ImgPhoto.Picture.LoadFromFile('Partiti.bmp'); end;
Le gros problème avec cette technique, c'est que je dois avoir l'image sur le PC, dans le bon dossier, sinon il ne charge rien...
Y-a-t-il donc une autre manière de procéder, pour intégrer définitivement l'image au programme (l'encoder?...) de manière à ce que, si quelqu'un a uniquement le fichier .exe, il puisse néanmoins voir l'image?
28/02/2010, 10h11
Cl@udius

Salut

Il suffit d'inclure ton bitmap comme ressource. Tu as un petit exemple dans la FAQ: Comment insérer une ressource dans un exécutable ?

@+ Claudius
28/02/2010, 10h23
DanCode

Génial, merci!!
03/03/2010, 10h25
DanCode

Mhh, je n'arrive plus à faire marcher le compilateur: il a bien marché la premiere fois, mais maintenant il refuse de convertir mes autres fichiers, et m'affiche une erreur du type "Could not open input file C:\Images\Image.RC"

Quelqu'un aurait une idée de ce qui peut provoquer ça?
Je suis dans le bon répertoire....
03/03/2010, 10h34
Cl@udius

Re

Fais voir le contenu du fichier RC.
03/03/2010, 10h58
DanCode
Ben mon fichier RC contient juste l'identificateur, le type et l'adresse du fichier que je veux transformer...

Donc j'ai celui-là:
Image.rc
Code:

1 2 Image1 BITMAP Image1.bmp
03/03/2010, 11h02
Cl@udius

Lorsque tu appelles le compilateur de ressources (BRCC32), il faut que tu sois sur le dossier contenant ton fichier .RC.

Et vue le contenu de ce .RC, il faut également que le fichier .BMP y soit.

@+
03/03/2010, 11h10
DanCode

Résolu! Mais le problème ne venait pas de là:

Mon fichier bmp avait trop de couleurs. Je l'ai reconverti en bmp 256 et ça a marché comme un charme! Malheureusement la qualité a souffert... mais on ne peut pas tout avoir dans la vie:mrgreen:

Merci encore en tout cas:ccool:

houla tu utilise un Delphi 2 ou quoi ?

tu peux toujours tricher :

dans le RC

Code:

IMAGE1 RCDATA Image1.bmp

dans le programme:
Code:

1 2 3 4 5 6 7 8 9 10 var RS : TResourceStream; begin RS := TResourceStream.Create(0, 'IMAGE1', RT_RCDATA); // verifier la syntaxe try Image1.Picture.LoadFromStream(RS); finally RS.Free; end; end;