Скачать: CL | DM;

Проблема с курсорами   Найти похожие ветки 

← →
Dmk ©   (2003-07-09 02:56) [0]

Таким образом я загружаю курсоры

Screen.Cursors[crMyHand] := LoadCursor(HInstance, "SHOPHAND");
Screen.Cursors[crRasterRect] := LoadCursor(HInstance, "RASTERRECT");

Но потом, в классе наследнике от TForm
пытаюсь установить Self.Cursor := crMyHand;
Ничего не получается.
Если сделать так: Screen.Cursor := crMyHand; , то
все работает нормально.
Почему так происходит? :(

Загрузка курсоров происходит в OnFormCreate,
Попытка установить - в событии OnMouseDown.

Так тоже не помогает: Self.Cursor := Screen.Cursors[crMyHand];
Воспринимаются только системные курсоры.
А вот в любой другой процедуре, кроме OnMouseDown,
все работает отлично.

---

← →
Dmk ©   (2003-07-09 03:33) [1]

Кстати! Если сделать свой обработчик сообщения,
но без Inherited, то все нормально.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c