The "old" way, a Morph asText, still works. I don't know if this is still fully usable with normal text operations:

|text block|
block := [ Morph new asText, ' some text'].
text:=(Smalltalk ui theme builder newTextEditorFor: block�� getText: #value setText: nil).
text openInWindow.