So I’m writing some code and need to use the hand point (link) cursor. However I noticed that Delphi is using different looking cursor than Windows. After I looked around in the Forms unit to see how TScreen handles cursors I wrote this fix which seems to work fine.
procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[crHandPoint]:= LoadCursor(0, IDC_HAND);
end;
Leave a Reply