delphi7中,richedit控件的对齐方式属性更改无效果

delphi7中,richedit控件的对齐方式属性更改无效果,第1张

RichEdit1.Paragraph.Alignment := TAlignment(2) 居中

RichEdit1.Paragraph.Alignment := TAlignment(0) 左对齐

RichEdit1.Paragraph.Alignment := TAlignment(1) 右对齐

RichEdit1.SelectAll

RichEdit1.Paragraph.Alignment:=taLeftJustify// switch for other alignments

RichEdit1.SelLength:=0

窗体的OnCreate或OnShow 中加入(适合少数Edit右对齐情况):

SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle,GWL_STYLE) or Es_right)


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/11787318.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-18
下一篇 2023-05-18

发表评论

登录后才能评论

评论列表(0条)

保存