Le parametre 'texte' est une chaine de caracteres qui sera chargee par defaut dans la zone de saisie. Si aucun texte initial n est souhaite, utilisez simplement deux apostrophes ('') vides, ou bien la valeur zero.
Si la taille de la chaine depasse la largeur physique de la zone, le texte defilera automatiquement lors de la saisie. Si les touches [Return] ou [Tab] sont pressees dans une zone, l Interface passera a la zone EDit suivante, si elle existe. Apres la derniere zone, tout entree clavier sera redirigee vers les boutons du dialogue. Une nouvelle pression sur [Tab] reviendra a la premiere zone de saisie.
Lorsque la boite de dialogue est affichee, la premiere zone EDit definie dans le programme Interface est activee automatiquement. Notez que l ordre de priorite suit l ordre de declaration dans le programme, et non pas les numeros de zones.
Le contenu d une zone de saisie peut etre lu directement depuis le programme principal AMOS via la fonction RDIALOG$. De plus, si la touche [Return] est utilisee, le numero de la zone EDit sera retourne via la fonction DIALOG.
Les caracteres sont saisis dans une fenetre numerotee z+1000. Si vous souhaitez afficher du texte a l ecran pendant l utilisation de la zone, la fenetre principale peut etre reactivee avec WINDOW 0. Une fois cela fait, la fenetre de saisie peut etre reaffichee ainsi :
X> Window Z+1000 : Rem Z est le numero de la zone EDit
Voici un exemple fonctionnel de zone de saisie :
E> A$=A$+"BA 50,50;SI 200,60; SA 1; initialisation"
A$=A$+"IN 5,0,0; GB 0,0,200,50; PR 16,10,'Entrez votre nom humain !',2;"
A$=A$+"BU 1,150,40,50,10,0,0,16;"
A$=A$+"[1N BPos 4+,0,0; GB 0,0,50,10; PR 2,0,' Quitter',2;][BQ]"
A$=A$+"ED 2,16,25,14,14,'',0,2; definition d une zone de saisie"
A$=A$+"EXit;"
Dialog Open 1,A$ : Rem Ouverture du canal
R=Dialog Run(1) : Rem Lancement du programme Interface
Repeat
D=Dialog(1) : Rem Attente du retour
Until D<0
Print "Bonjour "; Rdialog$(1,2)
Dialog Close
La version numerique d une zone de saisie est etudiee dans la page suivante.