XBPMLE Feldlänge begrenzen?
Verfasst: Mo, 24. Apr 2017 13:39
Hallo,
kann man bei einem XBPMLE auf eine Variable die Feldlänge begrenzen?
Gruß Stefan
kann man bei einem XBPMLE auf eine Variable die Feldlänge begrenzen?
Gruß Stefan
Das deutschsprachige Forum für Entwickler in der Xbase-Welt, ein Angebot des Deutschsprachige Xbase-Entwickler e. V.
https://xbaseforum.de/
wie Manfred vorschlug kannst du ja die Position des Cursor ermitteln und darauf reagieren.mini990 hat geschrieben:kann man bei einem XBPMLE auf eine Variable die Feldlänge begrenzen?
Code: Alles auswählen
::oMemotext:keyBoard := {|nKey, uNIL, oSelf| ::MyKey(nKey,oSelf) }
METHOD CalDetail:MyKey(nKey,oMLE)
LOCAL nEnde := oMLE:pos()
LOCAL nLine := oMLE:lineFromChar(nEnde)
LOCAL nZeil := oMLE:charFromLine(nLine)
LOCAL cText := "Row "+LTRIM(STR(nLine))+" / Col "+LTRIM(STR(nEnde-nZeil))
LOCAL cKey := UPPER(CHR(nKey))
DO CASE
CASE nLine > 100
// do what you want
CASE nKey = xbeK_CTRL_Z
oMLE:undo()
ENDCASE
// Statusbar
::StatText:SetCaption(cText)
RETURN self