13,870
社区成员




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;