[文本处理] [已解决]空格补位，把输出内容对齐的批处理

shenlong

a.txt 内容
aa  1232   米
bbbbb  66  米
想要把内容补空格后输出到 b.txt
aa          1232    米
bbbbb     66       米
以下我测试的代码，不能达到预期效果，请各位围观帮忙，先行谢过 。

@echo off
setlocal enabledelayedexpansion
set "k=                    "
(for /f "tokens=1-4  delims=  " %%a in (a.txt) do (
    set "n1=%%a" && set "n2=%%b" && set "n3=%%c" && set "n4=%%d"
    set a=!n1!%k% && set b=!n2!%k%  && set  c=!n3!%k%  && set  d=!n4!%k% 
    echo.  !a:~0,15! !b:~0,15! !c:~0,15! !d:~0,15! 
)) > b.txt
endlocal
复制代码

ppll2030

绝对对齐是做不到的。你把例子b.txt的内容复制到txt看看就明白了。
要绝对，那就导出为csv表格形式吧。那是绝对整齐

shenlong

回复 2# ppll2030


    多谢，实在不行了就换其它方法了。

qixiaobin0715

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1-2*" %%i in (a.txt) do (
    set f1=%%i                    
    set f2=%%j                    
    echo,!f1:~,20!!f2:~,20!%%k
)
pause
复制代码

shenlong

回复 4# qixiaobin0715

谢谢，还是没有达到预期效果，a.txt中 最左侧的 aa   bbbbb   长度是随机和不是固定的长度。

qixiaobin0715

回复 5# shenlong
没搞明白你所谓的“预期效果”是指什么？

aloha20200628

回复 1# shenlong

文本行的格式化输出，须确定最大列宽即最大字段长度。简单处理是由楼主预设一个最大列宽值，否则就要实时遍历整个文本文件获取其中最大字段长度...
给一个批处版本，代码如下》获取文本文件中的最大字段长度，假设字段分隔符是批处默认的空格、逗号、分号、等号和制表符。

@echo off &setlocal enabledelayedexpansion &set "maxZ=0"
for /f "delims=" %%a in (1.txt) do for %%s in (%%a) do (
	set/p="%%s"<nul>0.0
	for %%b in (0.0) do if %%~zb gtr !maxZ! set "maxZ=%%~zb"
)
echo,!maxZ!
del/q "0.0"&endlocal&pause&exit/b
复制代码

qixiaobin0715

只能这样勉为其难了：

@echo off
setlocal enabledelayedexpansion
type a.txt>temp
echo,a>>temp
set /a n=0,y=0
for /f "delims=:" %%i in ('findstr /o .* temp') do (
    set /a x=%%i-y
    if !n! lss !x! set /a n=x
    set y=%%i
)
del temp
for /l %%i in (1,1,!n!) do set BS= !BS!
for /f "tokens=1-2*" %%i in (a.txt) do (
    set f1=%%i!BS!
    set f2=%%j!BS!
    echo,!f1:~,%n%!!f2:~,%n%!%%k
)
pause
复制代码

aloha20200628

回复 1# shenlong

@echo off &setlocal enabledelayedexpansion &set "maxZ=0"
for /f "delims=" %%a in (1.txt) do for %%s in (%%a) do (
	set "s=%%s" & (call :_strLen s z)
	if !z! gtr !maxZ! set "maxZ=!z!"
)
set "ms=" &for /l %%n in (1,1,!maxZ!) do set "ms=!ms! "
endlocal &set "maxZ=%maxZ%"&set "ms=%ms%"
setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
	set "s="
	for %%s in (%%a) do (set "_s=%%s"&set "_s=!_s!%ms%"&set "s=!s!	!_s:~0,%maxZ%!")
	echo,!s:~1!
)
endlocal&pause&exit/b
:_strLen
   set "_str=_!%~1!" &set "_Len=0"
   for %%n in (64 32 16 8 4 2 1) do (
      if "!_str:~%%n,1!" neq "" (set/a "_Len+=%%n"&set "_str=!_str:~%%n!")
   )
   set "%~2=!_Len!" &exit/b
复制代码

特此备注》重写了原代码，改用批处 ‘原装’ 的字符串长度计算方法，再请出制表符 ‘显灵’，似乎消除了以前格式化输出时中英文字符混合字段的占位问题...

shenlong

回复 8# qixiaobin0715


    多谢，效果可以，就用这个了。

shenlong

回复 7# aloha20200628


    多谢帮助。

娜美

字节不同 要对齐  似乎只能改用制表符

awk  -v OFS="\t"  '{print $1,$2,$3}' a.txt
复制代码

qixiaobin0715

这样可能要美观一些：

@echo off
for /f "tokens=1-3" %%i in (a.txt) do (
    echo,%%i>>temp1
    echo,%%j>>temp2
)
set /a n1=n2=0,y1=y2=0
setlocal enabledelayedexpansion
for %%a in (1 2) do (
    echo,a>>temp%%a
    for /f "delims=:" %%i in ('findstr /o .* temp%%a') do (
        set /a x%%a=%%i-y%%a
        if !n%%a! lss !x%%a! set /a n%%a=x%%a
        set y%%a=%%i
    )
    del temp%%a
    set /a n%%a+=4
for /l %%i in (1,1,!n%%a!) do set BS%%a= !BS%%a!
)
(for /f "tokens=1-2*" %%i in (a.txt) do (
    if "%%j"=="" (set f1=%%i) else (set f1=%%i!BS1!&set f1=!f1:~,%n1%!)
    if "%%k"=="" (set f2=%%j) else (set f2=%%j!BS2!&set f2=!f2:~,%n2%!)
    set f3=%%k
    echo,!f1!!f2!!f3!
))>b.txt
pause
复制代码

aloha20200628

回复 11# shenlong

参考12楼的经验，谢谢 重写了9楼代码，用以下1.txt示例文件测试效果明显 楼主可试试...
1.txt》
aa  自x车 1232   米
mm命名  abc 5555  米
bbbbb  密码可靠 66  米
同轴3xx   国产321   456 米

shenlong

回复 14# aloha20200628


    万分感谢，达到预期效果。