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.