Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.11;
Скачать: CL | DM;

Вниз

Курсор. Help.   Найти похожие ветки 

 
novomod ©   (2002-02-16 10:37) [0]

Каким образом можно поменять вид курсора?
(т.е. не crArrow,crCross,crDrag и т.д. а вставить из файла .cur)
Спасибо за ответы по теме!


 
MBo ©   (2002-02-16 10:50) [1]

1)нарисовать курсор, причем имя RES должно отличаться от проекта,
включить {$R CoolCur.Res}
2)определить
Const СoolCursor=положительно число;
3) загрузить
Screen.Cursors[Coolursor]:=LoadCursor(HInstance,"COOLCUR");

теперь можно делать
Image1.Cursor:=Coolursor;


 
Набережных С.   (2002-02-16 11:45) [2]

А если из файла .Cur, .Ani, то:
Screen.Cursors[Coolursor]:=LoadCursorFromFile(pChar(CursorFileName));


 
novomod ©   (2002-02-22 00:12) [3]

Благодарю сделал:
const
Mycur=5;
begin
Screen.Cursors[Mycur]:=LoadCursorFromFile("CursorFileName");
cursor:=Mycur;
end;



Страницы: 1 вся ветка

Текущий архив: 2002.03.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
6-32533
BWG
2001-12-23 19:28
2002.03.11
Определение IP


4-32611
Maximkha
2002-01-08 16:14
2002.03.11
Отловить момент запуска


3-32415
КСА
2002-02-12 12:05
2002.03.11
InterBase. Deadlock detected


14-32575
Nemesis
2002-01-25 16:10
2002.03.11
---|Ветка была без названия|---


6-32522
copyr25
2001-12-25 05:41
2002.03.11
Trace Route