equal
deleted
inserted
replaced
1843 ! |
1843 ! |
1844 |
1844 |
1845 initStyle |
1845 initStyle |
1846 "setup viewStyle specifics" |
1846 "setup viewStyle specifics" |
1847 |
1847 |
|
1848 <resource: #style (#'editField.cursorType' |
|
1849 #'editField.cursorForegroundColor' |
|
1850 #'editField.cursorBackgroundColor' |
|
1851 )> |
|
1852 |
1848 super initStyle. |
1853 super initStyle. |
1849 |
1854 |
1850 "/ DefaultFont notNil ifTrue:[font := DefaultFont on:device] |
1855 "/ DefaultFont notNil ifTrue:[font := DefaultFont on:device] |
1851 |
1856 |
1852 DefaultBackgroundColor notNil ifTrue:[ |
1857 DefaultBackgroundColor notNil ifTrue:[ |
2175 ! ! |
2180 ! ! |
2176 |
2181 |
2177 !EditField class methodsFor:'documentation'! |
2182 !EditField class methodsFor:'documentation'! |
2178 |
2183 |
2179 version |
2184 version |
2180 ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.177 2005-12-05 16:32:22 ab Exp $' |
2185 ^ '$Header: /cvs/stx/stx/libwidg/EditField.st,v 1.178 2006-02-22 15:00:43 cg Exp $' |
2181 ! ! |
2186 ! ! |