Форум: "Основная";
Поиск по всему сайту: 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.021 c
4-32611           Maximkha              2002-01-08 16:14  2002.03.11  
Отловить момент запуска


1-32504           LexaTyukha            2002-02-25 13:49  2002.03.11  
Компоненты для создания штрихкодов...


1-32453           Grim Rider            2002-02-22 08:34  2002.03.11  
Как прицепить ActiveX Dll?


3-32406           ivans                 2002-02-11 16:26  2002.03.11  
Подгрузка картинок в DBGrid на лету по имени файла


1-32482           GovoRun               2002-02-23 13:49  2002.03.11  
InitialDir for OpenDialog