Problem mit Buttons OnMouseEnter. Alle Buttons gläntzern

[Praxist]

dort habe folgendes eingegeben

Delphi-Quellcode:

procedure TForm1.DoOnEnter(Sender: TObject);
begin
  //(Sender as TBitBtn).Font.Style := (Sender as TBitBtn).Font.Style + [fsBold];
  ImageList1.GetBitmap(1, Btn1.Glyph);
  ImageList1.GetBitmap(2, Btn2.Glyph);
end;

Aber die Bilder werden in alle Buttons angezeigt, wenn der Cursor auf ein Button kommt
Das Bild soll aber nur angezeigt, wenn der der Cursor auf sein Button kommt
Wie kann ich das machen ?
Vorteil mit diesem Code die Buttons glitzern nicht : )