::#################################################################################################
::1.3.1 删除元素,包括相同的重复元素
::call :_job_arr_Del_fun _job_Del_array_var _job_Del_item_var _job_arr_delims
::#################################################################################################
goto :eof
:_job_arr_Del_fun
setlocal enabledelayedexpansion
::数组变量名
if "%1"=="" goto _job_arr_Del_end
set _job_Del_array=%1
::数组变量值
set _job_tmp_var=%%%1%%
call set "_job_Del_array_val=%_job_tmp_var%"
if "%_job_Del_array_val%"=="" goto _job_arr_Del_end
::要删除的元素
set _job_tmp_var=%%%2%%
call set _job_Del_item=%_job_tmp_var%
::数组分隔符
set _job_arr_delims=%_JOB_ENV_DEF_FILE_DELIMS%
set _job_tmp_var=%%%3%%
if not "%3"=="" (
call set "_job_arr_tmp=!_job_tmp_var!"
if not "!_job_arr_tmp!"=="" set _job_arr_delims=!_job_arr_tmp!
)
set _job_Del_array_val=%_job_arr_delims%%_job_Del_array_val%%_job_arr_delims%
set _job_Del_item=%_job_arr_delims%%_job_Del_item%%_job_arr_delims%
::删除所有已经存在的相同的值
:_job_arr_Del_loop
set _job_Del_array_tmp=!_job_Del_array_val!
set _job_Del_array_val=!_job_Del_array_val:%_job_Del_item%=%_job_arr_delims%!
if "!_job_Del_array_tmp!"=="!_job_Del_array_val!" goto _job_arr_Del_loop_end
goto _job_arr_Del_loop
:_job_arr_Del_loop_end
::去掉两端多余的分隔符
if "%_job_Del_array_val%"=="" goto _job_arr_Del_ok
set _job_Del_array_val=%_job_Del_array_val:~1,-1%
:_job_arr_Del_ok
endlocal&set %_job_Del_array%=%_job_Del_array_val%
goto :eof
:_job_arr_Del_end
endlocal
goto :eof