Re: Изменение курсора
Добавлено: 03 апр 2007, 09:13
Пробовал повторить результат... ничего не получилось при использовании ImageEditor (BDS 2006)
Но всё заработало когда создал ресурс следующим образом:
курсор создал с помощью ImageEditor:
Cursor1.cur
создал следующий файл:
cursor.rc
откомпилировал его следующим образом
brcc32 -32 cursor.rc
добавил в коде следующую строчку:
{$R cursor.res}
все остальное как у тебя:
запустил и всё заработало
Но всё заработало когда создал ресурс следующим образом:
курсор создал с помощью ImageEditor:
Cursor1.cur
создал следующий файл:
cursor.rc
Код: Выделить всё
CURSOR1 CURSOR "CURSOR1.CUR"
brcc32 -32 cursor.rc
добавил в коде следующую строчку:
{$R cursor.res}
все остальное как у тебя:
Код: Выделить всё
Screen.Cursors[crMyCursor] := LoadCursor(HInstance, 'CURSOR1');
Cursor := crMyCursor;