真心求教一Delphi问题，高手请进

Question

有一ab.txt文档：内容为：
方源= Volume=
方源《普济方》卷182。方源= Volume=
方源《普济方》卷328引。最终要求通过程序将ab.txt文档修改为：
方源=普济方 Volume=182
方源《普济方》卷182。方源=普济方 Volume=328
方源《普济方》卷328引。

Answer 1

用Copy+POS应该可以搞定，
主要是关键字：卷 与 。之间的内容你能取出来就OK了，然后赋值到 Volume= 之后。

Answer 2

没注意，卷 与 。之间的内容的话还有判断是不是数字的，呵呵。
这里假定：“328引”你已经取出来，变量str=“328引”，然后
const
  numValue = ['0'..'9'];var sTemp:string;for i:=0 to length(str)-1 do
  if str[i] in numValue then
    sTemp:=sTemp+str[i]
这时sTemp就是你要的数字了...
回答的够详细了吧，接分了:)

Answer 3

老大，不好意思，我是菜鸟。数字取出后要如何回写到文本中Volume=后啊？如何定位置啊？
您辛苦下，能再详细点，把上述的语句写给我好不？
谢谢！

Answer 4

POS就是定位置的，insert是插入的。
不好意思，这种代码写出来还要调试什么的，我自己的一些代码都想好了怎么写也还很多没写呢，代码我就不写了。
其实编程序最重要的是思路，你思路都有了，写代码其实不会显得有多难的，仅仅是你思路的一个重现而已。
如果有高手愿意帮你写最好了:)
点"结帖去..."，再把分数一填就可以了:)