如何禁止RICHTEXT控件自动换行?
问题描述:
如何禁止RICHTEXT控件自动换行?
解决方案:
第一步:声明外部函数:
Function ulong SendMessage(ulong hwnd,ulong wMsg,ulong wParam,ulong lParam) LIBRARY "user32.dll" ALIAS FOR "SendMessageA"
第二步:在一个按钮里写脚本:
SendMessage(ole_1.object.Hwnd,1096, 0, 1)
第三步:测试---先在RICHTEXT控件中写若干行东西,然后点按钮,可以看到这些多行自动变成一行,并且不会再自动换行;
补充:如果想再恢复成自动换行,请参考下文,我没有继续编写:
《将RichTextBox设置为自动换行或非自动换行》
http://www.csdn.com.cn/program/3411.htm