Mit "GIP\"
wird eine Eingabemaske (InputBox) angezeigt, die den Benutzer
zwingt, entweder Text einzutragen oder die Maske wieder zu schließen.
Im Datenteil kann die Anzeige der Eingabemaske wie folgt spezifiziert werden ([]
ist optional):
Prompt[|Title][|Default][|Position][|Modal]
Prompt:
Der Text wird als unmittelbarer Erläuterungstext im Kern der Eingabemaske
angezeigt.
Title:
Der hier eingetragene Text wird als Überschrift in der Titelzeile der
Eingabemaske angezeigt.
Default:
Dieser Eintrag wird als Vorgabe im Eingabefeld angezeigt.
Position:
Die Position der Eingabemaske
(X-/Y-Koordinaten der linken oberen Ecke in
Pixel) auf dem Bildschirm können Sie vorgeben, wenn Sie hier die X- und Y-
Werte angeben (X,Y). Als Trennzeichen zwischen den Koordinatenwerten sind
alle nichtnumerischen Zeichen außer Senkrechtstrich und das Leerzeichen
zugelassen.
Ist keine Position
angegeben, wird das Fenster in Bildschirmmitte positioniert.
Modal:
Bei Modal = 1 ist
das gesamte System blockiert, solange die Eingabemaske nicht
bearbeitet wurde (systemmodal).
Bei Modal = 2 kann
in der Applikation, zu der das zuletzt lokalisierte Fenster
("STW\", "SAC\"
etc.) gehört, nicht weitergearbeitet werden, solange die
Eingabemaske nicht bearbeitet wurde (applikationsmodal).
Der vom Benutzer eingegebene Text wird programmintern gespeichert und kann
mittels der Befehle "IIP\..." und "IIH\..." mit einer Vorgabe verglichen werden. Bei
dem Vergleich wird Groß/Kleinschreibung nicht berücksichtigt.
Wenn der Benutzer auf "Abbrechen" drückt, wird als Eingabetext die
Zeichenfolge "$*#&" zurückgeben. Damit können Sie zwischen leerem
Eingabefeld und Abbrechen unterscheiden.
Verwenden Sie "JOC\[Sprungmarke]",
wenn Sie bei Abbruch zu einer
Sprungmarke springen wollen.
Sie können den eingegebenen Text in den Remote-Dateien weiterverwenden,
wenn Sie an der entsprechenden Stelle die Zeichenfolge "$v1$" eintragen oder
den Inhalt einer Variablen zuweisen:
VAR\$$inp=$v1$
Anmerkung:
Der Erläuterungstext kann auch vorher aus einer Textdatei gelesen werden; in
dem Falle ist anstelle des Textes die Zeichenfolge "temptext" einzutragen. Der
Text wird dann in der Absatzformatierung der Textdatei angezeigt, sofern die
Zeilenlänge in der Textdatei die Fensterbreite der Eingabemaske nicht
überschreitet.
Beispiele:
GIP\Bitte Lösung eingeben:|Aufgabe 32:
IIP\524,33 'Lösung ist richtig
MBX\Gratulation!
Alles richtig!|64|Aufgabe 32:
GOTO ende
EIP\
MBX\Leider falsch!|48|Aufgabe 32: 'Lösung ist falsch
:ende
@
'--------------------------------------------------
CFF\e:\texte\eingabe.txt
GIP\temptext|Aufgabe 32:
...
'--------------------------------------------------
GIP\Bitte Lösung eingeben:|Aufgabe 32:||100,100 'Position X = 100, Y = 100
(Pixel)
GIP\Bitte Verzeichnis eingeben:|Verzeichnisauswahl|c:\Test|100,100 'Vorgabe: "C:\Test", Position X = 100, Y = 100 (Pixel)
© 2006 by Delphin Software