Wie ich gedacht habe, man mus sowohl OnMouseEnter als auch OnMouseLeave vorher das BitBtn Graphic löschen :
Delphi-Quellcode:
procedure TForm1.DoOnLeave(Sender: TObject);
begin
(Sender as TBitBtn).Glyph := nil;
// dann kommt der code
Danke für die Hilfe und für Deine Geduld : )