crHandPoint

← →
_наблюдатель_ (2004-01-13 18:18) [0]

Товарищи сопрограммеры! Есть такой вопрос. Всем известно, что у визуальных компонентов есть свойство Cursor. У него есть значение crHandPoint, которое соответствует изображению руки. Но эта "рука" в Delphi своя, а как на её место поставить "руку", которая установлена в системе, т.е. её изображение.
Есть один извращённый вариант - прочитать в реестре (щас ветку не помню), путь к *.CUR файлу, соответствующему этому изображению, и дальше как обычно.
А есть ли более нормальный способ?

← →
Семен Сорокин © (2004-01-13 20:16) [1]

это, имхо, в сторону Screen.Cursors копать

← →
YuRock © (2004-01-13 20:27) [2]

SetClassLong(Handle, GCL_HCURSOR, Integer(LoadCursor(hInstance, PChar(32761))));

Будет работать классно!

← →
YuRock © (2004-01-13 20:35) [3]

Извиняюсь, соврал - тоже из ресурсов берет...

← →
YuRock © (2004-01-13 20:40) [4]

SetClassLong(Handle, GCL_HCURSOR, Integer(LoadCursor(0, LPSTR(32649))));

А вот так точно будет классно!!!

Кстати, 32649 = IDC_HAND :))

← →
_наблюдатель_ (2004-01-14 13:22) [6]

Большое вам спасибо. Будем работать!

crHandPoint Найти похожие ветки