_ArrayPermute

首页后退前进

_ArrayPermute

返回指定数组的所有元素的数组排列。

_ArrayPermute($var_array[,$var_sdelim=''[,$var_istart=0]])

参数

返回值

成功：	返回数组排列
	$var_array [0]包含返回的行数。
	剩下的元素($var_array [1]，$var_array [2] ... $var_array [n])包含排列。
错误：	返回0集@error:
@error:	1 - 数组$var_array不是数组om
	2 - 数组$var_array不是一维数组om

注释:

所使用的数组必须具有零的初始索引，即在第一个元素$array [0]中不包含维度计数器。它是基于Alexander Bogomolny的算法。 http://www.bearcave.com/random_hacks/permute.html

该函数可以通过命令调用 exect

例子

exect=$var_aa=StringSplit('1|2|3|4','|',2)||$var_ap=_ArrayPermute($var_aa,'-')||_ArrayDisplay($var_ap) ;; 例如返回数组作为$指定的所有元素数组作为$var_aa的var_ap排列

exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2))||_ViewValues($var_ap) ;; 在对话中输入的单词的形式以数组a的形式。 (卦语包括单词，排列给定单词的所有字母，而不重复字母和确切的长度)

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个字符，需要很长时间才能创建一个卦

exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2),'"''"',1)||_ViewValues($var_ap) ;; 返回输入字的字母的数组排列，而不将数量添加到第1个元素

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的一部分的单词的所有单词(该列表包括单词，具有给定单词的所有字母的排列而不重复字母和精确长度)