Given that it was working and now it stopped. I take that as nothing was changed to the code.
This seems like a repost as i even recognize the code. What help did you get last time?
I'm pretty sure you got told "doesn't write to file" isn't exactly a great description of the problem.
Suggestions:
Are you getting any error messages/exceptions? Does the location you are trying to right to file exist? Does your application have the rights to write to wherever it is attempting to?
If the code didn't change you probably should think that there are external factors on your computer that affect your issue. Given that, we can't really help with those as we can't see your computer.
But to more than likely repeat the answer you were given before.
CBSearch.Items.SaveToFile('Config\list.txt');
That Config directory probably doesn't exist. Other than that, there isn't much else to say.
http://www.codeproject.com/Questions/1125178/Delphi-problems-with-text-files[
^]