 |
|
 |
|
 |
32 - STOCKER DES IMAGES EN RESSOURCES
|
|
|
|
PRÉSENTATION :
Stocker et utiliser des images dans les ressources du .EXE
NOTES :
Cette méthode permet de stocker des images dans le .EXE sous forme de ressources. Et de les utiliser ensuite sous forme de BitMap.
C'est une solution alternative à l'utilisation de TImage pour le stockage. Les images doivent être dans un fichier .RES qui sera lié à l'application.
CODE :
Unit Unit1;
// Conserver des images dans .EXE sous forme de ressource
//
// Par Nono40 : http://nono40.developpez.com http://nono40.fr.st
// mailTo:nono40@fr.st
//
// Le 25/01/2002
//
Interface
Uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
Type
TForm1 = Class(TForm)
Button1: TButton;
Image1: TImage;
Button2: TButton;
Procedure Button1Click(Sender: TObject);
Procedure Button2Click(Sender: TObject);
Private
{ Déclarations privées }
Public
{ Déclarations publiques }
End;
Var
Form1: TForm1;
Implementation
{$R *.dfm}
// Pour stocker les images il faut créer un fichier de ressources qui les contient.
// Il est possible d'utiliser l'éditeur d'images de Delphi pour le faire.
// Le fichier doit être lié à l'aide de la ligne ci-dessous.
{$R images.res }
Procedure TForm1.Button1Click(Sender: TObject);
Begin
// Un type TBitMap peut alors lire directement une image sous forme de ressource.
Image1.Picture.Bitmap.LoadFromResourceName(HInstance,'BMPERREUR');
End;
Procedure TForm1.Button2Click(Sender: TObject);
Begin
// Un type TBitMap peut alors lire directement une image sous forme de ressource.
Image1.Picture.Bitmap.LoadFromResourceName(HInstance,'BMPATTENTE');
End;
End.
|
| |
 |
|
 |
Les sources présentées sur cette page sont libres de droits,
et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation
constitue une oeuvre intellectuelle protégée par les droits d'auteurs. Copyright ©
2003 Bruno Guérangé. Aucune reproduction,
même partielle, ne peut être faite de ce site et de l'ensemble de son contenu :
textes, documents, images, etc sans l'autorisation expresse de l'auteur.
Sinon vous encourez selon la loi jusqu'à 3 ans de prison et jusqu'à 300 000 E
de dommages et intérêts.
Cette page est déposée à la
SACD.
|
