KeyboardInkey()
Syntaxe
Resultat$ = KeyboardInkey()Description
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