请教如何处理这样一个文本文件?(35分)

  • 主题发起人 主题发起人 eprun
  • 开始时间 开始时间
E

eprun

Unregistered / Unconfirmed
GUEST, unregistred user!
现有这样一个文本文件,内容如下:
aaa
bbb
ccc
ddd
eee
......

请问delphi中是否有个方法或函数能直接定位到文本中的"ccc"的位置

 
var
ss: TStrings;
i: integer;
begin
ss:=TStringList.Create;
ss.LoadFromFile('文件');
i:=ss.Indexof('ccc');
// i 既是你要的行号
ss.Free;
end;
 
//文件内容
abc.ini
[aaa]
aaa=aaa
bbb=bbb
ccc=ccc
var
s: string;
Ini: TInifile;
begin
try
Ini := TIniFile.Create('c:/abc.ini');
s := Ini.ReadString('aaa', 'aaa',''); // s='aaa';
s := Ini.ReadString('bbb', 'bbb',''); // s='bbb';
finally
Ini.Free
end;
end;

也可以用StringList;
 
谢谢大家
 
后退
顶部