问题：如何改变RichEdit的行间距？（无内容）

Question

如何改变RichEdit的行间距？

Answer 1

RichEdit控件好像不可以，不过
RxLib 中的RxRichEdit控件可以，它的属性Paragraph有SpaceBefore
和SpaceAfter的属性。可以调整段间距，LineSpacing和LineSpacingRule可调整行间距。
你可以下载一个

Answer 2

你下载一下woll2woll公司的infopower3000,里边有个wwrichedit很好用。

Answer 3

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ComCtrls,richedit;type
  TForm1 = class(TForm)
    RichEdit1: TRichEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
var
  x:TParaFormat2;
begin
  RichEdit1.SelStart := 0;
  RichEdit1.SelLength := Length(RichEdit1.Text);
  x.cbSize := sizeof(TParaFormat2);
  x.dwMask := PFM_LINESPACING;
  x.bLineSpacingRule := 5;
  x.dyLineSpacing := 60;
  SendMessage(RichEdit1.Handle,EM_SETPARAFORMAT,0,Integer(@x));
end;end.