|
alle öffnen
alle schließen
Nicht compiliert - . . geändert
|
|
Fehlermeldung zum Eingabefeld FEHLERMELDUNG ZUR EINGABE
von Rainer Becker
Im Maskengenerator kann man zu jedem Eingabfeld sowohl eine VALID-Funktion zum Überprüfen der Eingabe als auch eine ERROR-Funktion zum Anzeigen von entsprechenden Fehlermeldungen definieren. Wenn die VALID-Funktion .F. zurückgibt, wird die ERROR-Funktion automatisch aufgerufen. Sofern sehr viele Überprüfungen in der VALID-Funktion stattfinden oder mehrere kurze Fehlertexte zusammen angezeigt werden sollen, schreibe ich den Text in eine globale Variable mit dem Namen "M.CFEHLER" und gebe in der VALID-Funktion .F. zurück. Die ERROR-Funktion ruft dann "FEHLER()" auf:
Function Fehler
If type("m.cFehler") == "C" and ;
not empty(m.cFehler)
Clear Typeahead
Wait Window (m.cFehler) Nowait
Endif
m.cFehler = ""
Return .F.
Zusätzlich kann man vor der Meldung noch einen Ton mit "CHR(7)" einbauen. Interessant wird diese Vorgehensweise, wenn man mit mehrsprachigen Masken arbeitet. Der Fehleranzeigeroutine würde dann statt dem eigentlichen Text eine Eingabefehlernumern übergeben gemäß der dann der Fehlertext aus einer mehrsprachigen Datei geladen werden könnte.
|
|