Section courante

A propos

Section administrative du site

ReadBuf

Lecture du tampon
Delphi / Free Pascal WinCrt

Syntaxe

Procedure ReadBuf(Out buf:ShortString;MaxChar:Byte);

Description

Cette procédure permet d'émuler la routine de console de lecture pour WinGraph. Il crée un caret clignotant et attend que l'utilisateur saisisse plusieurs touches jusqu'à ce que la touche Enter (#13) soit enfoncée ou qu'un nombre de caractères (maxchar) soit atteint. Si (maxchar) est défini sur 0, 255 caractères au maximum sont acceptés. Le paramètre (buf) entreposera la séquence de caractères d'entrée. L'intervalle ASCII acceptée est comprise entre ' ' (espace) et '~' (tilde). Les touches étendues ou de fonction sont ignorées. Parmi les touches d'édition habituelles, seul BackSpace est reconnu. La routine utilise DefaultFont pour écrire les caractères horizontalement à l'écran et gérer elle-même le placement et les espaces intercaractères. Tous les autres styles de texte spécifiés par l'utilisateur sont pris en compte. Le texte est positionné à l'emplacement actuel du pixel. L'écran entier défile vers le haut si nécessaire. L'appel suivant de ReadBuf place le caret sur une nouvelle ligne.



Dernière mise à jour : Lundi, le 10 Juillet 2023