Question

Delphi7的RichEdit问题

Delphi7中Edit控件
SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle,GWL_STYLE) Or ES_RIGHT);
Edit1.Invalidate ;
就可以重画Edit 使光标在右边
但是
SetWindowLong(RichEdit1.Handle,GWL_STYLE,GetWindowLong(RichEdit1.Handle,GWL_STYLE) Or ES_RIGHT);
RichEdit1.Invalidate ;
重画RichEdit 失效使 光标还是在左边
为什么会这样？
SetWindowLong(RichEdit1.Handle,GWL_STYLE,GetWindowLong(RichEdit1.Handle,GWL_STYLE) Or ES_RIGHT);
RichEdit1.Invalidate ;
重画RichEdit 失效 光标还是在左边
为什么会这样

在线等

Answer 1

一个光标位置,用的着这么复杂吗?
如果想排出WORD一类的文本版面,用RichEdit文本框,肯定不行.首先,是它不能中英混排,也就是一行文字之中,如果你用上奇数个英文字符或者数字,右边就不是整齐的了.

Answer 2

不行就用Memo吧，Memo可以正常实现！

追问

那为什么RichEdit不行？是不是有什么属性要设置？ Memo是可以.但我想用RichEdit
在线等

追答

RichEdit：Tobject......TCustomEdit---TCustomMemo---TCustomRichEdit--TRichEdit
Memo :Tobject......TCustomEdit---TCustomMemo---TMemo
这个需要去看下TMemo类是如何实现右对齐的，找到它的方法，再改写TRichEdit，相当于要改写控件了，花那么多的精力还不如直接换控件，本身delphi就是控件的堆积，遇到不合适的就换。

Answer 3

so7doq7fso7doq7f

Answer 4

在win32的控件页里面有个trichedit，不知道是不是你要的控件。