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

Системный курсор Link Select   Найти похожие ветки 

← →
-=GaLaN=- ©   (2003-05-28 18:44) [0]

Как задействовать сабж в Delphi? В любом компоненте есть все, кроме этого.

---

← →
-=GaLaN=- ©   (2003-05-28 19:36) [1]

Помогите, пожалуйста!

---

← →
Hint ©   (2003-05-28 19:45) [2]

crHandPoint вам нужен что-ли?

---

← →
-=GaLaN=- ©   (2003-05-28 20:19) [3]

Нет, это уже готовый курсор. Я имею в виду те курсоры, что пользователь может настроить в Control Panel->Mouse. А именно один из этих курсоров, Link Select.

---

← →
Goblinus ©   (2003-05-28 23:25) [4]

function GetLinkSelectCursor(Inst: THandle; ResID: PChar): TCursor;
var
C: hCursor;
begin
C := LoadCursor(Instance, ResID);
if C = 0 then C := LoadAniCursor(Instance, ResID);
if C = 0 then ResourceNotFound(ResID);
for Result := 100 to High(TCursor) do
if (Screen.Cursors[Result] = Screen.Cursors[crDefault]) then begin
Screen.Cursors[Result] := C;
Exit;
end;
DestroyCursor(C);
raise EOutOfResources.Create(ResStr(SOutOfResources));
end;

---

← →
-=GaLaN=- ©   (2003-05-29 11:22) [5]

Что-то я не понял, а как это использовать?

---

← →
-=GaLaN=- ©   (2003-05-29 12:21) [6]

Помогите, пожалуйста!

---

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

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



Память: 0.46 MB
Время: 0.013 c