Smalltalk - 插入 TAB 字符 (Visual Works)

Question

我在两个字符串之间插入制表符时遇到一些问题。

stringOne := 'Name'.
stringTwo := 'Address'.

我已经尝试过：

info := stringOne, String tab, stringTwo.

或

info := stringOne, Character tab asString, stringTwo.

但这两条消息都不被理解。我正在使用视觉作品。

Answer 1

基于 WriteStream 的解决方案（它有点冗长，但可以很好地扩展，您可以在循环中使用它，例如 do:separatedBy）

ws := (String new:50) writeStream.
ws
    nextPutAll: stringOne;
    tab;
    nextPutAll: stringTwo.
info := ws contents.

或者如果您真的喜欢一个衬垫代码：

info := (String new writeStream) nextPutAll: stringOne; tab; nextPutAll: stringTwo; contents.

Answer 2

Goog 为您提供了一种制作包含选项卡的字符串的方法

String with: Tab

，您自己发现 Tab 在 VisualWorks 中无法理解，应该替换为

Character tab

因此将这两个东西放在一起 在工作区中评估以检查它给出一个包含制表符的字符串

String with: Character tab

，然后在您的串联中使用它

info := stringOne, (String with: Character tab), stringTwo.

（如果您要进行大量串联，则使用 WriteStream 而不是 ,）

Answer 3

我没有 Visual Works 来检查，但在 IBM Smalltalk 中 Tab（注意大小写）是制表符。
也许试试这个：

info := stringOne, Tab asString, stringTwo.

---

编辑（回复：您的评论）：

好的，要么 Tab 不是制表符的正确名称，或者您的字符类不响应 asString
尝试查看 Tab class 为您提供了什么，如果它回答“字符”，那么您只需要了解如何在 VisualWorks 中将字符更改为字符串即可。如果它没有回答“字符”，那么我们还没有在 VisualWorks 中找到制表符的正确名称。

---

edit2：

我不知道在 Visual Works 中将字符转换为字符串的简短方法，所以这里有一个应该可行的解决方案。这就是 asString 无论如何都会做的事情：
由于您可能想多次使用它，因此可以将其保存为字符串，

tabString := String with: Tab.
info := stringOne, tabString, stringTwo

Answer 4

使用宏展开最短：

info := '<1s><T><2s>' expandMacrosWith: one with: two