Bonjour,
voici un bout de code en ce qui concerne l'affichage d'une image Jpeg dans ma fiche Etudiant.

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
35
36
37
unit ImagePhoto;
interface
uses
  SysUtils, Classes, DB, ADODB, DBClient;

Type
  TdmGesco2010 = class(TDataModule)
…
…
  procedure dtsEtudiantAfterScroll(DataSet: TDataSet);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dmGesco2010: TdmGesco2010;  // sans importance

implementation  
{$R *.dfm}
uses Jpeg;
…
procedure ChargerJPG (const Stream :TStream; Fichier :TBitmap);  // il affiche Erreur  
var  PhotoJpeg : TJPEGImage;

begin
     if not Assigned(Fichier) then Exit;
     if not Assigned(Stream) then Exit;
     PhotoJpeg := TJPEGImage.Create;
     try
       PhotoJpeg.LoadFromStream(Stream);
       Fichier.Assign(PhotoJpeg);
     finally
       PhotoJpeg.Free();
     end;
end;
quand je lance la compilation de mon projet, il affiche erreur
Identificateur non déclarée : TBitmap

que dois je faire pour que le bmp ou TBitmap soit accepté ?
Est ce qu'il y a quelque chose à ajouter dans mon Uses ? - si oui lequel ?

Merci d'avance pour votre aide.

Eric