Как в Delphi можно добавить новый курсор
Как в Delphi можно добавить новый курсор
Как в Delphi можно добавить новый курсор 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).
