To write out a couple of strings, put all strings that belong in one record in a TStringList object. The TStringList has a property CommaText: string, which collects all the strings into one single comma-delimited string.
The advantage: In case your strings had the delimiter (,), it automatically adds quotes.
Later you can read it in the same way! CommaText is a read and write property.