Bonjour à toutes et à tous,

Pour obtenir un TBitMap, on utilise :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
  MonBmp:= TBitMap(CreateBitmapFromLazarusResource('monImage'));
L'un d'entre vous (honte à moi, je ne retrouve plus qui ) m'a donné la solution pour obtenir un TBGRABitmap :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
function BGRABitmapFromResource(NomRes: String): TBGRABitmap;
var
  Pict: TPicture;
begin
   Pict:= TPicture.Create;
   Pict.LoadFromLazarusResource(NomRes);
   Result:= TBGRABitmap.Create(Pict.Bitmap);
   Pict.Free;
end;
Malheureusement, aucune de ces deux méthodes ne permet d'obtenir un TBGLBitmap.

Avez-vous une idée de la manière de procéder ?

Cordialement.

Pierre