中国DOS联盟

各位大侠，大家是否有过如下的经历呢~！

在制作批处理表格的时候，若里面有变量的存在，则这样一个表格在编写的时候总是对不齐的。。因为变量有可能大或小。。
所以，我们在编写表格的时候，总是尽量避免在表格中使用变量，但一个好的批处理，若是因为如此就放弃了在表格中的变量使用，未免有点可惜了。
怕说得不够明白：举个例子。
假设现在有几个变量。
set /p name=
set /p add=
set /p phone=
我需要在屏幕上画一个表格。。
┍━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
┃ %name% %phone% ┃
┃ %add% ┃
┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛

就如此粗略表示一下，，那么大家在遇到这样的情况下的时候，是如何处理后面的线与上方对齐的问题的呢？
个人有个不成熟的想法。。但在处理中文和非英文的问题上遇到了问题。。
已知：制表格的线占两个字符，汉字占一个字符。英文和各类符号占用一个字符。
若变量全为英文或汉字，则该想法无问题。。
---------------------------------------------------------------------------------------------------------
1，假设我一行要画37个表格线。就是74个字符的距离。其中表格会用去4个字符。
2，变量所占用的空间，使用 for /l %%i in (0,1,1000) 来获取变量的字符数量。使该字符数不大于35 或 70。
3，然后利用 35 或 70 减去这个数量。获得需要画上的空格数量就得到了表格边线的距离答案。
---------------------------------------------------------------------------------------------------------
但，经常性的。我们写的变量是由中文+英文的结果。那么这种情况下如何正确的获得该变量的真实字符数。
呵，愿大家一起集思广益。解决这个难题，也愿大家画出比较好看的菜单（表格）出来。


谢谢 youxi01 ,lxmxn 。让我学到了新的知识。。

一个取文件大小，一个字符判断，（对assic修改一下估计就没有问题了）

[ Last edited by flyinspace on 2007-4-22 at 06:12 PM ]

对于中英文 结合的 变量的对齐，我们一般采用的做法当然是先要取得该变量的总字节数（这个工作一般由vbs来完成，当然 willsort似乎也写过用P处理的），然后再来对齐。
以下程序也用纯批处理来获取字节，不过在此没考虑特殊字符。原理很简单：如果某字符 大于 “Z” ，则认为它为汉字（同样，不处理特殊字符）。
欢迎测试，指正。

@echo off setlocal enabledelayedexpansion set name1=dos set add1=china123 set phone1=521 set name2=dos联盟 set add2=En中国EN set phone2=没有12 set name3=联盟 set add3=中国 set phone3=测试 set "space= " set str_=┍━━━━━━━━━━━━━━━━━━━━━━━┓ set str1_=┗━━━━━━━━━━━━━━━━━━━━━━━┛ set/a Lnum=15 echo %str_% echo ┃姓名 地址 电话 ┃ echo ┃ ┃ for /l %%i in (1 1 3) do ( set Tstr= for %%j in (name add phone) do ( set "str=!%%j%%i!" call :IsEn set/a Lnum=%Lnum%-!var! set str=!str!%space% call set str=%%str:~0,!Lnum!%% set Tstr=!Tstr!!str! ) echo ┃!Tstr! ┃ ) echo %str1_% pause>nul :IsEn set/a var=0 set/a flag=0 for /l %%i in (0,1,1000) do ( set tmp=!str:~%%i,1! if == goto :eof set/a flag+=1 if !tmp! GTR z set/a var+=1 )
测试结果如下：
┍━━━━━━━━━━━━━━━━━━━━━━━┓ ┃姓名 地址 电话 ┃ ┃ ┃ ┃dos china123 521 ┃ ┃dos联盟 En中国EN 没有12 ┃ ┃联盟 中国 测试 ┃ ┗━━━━━━━━━━━━━━━━━━━━━━━┛
将前面的内容，再换掉，测试如下：
┍━━━━━━━━━━━━━━━━━━━━━━━┓ ┃姓名 地址 电话 ┃ ┃ ┃ ┃dos我爱你 china123 521我爱她 ┃ ┃dos联盟 En中国EN 没有12 ┃ ┃女神,I love U 中国HOHO12 测试ENNDFNAS ┃ ┗━━━━━━━━━━━━━━━━━━━━━━━┛

按照兄的要求写的，可自行修改。

也请大家测试。

@echo off&SetLocal EnableDelayedExpansion set /p name=请输入姓名： set /p phone=请输入电话： set /p add=请输入地址： for %%i in (name phone add) do (call :GetLength "!%%i!" "%%i_len") set space= set yes=━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ set /a all_len=72-name_len-phone_len-10 set /a add_lens=72-add_len set _=echo= %_%┏%yes%┓ %_%┃%name%%space:~0,10%%phone%!space:~0,%all_len%!┃ %_%┃%add%!space:~0,%add_lens%!┃ %_%┗%yes%┛ del /q/f temp.tem pause&exit/b :GetLength set string=%~1 >temp.tem<nul set/p=%string% for %%i in (temp.tem) do set %~2=%%~zi goto :EOF

[ Last edited by lxmxn on 2007-4-22 at 04:39 PM ]

lxmxn兄写的漂亮就是空格还是不够长;再加长点;

你的试试:姓名:1电话:1地址:1;会出现异常;加长space;

Re bjsh:

多谢兄测试指出不足。代码已修正。

[ Last edited by lxmxn on 2007-4-22 at 04:41 PM ]

谢谢二楼和三楼的方案。。收益非浅。。

二楼的算法思想是：判断字符是否大于二。
而三楼的则是写入文件。。

在此有个问题。。

>temp.tem<nul set/p=%string%

这个 写日文件方案可以解释一下么？？

不知道原来还可以这样用的。

>temp.tem<nul set/p=%string%

相当于

set /p=%sring% <nul >temp.tem

set /p=%sring% <nul 这个是 在控制台上输出 %string%;

定向到temp.tem 不换行;

通常 set /p 变量名=提示字符串:

来获取输入;在这里用<nul来赋予一个空字符串;

效果就是屏蔽用户输入;只显示提示字符串;常用来输出不换行;此时变量名可省

[ Last edited by bjsh on 2007-4-22 at 06:29 PM ]

lxmxn兄就是利用这个把不含回车符的字符串重定向到文件;
再利用%~za来获取字节数;
这时候当然就没有汉字与字母之分了

Originally posted by flyinspace at 2007-4-22 18:07:
在此有个问题。。

>temp.tem<nul set/p=%string%

这个 写日文件方案可以解释一下么？？

不知道原来还可以这样用的。

“>temp.tem<nul set/p=%string%”的作用和“set/p=%string%>temp.tem<nul”相同， 其实就是语句的位置替换了，但是作用都是一样的。
类似的语句还有很多，只要兄认真实践总结，方法很多的。

比如:
>1.txt echo Hello,world.
和
echo Hello,world.>1.txt
的作用相同。

原来bjsh已经提前发了，算我灌水了。

首先谢谢两位的回答，

让我知道了原来 ><还可以使用倒装句。。

又多了新的方法了：）

九宫格的连接呀。已经看过了，不过偶看不懂。

算法我看懂了？但这个有什么用？？

和主题完全没有关系啊？