Resourcen
Übersicht
Programmierung
Schulungen
Projektabwicklung
Consulting & Coaching
Tools und AddOns zu FoxPro
Frameworks für Visual FoxPro
Grafik und Berichtsausgabe
Installation und Dokumentation
Sicherheit und Übertragung
Standardsoftware in FoxPro
Bücher und Zeitschriften
dFPUG Service
dFPUG Regionaltreffen
dFPUG Online
MS Most Valuable Professionals
Microsoft Certified Professionals
Bücher
Presse
Stellen
Tipps

alle öffnen    alle schließen


Nicht compiliert - . . geändert
 

Message löschen

MESSAGE LÖSCHEN

von Rainer Becker

Die MESSAGE-Texte von Feldern in modalen Masken überschreiben die Meldungszeile von FoxPro und restaurieren die Meldungszeile leider nicht, wenn man die Maske wieder verläßt. Es steht also ein Text in der Meldungszeile der ggf. überhaupt nicht zu dem derzeit aktiven Eingabefeld gehört. In der CLEANUP-Klausel einer modalen Maske rufe ich deshalb immer "=CLRMSG()" auf:

Function ClrMsg
Private cOutput
m.cOutput = Woutput()
Activate Screen
[at] Srows()-1,0 Clear to ;
Srows()-1,Scols()-1
If not Empty(m.cOutput)
Activate Window (m.cOutput)
Endif
Return

Diese kleine Funktion löscht immer die letzte Bildschirmzeile. Sofern Sie mit "SET MESSAGE TO" die Position der Meldungszeile geändert haben oder gar die Meldungen in einem gesonderten Fenster ausgeben, kann man diese Funktion natürlich nicht mehr verwenden.

FUCHS 4/93