Не работает макрос на активацию выхода с клавиатуры

Mach, популярные и не очень CAD, CAM. Обсуждение и разработка программ для управления станками.
VovaQQ
Новичок
Сообщения: 4
Зарегистрирован: 14 июл 2022, 17:06
Репутация: 0
Настоящее имя: Владимир
Контактная информация:

Не работает макрос на активацию выхода с клавиатуры

Сообщение VovaQQ »

Помогите пожалуйста.Не работает макрос на вкл выхода с клавиатуры.Текст мароса
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Const Move_Z_Up = &H55 'U key
Const Move_Z_Down = &H44 'D Key

If GetAsyncKeyState(Move_Z_Up) < 0 then
ActivateSignal(OUTPUT3)
'Message "Z up"
Else
DeActivateSignal(OUTPUT3)
End If

If GetAsyncKeyState(Move_Z_Down) < 0 then
ActivateSignal(OUTPUT4)
'Message "Z down"
Else
DeActivateSignal(OUTPUT4)
End If
Yefim
Новичок
Сообщения: 15
Зарегистрирован: 05 ноя 2022, 01:18
Репутация: 0
Настоящее имя: Efim Melnikov
Контактная информация:

Re: Не работает макрос на активацию выхода с клавиатуры

Сообщение Yefim »

м.б. пытаешься деактивировать выходы по else, которые не активны уже заранее? Когда GetAsyncKeyState() при нажатии кнопки выдаст значение < 0 ? По мне так 0 и 1 всегда не <0
Ответить

Вернуться в «Windows / Mach»