function EventHardwareKey() as Long
Возвращает "необработанный" системой код клавиши. Данный сканкод показывает значение, которое не зависит от языка раскладки, регистра раскладки и пр.
нет
Linux
#Include "window9.bi"
Dim As Integer ev
OpenWindow("Привет",10,10,300,300)
Do
ev=WaitEvent()
If ev=EventClose Then end
If ev=EventKeyUp Then
? "EventKey="; EventKEY
? "EventHardwareKey"; EventHardwareKey()
EndIf
Loop
Created with the Personal Edition of HelpNDoc: iPhone web sites made easy