equal
deleted
inserted
replaced
973 representation to the actual object value and vice versa. |
973 representation to the actual object value and vice versa. |
974 The default converter is nil, meaning no-conversion |
974 The default converter is nil, meaning no-conversion |
975 (i.e. the edited object is the string itself." |
975 (i.e. the edited object is the string itself." |
976 |
976 |
977 converter := aConverter |
977 converter := aConverter |
|
978 |
|
979 " |
|
980 |field model| |
|
981 |
|
982 model := 0.5 asValue. |
|
983 field := EditField new. |
|
984 field model:model. |
|
985 field converter:(PrintConverter new initForNumber). |
|
986 model onChangeEvaluate:[ Transcript showCR: model value ]. |
|
987 field open. |
|
988 " |
|
989 |
|
990 "Modified (comment): / 24-08-2017 / 16:16:20 / cg" |
978 ! |
991 ! |
979 |
992 |
980 crAction:aBlock |
993 crAction:aBlock |
981 "define an action to be evaluated when the return key is pressed." |
994 "define an action to be evaluated when the return key is pressed." |
982 |
995 |