如何在delphi 7中的单个语句中添加StringList中的不同字符串？

var
  SL: TStringList; // 存储待添加字符串的列表
  I: Integer; // 循环变量
  S: String; // 待添加的字符串
begin
  SL := TStringList.Create; // 创建 TStringList 组件
  try
    // 添加不同字符串到 SL 列表中
    for I := 0 to 10 do
    begin
      S := 'Hello, world!' + IntToStr(I);
      SL.Add(S);
    end;
    // 输出添加后的列表
    ShowMessage('SL: ' + SL.ToString);
  finally
    SL.Free;
  end;
end;

var
  SL: TStringList; // 存储待添加字符串的列表
  I: Integer; // 循环变量
  S: String; // 待添加的字符串
begin
  SL := TStringList.Create; // 创建 TStringList 组件
  try
    // 添加不同字符串到 SL 列表中
    for I := 0 to 10 do
    begin
      S := 'Hello, world!' + IntToStr(I);
      SL.Items.Add(S);
    end;
    // 输出添加后的列表
    ShowMessage('SL: ' + SL.ToString);
  finally
    SL.Free;
  end;
end;