如何禁止RICHTEXT控件自动换行？（改编）

<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>

<script type="text/javascript"> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>

如何 禁止 RICHTEXT 控件自动换行？

问题描述：

如何 禁止 RICHTEXT 控件自动换行？

解决方案：

第一步：声明外部函数：

FunctionulongSendMessage(ulonghwnd,ulongwMsg,ulongwParam,ulonglParam)LIBRARY"user32.dll"ALIASFOR"SendMessageA"

 

第二步：在一个按钮里写脚本：

 

SendMessage(ole_1.object.Hwnd,1096,0,1)

 

第三步：测试---先在 RICHTEXT控件中写若干行东西，然后点按钮，可以看到这些多行自动变成一行，并且不会再自动换行；

 

补充：如果想再恢复成自动换行，请参考下文，我没有继续编写：

《将 RICHTEXTBox设置为自动换行或非自动换行》

http://www.csdn.com.cn/program/3411.htm

 
<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>

<script type="text/javascript"> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>