TStringList 对txt文件进行操作

[hansi258865]

问题是这样的：
有两个文本文件num.txt和name.txt一个是学号，一个是姓名。
格式都是一个号码（姓名）一个'\n'(回车)。
最后生成是结果是
学号空格姓名再一个回车。
215401 李二
215402 张三
...

要求用TStringList 谢啊。

[fjye]

直接用UE或者editplus的列操作不能搞定么

[编译失败]

如果学号和姓名一一对应的话。

TStringList *num = new TStringList;
TStringList *name = new TStringList;
TStringList *ret = new TStringList;
num->LoadFromFile("num.txt");
name->LoadFromFile("name.txt");
for (int i=0;i<num->Count;i++) {
    ret->Add(num->Strings[i] + " " + name->Strings[i]);
}
ret->SaveToFile("ret.txt");
delete num,name,ret;

[hansi258865]

成功，谢谢楼上的aniven

[vicarious]

ai