Gestion d'écran en Pascal

Dernière mise à jour le 17 novembre 2009 à 15:48 par marlalapocket
Publié par ZOUARI
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.