Show the Cursor shape, unless it's crDefault.
Source position: controls.pp line 1327
protected procedure TControl.UpdateMouseCursor(
X: Integer;
Y: Integer
);