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




Вниз

Как можно загрузить свой курсор в дельфи! 


TroJan   (2001-11-03 19:56) [0]

У меня вот такая проблема, я хочу изменить курсор моей программе на свой, как я могу сделать это. Если можно приведите пример решения этой проблеммы



Crustie   (2001-11-03 21:26) [1]

1)Создаешь ресурсный файл с курсором (например, с помощью ImageEditor (в нем:file-new-resource file;resource-new-cursor; ОБЯЗАТЕЛЬНО изменяешь имя курсора).
2)В тексте проги после строки {$R *.dfm} пишешь {$R имя и путь к твоему ресурсному файлу}
В обработчике OnCreate формы: ScreenCursors[1]:=LoadCursor(HInstance, "имя курсора в ресурсном файле");
3)Используешь его: form1.cursor:=1;
или button1.cursor:=1;



Delphi5.01   (2001-11-05 06:55) [2]

К сожалению у меня не получилось. Обясню по подробности что я делал: Во первых в ImageEditor создал resource file потом появилось окошко и надпись Contents Я нажал правой кнопкой на этой надписи и появилось меню, я выбрал New - Cursor, после появилось акно с редактором курсора я там нарисовал курсор (и изменил название курсора на VIT). А ресурсни фаил сохранил под именем cur.res

Потом в делфи после {$R *.dfm} написал
{$R cur.res}

OnCreate написал то что ты мне посаветовал а именно
ScreenCursors[1]:=LoadCursor(HInstance, "VIT");
ScreenCursors[1] оказался типом HCURSOR я его и поместил в
Var
ScreenCursors[1] : HCURSOR;
После этого дельфи не ругался но операция form1.cursor:=1; ни поизвела никаких изменений.
Пожалуйста обясни где я допутил ошибку




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




Наверх





Память: 0.72 MB
Время: 0.033 c
1-22230           Man In Red            2001-12-15 23:01  2002.01.08  
Как в labele отобразить порядковый номер в RichEdite выделенного символа!


3-21927           Aleks_Vl              2001-12-04 09:47  2002.01.08  
DTS + Delphi


7-22453           Juri                  2001-09-21 18:26  2002.01.08  
RS485


3-21937           ANDREY196             2001-12-04 18:24  2002.01.08  
Как мне поменять цвет в определённой строке таблице в DBGRID


14-22391          Serg5                 2001-11-10 10:29  2002.01.08  
Кому не лень, зайдите на http://forum.ru-board.com/ , он правда висит, или IP фильтрация, меня не пускают.