Форум: "Основная";
Поиск по всему сайту: 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.71 MB
Время: 0.015 c
3-32422           Vovochka              2002-02-13 10:30  2002.03.11  
Многопользовательская среда


1-32445           Last Hero             2002-02-19 21:38  2002.03.11  
Помогите преобращовать Record в Variant!


1-32443           Turalyon              2002-02-20 09:00  2002.03.11  
Сервис


3-32389           dimonka               2002-02-11 15:20  2002.03.11  
Суммирование записей в столбце


1-32471           Olivka                2002-02-22 22:44  2002.03.11  
TMemoryStream