KeyboardInkey()

Syntaxe

Resultat$ = KeyboardInkey()

Renvoie le dernier caractère tapé sur le clavier.

Arguments

Aucun.

Valeur de retour

Renvoie le dernier caractère tapé sur le clavier, très utile pour interagir facilement avec l'utilisateur (nom dans les highscores, console dans le jeu, etc.).

Exemple

  If InitSprite() And InitKeyboard() And OpenScreen(800,600,32,"")
    Repeat
      FlipBuffers()
      ClearScreen(RGB(0, 0, 0))
      
      ExamineKeyboard()
            
      ; Efface le dernier caractère si la touche 'Back' est appuyée
      ;
      If KeyboardReleased(#PB_Key_Back)  
        FullText$ = Left(FullText$, Len(FullText$)-1)
      Else
        resultat$=KeyboardInkey()
        If FindString("1234567890 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzéèçàù", resultat$) ; Ajouter vos propres caractères valides ici
          FullText$ + resultat$
        EndIf ; Ajouter le nouveau texte à l'actuel (le cas échéant)
      EndIf

      ; Affiche le résultat
      ;
      If StartDrawing(ScreenOutput())
        DrawingMode(1)
        FrontColor(RGB(128, 255, 0))
        DrawText(20, 20, "Ecrivez un petit texte...:")
        DrawText(20, 40, FullText$)
        StopDrawing()
      EndIf
    Until KeyboardPushed(#PB_Key_Escape)
  EndIf

Voir aussi

ExamineKeyboard(), KeyboardPushed(), KeyboardReleased()

OS Supportés

Tous