Html 在TWebLabel标题中设置换行符换行符的方法

发布于10月24日

通常人们会在运行时将其设置为:

Label1.Caption := 'First line' + #13#10 + 'SecondLine';

但出于某种原因，即使您打开或关闭WordWrap，这似乎也不起作用.

在运行时在TMS Web Core中创建换行符的解决方案是什么？

推荐答案

第一个音符.你可以用sLineBreak代替#13#10.sLineBreak是在System单位中定义的常量:

const
   sLineBreak = {$IFDEF POSIX} _AnsiStr(#10) {$ENDIF}
       {$IFDEF MSWINDOWS} _AnsiStr(#13#10) {$ENDIF};

我在我这边的TMS Web Core上测试了换行符.由于某些原因，TWebLabel似乎不支持换行符(#13#10).它在其他控件中也可以使用，例如TWebMemo.

我做了个测试.这是我试图把它加到TWebLabel和TWebMemo上，你可以看到它在备忘录上起作用，但在标签上不起作用:

WebLabel1.Caption := 'First line' + sLineBreak + 'SecondLine';
WebMemo1.Text := 'First line' + sLineBreak + 'SecondLine';

然而，有一种方法.您可以使用以下选项:

WebLabel1.ElementHandle.innerHTML := 'First line' + '<br>' + 'SecondLine';

<br>是linebreak，它可以工作:

实用课程推荐