delphi 能不能把TStringList里的内容，保存到剪切板里，可以粘贴到别的地方？

delphi 能不能把TStringList里的内容，保存到剪切板里，可以粘贴到别的地方？

  sl := TStringList.Create;
  sl.Clear;
    sl.add('1');
    sl.add('2');
    sl.add('3');    

1
2
3

能不能一这样的格式粘贴到别的地方。

或者有其他的好办法啊！

你的意思是全部？

str := s1.CommaText;
Clipboard.SetTextBuf(PChar(str));