sample - string read char.pas

来自「最新版 JCL+JVCL控件！非常不错的控件资源。包含了所能用到的大部分功能！」· PAS 代码 · 共 7 行

var
  S: string;
begin
  //[translated]:
  Result := 'Greetings' + #13;
end;