La gestion d'écran se fait par les fonctions et les procédures prédéfinies de l’unité
WinCrt. C’est pourquoi dans chaque programme on utilise l’unité WinCrt (Crt en Free Pascal)
Exemple :
- Par défaut, le titre d’une fenêtre c’est le nom du fichier source commençant par son chemin d’accès, pour le modifier on met dans la variable prédéfinie (Tableau de 80 caractères) de l’unité WinCrt : WindowTitle à l’aide de la procédure de l’unité Strings : StrCopy.
- Et pour fermer la fenêtre après la fin de l’exécution du programme on appelle la procédure DoneWinCrt.
Mais, pour déplacer le curseur on utilise la procédure GotoXY
Et voici un exemple illustratif :
Program Gestion;
Uses WinCrt, Strings;
Begin
StrCopy(WindowTitle, 'GESTION DE STOCK');
GotoXY (20, 10); (* Ligne 10 colonne 20 *)
Write ('*');
Readln;
DoneWinCrt;
End.
Alt tab ecran noir
