- В винде без мышки, чувствуешь себя скалолазом без снаряжения!
const
crMyCursor = 1;
procedure TForm1.FormCreate(Sender: TObject);
begin// Загружаем курсор. Единственный способ для этого
Screen.Cursors[crMyCursor] :=
LoadCursorFromFile("c:\mystuff\mycursor.ani");
// Используем курсор на форме
Cursor := crMyCursor;
end;
Если Вас заинтересовала или понравилась информация по разработке на Delph - "Использование анимированных курсоров", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!