请问在RTF域中填写信息时，如何才能实现自动换行的功能？

[xuxinyu2002]

我在RTF域中输入信息时，由于RTF域的宽度是一定的输入的信息如果很多的话他就会自动换行，可是将
它里面的信息赋给一个文本域时（属性是计算的），显示却是一行，我想让它显示的和它在RTF与中显示的相同，例如：我在RTF中输入
三结合放松进口货粉碎机咖啡壶科技界夸海口花括号别进口兵舰不仅仅编辑部搅拌机编辑
部紧巴巴搅拌机不仅仅编辑部搅拌机编辑部搅拌机编辑部搅拌机编辑部搅拌机编辑部搅拌
机编辑部结核病搅拌机环保局海基会结核病搅拌机环保局环保局搅拌机北
（没有进行手动换行）
我希望在文本域中也是这么显示：
三结合放松进口货粉碎机咖啡壶科技界夸海口花括号别进口兵舰不仅仅编辑部搅拌机编辑
部紧巴巴搅拌机不仅仅编辑部搅拌机编辑部搅拌机编辑部搅拌机编辑部搅拌机编辑部搅拌
机编辑部结核病搅拌机环保局海基会结核病搅拌机环保局环保局搅拌机北


请问如何实现？
在线等！！！！！！！！！

[xuxinyu2002]

不会吧

[xuxinyu2002]

up

[our307]

应该可以的啊，如果不行，看看帮助中RichItem中有一个换行的函数。调用下。

[xuxinyu2002]

TO our307: 我在帮助中没有找到RichItem，更没有找到换行的函数？
你能告诉我那个换行的函数吗？急！

[Zerotm]

写LS,然后以一定字符长度去截取原RTF域中的文本,以多值的方式赋值给一个文本域,在文本域中用新行来显示多值就行了.

[xuxinyu2002]

TO Zerotm： 写什么LS呀，我不太明白，你能说得详细一点吗？

[tsynbu]

试试文本域的属性中允许多值，然后在多值选项中 把输入、显示数据时的分隔符选上新行。
试试吧，也不知道行不行。

[xuxinyu2002]

我试了不可以

[baihu0]

我只知道如果全部是英文是才不能自动换行。我用的是R5.08

[xuxinyu2002]

up

[xuxinyu2002]

up

[ibm123]

将文本域同样固定宽度不行吗？或者将文本域放在固定宽度的表格中。

[xuxinyu2002]

这些我都试了，可是就是控制不住呀，有没有我其他的办法呀

[zhuyimao]

用:Replace(item.Text,Chr(13),"<br>")

[zk104]

up

[心雪峰]

我这里有个例子:
先创建个 workContent 域.
在创建个计算文本,公式如下:

info:=@ReplaceSubstring(workContent;@Char(13);"<br>");
info:=@ReplaceSubstring(info;" ";" ");
@If(@IsDocBeingEdited;"<textarea name='workContent' rows='6' cols='50' style='width:100%;'>"+workContent+"</textarea>";info)

思路与楼上的兄弟的是一样的.

[baijing2000]

这个问题你解决了吗？回个信息啊