Desaparece la imagen al usar FillRect

[Kandorf]

Hola, estoy creando una aplicación en la que muestro una puntuación con 5 imágenes de una estrella, lo que quiero es que al posicionar el ratón de la mitad de la imagen a la izquierda muestre sólo la mitad de la imagen (para puntuar sólo con la mitad de una estrella).

Lo he intentado creando este método:

// Oculta la mitad de una estrella
procedure TFrmPelicula.OcultarEstrellaMitad(Estrella: TImage);
begin
  Estrella.Picture.Bitmap.Canvas.FillRect(Rect(Estrella.Width div 2,0,Estrella.Width-1,Estrella.Height-1));
end;

Pero lo que pasa es que la estrella desaparece entera.
La imagen que utilizo es un .ico, por si sirve de algo.

Un saludo.