一个文本文件,分为两部分一部分为标识部分,一部分为数据部分
例如://——————————————//
标识1 = 00000
标识2 = 00001
//——————————————//
正文:数据我只想在memo,中把正文的数据load进来,而不显示标识部分,然后把标识部分另存成一个文件,怎么做呀 各位帮帮小弟吧!最好给出代码,回者有分,急呀!
例如://——————————————//
标识1 = 00000
标识2 = 00001
//——————————————//
正文:数据我只想在memo,中把正文的数据load进来,而不显示标识部分,然后把标识部分另存成一个文件,怎么做呀 各位帮帮小弟吧!最好给出代码,回者有分,急呀!
s: TStringList;
begin
s := TStringList.Create;
s.LoadFromFile('c:\a.txt'); //
//showmessage(s[5]); // 访问第 5 + 1 行数据,同 Memo1.Lines[5]
//showmessage(s.Text); //
for i:=起始行 to s.count - 1 do
Memo1.lines.add(s[i]);
s.Free;
end;
用这种方法把它加到MEMO中
var
s: TStringList;
begin
s.SaveToFile('c:\123.txt');
end;
例如://——————————————//
[大标识]
标识1 = 00000
标识2 = 00001
//——————————————//
var
Str:string;
begin
Str := ConfigFile.ReadString('标识','标识','');
在把Str写入文件 (这就不要说了吧。呵呵)
inifile.readsection(section, strings);
然后
for i := 0 to stringlist.count -1 do
memol.lines.add(stringlist.valuesfromindex(i));
就可以了。
有了这个就好办了,遍历TStringList里的各条内容就知道标识共几行
当然,行数可以变,但标识不能变