Mauszeigerwechsel bei linksklick auf ein Image klappt nicht

[himitsu]

versuch es mal so:

Delphi-Quellcode:

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

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

mir war auch schon aufgefallen, daß wärend des Mausklicks der Cursor nicht übernommen wird.