Ask_For

Classes simples typées permettant une saisie simple de données.

Version: 1.1
Date: Le 6 août 1997
Rédaction: Jocelyn Houle
Direction: Jean Vaucher


Introduction

Il existe un Ask_For pour chaque type en Simula. Ask_For_Char, Ask_For_Text, Ask_For_Int, Ask_For_Real et Ask_For_Bool. Leur fonctionnement est indentique: une fenêtre apparaît au-dessus de la fenêtre parente et demande une information typée à l'aide d'une phrase simple.
(Si l'on veut demander plus qu'une information, il serait peut-être mieux de considérer les ItemWindows.)

Code

BEGIN
   EXTERNAL CLASS WindowTools;

   INSPECT NEW MainWindow("Ask_For") DO
   BEGIN
      SetSize(200, 150);
      Show;
      OutText(Ask_For_Text("Nom")); OutImage;
      OutInt(Ask_For_Int("Age"),  0); OutImage;
      OutFix(Ask_For_Real("Taille"), 2, 0); OutImage;
      OutChar(Ask_For_Char("Une lettre, S.V.P.")); OutImage;
      IF Ask_For_Bool("Etait-ce instructif?") THEN OutText("Oui")
      ELSE OutText("Non");
   END;
END;

On a tout simplement affiché directement les valeurs retournées par chacun des Ask_for.


Informations sur les classes Ask_For

Chaque Ask_For retourne une valeur du type du Ask_For.

Ainsi, on a:

où chaque fonction créera un ItemWindow correspondant pour l'entrée et retournera la valeur spécifiée par l'usager.

Exemples de programmes

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