Загрузка курсора из фаила *.cur и/или *.res

[Ciberal]

Никак не могу разобраться как осуществить оные действия. Буду рад помощи.

[anton14]

var 
h: hcursor; 
begin 
h := LoadCursorFromFile(*.сur'); 
Screen.Cursors[1] := h; 
Form1.Cursor := 1; 
end;

[mihali4]

1) Сначала создайте файл ресурса *.res с вашим новым курсором.
(Имя файла ресурса должно отличаться от имени проекта, поскольку Delphi создает такой-же; название ресурса нужно задавать БОЛЬШИМИ БУКВАМИ, например CURSORNAME)

2) Delphi номера 0 .. -16 для определения курсора. Используйте новый номер для вашего курсора, например, 1.
(Лучше использовать удобочитаемое название типа crMyCursor = 1)

3) В событии OnFormCreate для главной формы, поместите следующий код:
Screen.Cursors[CrMyCursor]:= LoadCursor(hInstance, 'CURSORNAME');

4) Теперь, если вам нужно использовать курсор на форме, панели и т.д., то напишите:
Anotherform.Cursor:= crMyCursor;

Все курсоры в приложении обрабатываются объектом Screen. Если хотите получить больше информации об этом объекте, посмотрите в справочнике (TObject).