Developing.ru

CURSOR1   CURSOR "CURSOR1.CUR"

  Screen.Cursors[crMyCursor] := LoadCursor(HInstance, 'CURSOR1');
  Cursor := crMyCursor;

Пробовал повторить результат... ничего не получилось при использовании ImageEditor (BDS 2006)
Но всё заработало когда создал ресурс следующим образом:
курсор создал с помощью ImageEditor:
Cursor1.cur
создал следующий файл:
cursor.rc
[code]
CURSOR1 CURSOR "CURSOR1.CUR"
[/code]

откомпилировал его следующим образом
brcc32 -32 cursor.rc

добавил в коде следующую строчку:
{$R cursor.res}

все остальное как у тебя:
[code]
Screen.Cursors[crMyCursor] := LoadCursor(HInstance, 'CURSOR1');
Cursor := crMyCursor;
[/code]

запустил и всё заработало

Да..., просто слов нет... Исходник покажи а не пост..

[quote="Duncon"]Покажи свой случай...[/quote]

Мой случай - первое сообщение в этой теме.

Покажи свой случай...

А может быть другие компоненты или форма пытаются выставить свой курсор? У них ведь тоже можно определить свой курсор.

В смысле курсор меняется сразу при движении мышкой? Тогда мне прийдется менять курсор и в Onclick и в всех остальных функциях. Мне интересно, почему не работает именно в моем случае.

Засуньте в onMouseMove формы, если сверхкосяки или на вход выход мыши на форму..

[quote="SergeyS"]значение курсора попробуй устанавливать не у текущей формы а у объекта Screen:
Screen.Cursor := crMyCursor;[/quote]
Попробовал. Тоже самое: матч работает/не работает. Счет 3:3.

значение курсора попробуй устанавливать не у текущей формы а у объекта Screen:
Screen.Cursor := crMyCursor;

попробуй onshow форма сначала покажется а потом будет думать на ней ли мышь и менять курсор.

можт на каждый раз прокатит

некоторые вещи oncreate не прокатывают