EditField.st
changeset 6524 82b5d7bec604
parent 6516 1df1200a6040
child 6694 9422f9cb3c30
equal deleted inserted replaced
6523:88ade82f7c35 6524:82b5d7bec604
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 1990 by Claus Gittinger
     4  COPYRIGHT (c) 1990 by Claus Gittinger
     3 	      All Rights Reserved
     5 	      All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
   880 
   882 
   881     acceptIfUnchanged := aBoolean
   883     acceptIfUnchanged := aBoolean
   882 !
   884 !
   883 
   885 
   884 acceptOnLeave
   886 acceptOnLeave
   885     "returnr the acceptOnLeave flag. The default is false.
   887     "return the acceptOnLeave flag. The default is false.
   886      If true, leaving the box (via return, cursor etc.) accepts my 
   888      If true, leaving the box (via return, cursor etc.) accepts my 
   887      string into the valueHolder (if any).
   889      string into the valueHolder (if any).
   888      (actually, the set of keys can be specified with #leaveKeys:)"
   890      (actually, the set of keys can be specified with #leaveKeys:)"
   889 
   891 
   890      ^ acceptOnLeave 
   892      ^ acceptOnLeave
       
   893 
       
   894     "Modified (comment): / 12-02-2019 / 10:25:50 / Stefan Vogel"
   891 !
   895 !
   892 
   896 
   893 acceptOnLeave:aBoolean
   897 acceptOnLeave:aBoolean
   894     "set/clear the acceptOnLeave flag. The default is false.
   898     "set/clear the acceptOnLeave flag. The default is false.
   895      If true, leaving the box (via return, cursor etc.) accepts my 
   899      If true, leaving the box (via return, cursor etc.) accepts my