神马品牌网唐僧和尚念佛经:delphi中如何提取一个txt 文本中的特定部分？
来源：百度文库 编辑：神马品牌网 时间：2024/04/20 16:06:15
比如http:\\www.baidu.com ,提取后转存入另一个文件
procedure SavePointedFile(cStart,cEnd:Integer;OFile,NFile:string);
var
F:TextFile;
SL:TStringList;
T:String;
begin
SL:=TStringList.Create;
SL.LoadFromFile(OFile);//先读入一个文本
T:=Copy(SL.Text,cStart,cEnd);//截取你指定的部分
AssignFile(F,NFile);
ReWrite(F);
Write(F,T);//将截取的文本写入新的文本文件中
CloseFile(F);
SL.Free;
end;