Création et gestion des bitmaps hors écran

Remonter à Graphiques et composants - Index

Lorsque vous créez des images graphiques complexes, vous devez généralement éviter de les dessiner directement sur le canevas qui apparaît à l'écran. Au lieu de les dessiner sur le canevas d'un formulaire ou d'un contrôle, vous devez plutôt construire un objet bitmap puis dessiner sur son canevas avant de copier la totalité de l'image sur le canevas affiché.

La méthode Paint d'un contrôle graphique est un exemple d'utilisation typique d'un bitmap hors écran. Comme avec tout objet temporaire, l'objet bitmap doit être protégé par un bloc try..finally :

 type
   TFancyControl = class(TGraphicControl)
   protected
     procedure Paint; override;                               { redéfinir la méthode Paint }
   end;
 procedure TFancyControl.Paint;
 var
   Bitmap: TBitmap;                        { variable temporaire pour le bitmap hors écran }
 begin
   Bitmap := TBitmap.Create;{ construire l'objet bitmap }
   try
     { dessiner sur le bitmap }
     { copier le résultat dans le canevas du contrôle }
   finally
     Bitmap.Free;                                             { détruire l'objet bitmap }
   end;
 end;