Declare Function GetKey ( ) As Integer

result = GetKey

Значение Integer возвращаемого ascii-кода.

Возвращает ASCII-код первой клавиши в буфере клавиатуры. Клавиша удаляется из буфера. Если клавиша не существует, GetKey ожидает ее. Для расширенных клавиш (возвращение двух символов), расширенный код возвращается в первом байте, а обычный код возвращается во втором байте. (см. пример ниже)

Читаемая клавиша не отображается на экране.

Ключевое слово не останавливает программу, если в буфере нет клавиши см. также Inkey или MultiKey.

Dim As Integer foo
Do
    foo = GetKey
    Print "total return: " & foo
    
    If( foo > 255 ) Then
        Print "extended code: " & (foo And &hff)
        Print "regular code: " & (foo Shr 8)
    Else
        Print "regular code: " & (foo)
    End If
    Print 
Loop Until foo = 27

• Не доступна в диалекте -lang qb , но есть псевдоним __Getkey.
  
  

• Новое в FreeBASIC
  
  

• GetMouse
  
• Inkey
  
• Input()
  
• MultiKey