var s:TStringList; i:Integer;begin s:=TStringList.Create; for i:=1 to 5 do begin s.Add(IntToStr(i)); end;end;比如上边这个Ctrl+F7然后输入s[0] 回车是第一个元素s[1]是第二个，依次类推。
Ctrl+F7，然后输入TStringLIst.commatext
