Использование анимированных курсоров

Советы » Мышка и Курсор » Использование анимированных курсоров

const

crMyCursor = 1; procedure

TForm1.FormCreate(Sender: TObject); begin

// Загружаем курсор. Единственный способ для этого Screen.Cursors[crMyCursor] := LoadCursorFromFile('c:mystuffmycursor.ani'); // Используем курсор на форме Cursor := crMyCursor; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com