将一组数字转换为String

Question

我想将数字从保存MySet = set of 1..8到MyString : String。是否有类似的功能IntToStr可以做到这一点？

我有一个调度程序，它以形式接收一个字符串(* * * * * * * *)。星号之一代表执行日期，并且MySet是日期列表。例如1是星期一，2是星期二。我必须将数字从集合保存到该字符串，所以它看起来像这样：(0 0 15 * * * 1,2,3 *)。这意味着调度程序将在每个星期一，星期二，星期三15:00触发。

如果您想了解更多有关此格式的信息，请访问： http : //www.nncron.ru/help/ZH/working/cron-format.htm

Answer 1

使用for..in迭代器生成所需的字符串：

Type
  MySet = set of 1..8;

function MySetToString(const s: MySet): String;
var
  i: Integer;
begin
  Result := '';
  for i in s do begin
    Result := Result + IntToStr(i) + ',';
  end;
  SetLength(Result,Length(Result)-1);
end;