将数组合并成一行，由指定的分隔符分隔.
_ArrayToString($var_array[,$var_sdelim="|"[,$var_istart=0[,$var_iend=0]]])
参数
$var_array |
数组合并 |
$var_sdelim |
[可选] 元素之间的分隔符(一个或几个字符)，默认| |
$var_istart |
[可选] 索引数组a，从中开始合并 |
$var_iend |
[可选] 索引数组a，其中完成合并 |
返回值
成功: |
返回一个包含由分隔符分隔的合并选定单元格的字符串. |
错误: |
返回一个""(空字符串)，设置@error： |
1 - 数组$var_array不是数组om |
|
2 - $var_istart大于$var_iend |
|
3 - 数组$var_array不是一维数组om |
该函数可以通过命令调用 exect
参见:
exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD|EEE|FFF','|',2)||_ArrayDisplay($var_aa)||$var_ss=_ArrayToString($var_aa,@TAB,1,5)||MsgBox(4096+64,'Результат','$var_ss') ;; 例如，将数组的数组A组合在一行，分离@TAB
exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2))||_ViewValues($var_ap)||$var_ss=_ArrayToString($var_ap,@CRLF,1)||_ViewValues('$var_ss ')||FileWrite('c:\Test\anagam.txt','$var_ss') ;; 在对话框中输入的单词中创建一个卦，在每个阶段查看结果，并保存到anagam.txt文件中(卦语包含单词，排列给定单词的所有字母，而不重复字母和确切长度)
exect=$var_s=##[input=BOX72]||FileWrite('c:\Test\anagam.txt',_ArrayToString(_ArrayPermute(StringSplit('$var_s','"''"',2)),@CRLF,1)) ;; 在对话框中输入的单词中创建一个卦，并保存到anagam.txt文件
exect=$var_s=##[input=BOX72]||FileWrite('c:\Test\anagam_'&'$var_s'&'.txt',_ArrayToString(_ArrayPermute(StringSplit('$var_s','"''"',2)),@CRLF,1)) ;; 在对话框中输入的单词中创建一个卦，并保存到文件anagam_word.txt
imgpr=1 exect=$var_s=ClipGet()||$var_sz=(_ArrayToString(_ArrayPermute(StringSplit('$var_s','"''"',2)),'~~',1)) bufsr=##$var_sz||formt<sps36> ;; 将剪贴板中的单词写成剪贴板，每行分割10个单词。如果一个字超过10个字符，需要很长时间才能创建一个卦
imgpr=1 exect=$var_sz=(_ArrayToString(_ArrayPermute(StringSplit(ClipGet(),'"''"',2)),'~~',1)) bufsr=##$var_sz||formt<sps36> ;; 将剪贴板中的单词写成剪贴板，每行分割10个单词。如果一个字超过10个字符，需要很长时间才能创建一个卦
imgpr=1 exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2),'"''"',1)||$var_af=FileReadToArray('C:\dictionary.txt')||$var_ae=_ArrayDublElem($var_ ap,$var_af,1)||$var_s=_ArrayToString($var_ae,@CRLF) bufsr=##$var_s ;; 发送到剪贴板在对话框中输入的作为字典dictionary.txt的一部分的单词的所有单词(该列表包括单词，具有给定单词的所有字母的排列而不重复字母和精确长度)
exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(FileRead(@CRLF&'C:\dictionary.txt'&@CRLF),'[\r\n](['&'$var_s'&']+)[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; 发送到剪贴板的所有单词组成的字母输入在对话框中，这是字典dictionary.txt的一部分(该列表包含单词，排列所有给定的集合字母重复的字母没有确切的长度)
exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(@CRLF&FileRead('C:\dictionary.txt')&@CRLF,'[\r\n](['&'$var_s'&']{3,6})[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; 发送到剪贴板的所有单词形成从字母dictionary.txt的一部分在对话框中输入的字母(该列表包括字母，排列所有字母的重复的字母和长度为5个字符)
exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(@CRLF&FileRead('C:\dictionary.txt')&@CRLF,'[\r\n](['&'$var_s'&']{5})[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; 发送到剪贴板的所有单词组成的字母在字典dictionary.txt的对话框中输入的字母(该列表包括字，排列所有的字母，重复的字母和长度从3到6个字符)
exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(@CRLF&FileRead('C:\dictionary.txt')&@CRLF,'[\r\n](['&'$var_s'&']{[input=BOX74],[input=BOX75]})[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; 发送到剪贴板的所有单词组成的字母在对话框中输入的字典dictionary.txt的一部分(该列表包括单词，排列所有字母的重复的字母和长度在对话框中设置)
sends=c:\файл-список№1.txt??-1 exect=$var_s='' <FOR> 1 <TO> GLOBALSENDS<0> xends=c:\документ№2.txt??-1||formt<0!!(?m)(GLOBALSENDS<:INDEX:>.+)> exect=$var_s=GLOBALXENDS<0>>=6?'$var_s'&_ArrayToString($GLOBALXENDS,@CRLF,1)&@CRLF:'$var_s' <NEXT> asave=var_s||c:\документ№2_rez.txt||noarray<1> ;; 检索从文件c的所有行：\dokument№2.txt其中存在从文件c短语：\文件spisok№1.txt(行数是多或6)和将结果写入文件c:\dokument№2_rez .TXT
© Аверин Андрей для Total Commander Image Averin-And@yandex.ru