ListWindow

Classe pour gérer l'insertion et l'affichage de texte.

Version: 1.0
Date: Le 12 juin 1997
Rédaction: Jocelyn Houle
Direction: Jean Vaucher


Introduction

Les ListWindows sont des zônes de texte dans lesquelles on peut écrire et sélectionner du texte par ligne.

Code
BEGIN
   EXTERNAL CLASS WindowTools;

   INSPECT NEW MainWindow("List Window") DO BEGIN
      REF(Button)     Quit;
      REF(ListWindow) LW;

      SetSize(200, 200);
      Quit :- MakeButton("OK");
      LW :- MakeListWindow.PutLine("Ligne 1")
                          .PutLine("Ligne 2!10!"
                                   "Ligne 3");
      Show;
      Quit. Wait;
   END;
END;

La création d'une ListWindow se fait à l'aide de la procédure MakeListWindow. L'option AllowInput permet d'écrire dans la zône.


Informations sur les ListWindows

On crée une ListWindow à l'aide de MakeListWindow, qui n'a besoin d'aucun paramètre.
ref(ListWindow) procedure MakeListWindow;
Retourne une nouvelle ListWindow.

On peut ensuite faire toutes les opérations disponibles dans les TextAreas... à l'exception de tout ce qui a trait au AllowInput, puisqu'une ListWindow ne fait que lister. Elle ne permet donc pas à l'usager d'éditer le texte.

Il existe cependant une particularité qui fonctionne assez bien avec les ListWindows. Il s'agit du AllowChoice:
procedure AllowChoice;
Définit la ListWindow pour qu'on puisse y faire des sélections par ligne (comme dans une MenuScrollWindow).
La ListWindow envoye alors un événement Selection_Handler (voir Events).
procedure DisallowChoice;
Désactive la sélection par ligne.


Exemples de programmes

[Retour à l'index de WindowTools...]