Mauszeigerwechsel bei linksklick auf ein Image klappt nicht

[turboPASCAL]

Hi,

Mauszeigerwechsel beim linksklick auf ein Image klappt nicht. Ich habe schon mehere Varianten versucht.
Was bzw. wie könnte man dies realisieren ?

Delphi-Quellcode:

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  image1.Cursor := crHandPoint;
end;

procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  image1.Cursor := crDefault;
end;

Crosslink zum DF