Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];




Вниз

Курсор. 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;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.019 c
1-32448           Vacheslav             2002-02-22 20:57  2002.03.11  
Написал прогу. Под Win9x работает стабильно


3-32409           Yan B.                2002-02-12 14:20  2002.03.11  
Table Language в таблице Paradox


4-32612           Landgraph             2002-01-11 11:57  2002.03.11  
С OpenGL никто не обсчался чтоли?!


14-32545          Oleg Gashev           2002-01-25 13:40  2002.03.11  
Работа


1-32512           Виталий_2002          2002-02-25 11:01  2002.03.11  
Обработчик KeyPress