Code: Alles auswählen
@ oDialogZusatz:nOben,oSysPara:skaliereXbParts(5) DCBROWSE oDialogZusatz:oBrowseUnterricht;
DATA oDialogZusatz:aBrowseUnterricht;
EDIT xbeBRW_ItemSelected MODE DCGUI_BROWSE_EDITEXIT;
ITEMMARKED {|| oDialogZusatz:itemmarkedbrowse("browse2"),;
dc_getrefresh(getlist),;
dc_getorigset(getlist);
};
NOSOFTTRACK;
OPTIMIZE;
PARENT oDialogZusatz:oRahmenBrowse2;
SIZE DCGUI_PARENTWIDTH-oSysPara:skaliereXbParts(10),DCGUI_PARENTHEIGHT - oDialogZusatz:nOben
DCBROWSECOL OBJECTVAR datum;
GOTFOCUS {|uNIL1,uNIL2,o| oDialogZusatz:pruefeArrayUnterricht(o,"rein")};
HEADER "Datum";
LOSTFOCUS {|uNIL1,uNIL2,o| oDialogZusatz:pruefeArrayUnterricht(o,"raus")};
PARENT oDialogZusatz:oBrowseUnterricht
PS: Gotfocus feuert erst, wenn die Zelleingabe mit Return beendet wird. Müßte das nicht sein, sobal die Zelle zur Eingabe aktiviert wird?