Mehrere Mouse-Over Events bei einem Image

[ak1]

Hallo Leute,

ich habe ein Image in dem auf Knopfdruck eine Linie gezeichnet wird:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  image1.Canvas.Pen.Width:=2;
  image1.Canvas.Pen.Color:=clred;
  image1.Canvas.LineTo(10,10);
  image1.Canvas.LineTo(90,10);
  image1.Canvas.LineTo(90,90);
  image1.Canvas.LineTo(100,90);
  image1.Canvas.LineTo(100,10);
  image1.Canvas.LineTo(110,10);
  image1.Canvas.LineTo(110,90);
  image1.Canvas.LineTo(120,90);
  image1.Canvas.LineTo(120,10);
  image1.Canvas.LineTo(130,10);
  
end;

Jetzt möchte ich, wenn der Benutzer mit dem Mauszeiger auf Koordinate (100,90) geht einen Klartext ausgeben, bei Koordinate (130,10) wiederum einen andern Klartext. Geht so etwas bei Bildern?