F
forgot2000
Unregistered / Unconfirmed
GUEST, unregistred user!
想做一个文本文件规范调整程序，具体说明如下：
读写一个文本文件，要求：指定的字符匹配对齐。象这样，如C:/File.txt，内容如下：
djfkjsa
begin
begindafjdsjf
begin
fddsfjkdsjf;sd
end
end
begin
enddafsjasdk
end
做一个通用过程，比如formatfile('C:/File.txt','begin','end');执行之后文件变成这样：
djfkjsa
begin
begindafjdsjf
begin
fddsfjkdsjf;sd
end
end
begin
enddafsjasdk
end
看懂了吗？我要产生一个规范化后的文本文件，begin和end匹配，即如果发现是第一个begin,
则首行缩进两个字符，如果又有第二个begin，则缩进四个字符，.....每个end代表匹配了一个
begin，如果begin被匹配了，又从开始时记数缩进量，说通俗一点，就好象Delphi规范化后的
源码那样，每个begin与其相应的end缩进量相同，互相匹配。
请高手们踊跃发言，只谈想法可以，给出代码也可以，谢谢大家。
读写一个文本文件，要求：指定的字符匹配对齐。象这样，如C:/File.txt，内容如下：
djfkjsa
begin
begindafjdsjf
begin
fddsfjkdsjf;sd
end
end
begin
enddafsjasdk
end
做一个通用过程，比如formatfile('C:/File.txt','begin','end');执行之后文件变成这样：
djfkjsa
begin
begindafjdsjf
begin
fddsfjkdsjf;sd
end
end
begin
enddafsjasdk
end
看懂了吗？我要产生一个规范化后的文本文件，begin和end匹配，即如果发现是第一个begin,
则首行缩进两个字符，如果又有第二个begin，则缩进四个字符，.....每个end代表匹配了一个
begin，如果begin被匹配了，又从开始时记数缩进量，说通俗一点，就好象Delphi规范化后的
源码那样，每个begin与其相应的end缩进量相同，互相匹配。
请高手们踊跃发言，只谈想法可以，给出代码也可以，谢谢大家。
