Re: AHK: Смена курсора

null@example.com (Странникх) — Wed, 04 Oct 2017 11:37:56 +0000

OnMessage(0x200, "WM_MOUSEMOVE") ; При передвижении курсора, вызывать функцию WM_MOUSEMOVE

Gui, Font, cBlue Underline
Gui, Add, Text, vMyText x10 y10 gLink, Наведи на меня ; Добавляем элемент Text с хендлом MyText и вызовом подпрограммы Link при клике по элементу
Gui, Add, Text, vMyText1 x10 y50 gLink, Наведи 2
Gui, Add, Text, vMyText2 x10 y100 gLink, Наведи 209
Gui, Margin, 10, 10
Gui, Show
return

Link:
Run, http://ahk-power.ru
return

WM_MOUSEMOVE(wParam, lParam, msg, hwnd)
{
global
MouseGetPos, , , id, control, 1
GuiControlGet, OutputVar, Name, % control
If (RegExReplace(OutputVar, "MyText.*", "MyText") = "MyText")
	DllCall("SetCursor", uint, DllCall("LoadCursor", int, 0, int, 32649)) ; Установить курсор 32649
}

AHK: Смена курсора

null@example.com (andrew.drob71) — Wed, 04 Oct 2017 09:20:23 +0000

Ребят подскажите как сделать так что б при наведении на определённый текст менялся курсор Не знаю как описать, типо что бы нажать можно
У меня есть код, но у меня не одна ссылка а несколько...Я не знаю как сделать что бы работали все...

OnMessage(0x200, "WM_MOUSEMOVE") ; При передвижении курсора, вызывать функцию WM_MOUSEMOVE

Gui, Font, cBlue Underline
Gui, Add, Text, hwndMyText x10 y10 gLink, Наведи на меня ; Добавляем элемент Text с хендлом MyText и вызовом подпрограммы Link при клике по элементу
Gui, Margin, 10, 10
Gui, Show
return

Link:
Run, http://ahk-power.ru
return

WM_MOUSEMOVE(wParam, lParam, msg, hwnd)
{
global
if (hwnd = MyText) ; Если хендл, на котором сейчас стоит курсор, это MyText, то...
DllCall("SetCursor", uint, DllCall("LoadCursor", int, 0, int, 32649)) ; Установить курсор 32649
}

Серый форум — AHK: Смена курсора

Re: AHK: Смена курсора

AHK: Смена курсора