当前位置: 首页 > news >正文

freepascal支持多行字符串

最近看fpcsrc(fpc trunk-3.3.1)源码发现freepascal已支持多行字符串,默认是禁用的,如要启用多行字符串用:
{$$modeswitch MULTILINESTRINGS} 

多行字符串前后用`

  s:String=`freepascal多行字符测试还真行的哦`;

完整测试代码:

unit Unit1;{$mode objfpc}{$H+}
{$$modeswitch MULTILINESTRINGS}
interfaceusesClasses, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls;type{ TForm1 }TForm1 = class(TForm)Memo1: TMemo;procedure FormCreate(Sender: TObject);privatepublicend;varForm1: TForm1;s:String=`freepascal多行字符测试还真行的哦`;
implementation{$R *.lfm}{ TForm1 }procedure TForm1.FormCreate(Sender: TObject);
beginMemo1.Lines.Add(s);
end;end.

QQ_1764810155258

 如果加:

{$MultiLineStringTrimLeft auto} //消除左边空格
  s:String=`freepascal多行字符测试还真行的哦`;

QQ_1764810643406