Delphipage

Ajouter un composant TStatusBar.
Créez un nouveau panel à la statusbar. Pour cela, sélectionnez le composant statusbar que vous venez d'ajouter. Allez dans l'inspecteur d'objet sur la propriété "Panels" et double cliquer dessus. Mettez la propriété "Style" du panel à "psOwnerDraw".

procedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar; Panel: TStatusPanel; const Rect: TRect);
var Bitmap: TBitMap ;
begin
Bitmap:=TBitmap.Create;
Bitmap.LoadFromFile('c:\test.bmp'); //Fichier bitmap à charger
StatusBar1.Canvas.FillRect(Rect);
StatusBar1.Canvas.Draw(Rect.Left,Rect.Top,Bitmap);
Bitmap.Free;
end;