[Delphi] Własny kursor

0

Mam pytanie jak zmienic kursor w programie na swój własny? Znalazłem na forum coś takiego:

Form1.Cursor := loadcursorfromfile('plik.cur');

Ale to mi nie działa? Czemu? A może jest inny sposób?

0

Tak powinno działać:

const
  crMojKursor = 1;
begin
  //Jak ladujesz kursor z pliku to
  Screen.Cursors[crMojKursor]:= LoadCursorFromfile('C:\plik.cur');
  //z zasobow
  //Screen.Cursors[crMojKursor]:= LoadCursor (hInstance, 'Nazwa');
  Form1.Cursor:= crMojKursor;
  //albo
  //Screen.Cursor:= crMojKursor;
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1