TRichEdit - 如何添加尺寸變化的空行？

Question

我有一些字符串數組，我想在其中一些字符串之間添加一個較小的空行。 所以我有一個代碼：

  const _n=#13#10;
  //...
  r1.Lines.Clear;
  r1.SelAttributes.Size:=18;
  r1.SelText:='TEST';
  r1.SelAttributes.Size:=6;
  r1.SelText:=_n+'............';
  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test1';
  r1.SelAttributes.Size:=6;
  r1.SelText:=_n+' ';
  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test2';

和大小更改適用於第一行（帶點），但test1和test2之間的行具有相同的大小，因為它們（18）不知何故=

有什么建議么？

Answer 1

我找到了一些解決方法：可以使用制表符號代替空格。

所以下面的代碼工作正常：

  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test1';
  r1.SelAttributes.Size:=6;
  r1.SelText:=_n+#9; // <- tab here
  r1.SelAttributes.Size:=18;
  r1.SelText:=_n+'test2';

Answer 2

您可以通過向Richedit發送EM_SETPARAFORMAT消息來更改單行的行間距，而不是插入空行。 看到這個問題

如何減少tRichEdit的行間距

舉個例子。 要增加行間距，請更改“Para.dyLineSpacing”的值。 使用“500”來了解效果。