高手来看看,如何解决(200分)

我在文本文件中如何不用finddialg来找特定字符

读出内容，再用pos？

关住

用文件流实现，给你一个别人写的查找替换函数：
函数：
procedure Convert_in_file(filename_ncChar;filename_ctChar;
needconvert:string;convertto:string);
var t1:TMemoryStream;
i:integer; //used as loop check
n1,n2:integer;
buf1:Word;
Str:string;
Str1,Str2,Str3:String;
file1:TextFile;
begin
t1:=TMemoryStream.Create;
t1.LoadFromFile(filename_nc);
n1:=length(needconvert);

for i:=0 to t1.Size do
begin
t1.read(buf1,1);
Str:=Str+Chr(buf1);
end;
n2:=Pos(needconvert,Str);
Delete(Str,n2,n1);
Insert(convertto,str,n2);

Form1.Memo1.Lines.Add(Str);
t1.Free;
Assignfile(file1,filename_ct);
Reset(file1);
Rewrite(File1);
Write(File1,Str);
Closefile(file1);
end;
调用：
Convert_in_file('my/source.txt','2.txt','$$title$$','hello');
其中source.txt为源文件
2.txt为目标文件
$$title$$为需要替换的部分
hello为替换后的部分

大家好好
我不是要替换我是要查出文本里的一个字符，比如"]"在文本中出现的最后一次的位置并记下
他所在文本的第几行

自己记#13#10的位置，用循环做

各位大哥：
格式是这样的
{[11111] 22222222222
.........
[222222] 33333333333}
qpieruqrepweriwroepwiroe
但是{}你的行数不确定,{}外是一些不用的文本信息大家来看看如何把{}内的东西取出存入数据库
分不够可在加

针对你的需求，文件不大的话用TStrings直接读入（文件太大就慢了），
然后可以倒着一行行查找了，不一定最优但应该是最简单了。

用pos加循環﹗

有没有源码，先写了

up

接受答案了.

靠，耍人，去死。

真是大便！！！！真大贱人