** 如何禁止 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设置为自动换行或非自动换行》