wie abspeichern?

[maximov]

Arrays sind binärer blödsinn und zum persistenzieren von datensätzen, die sich evtl. erweitern, verdammt lästig. Versteh mich nicht falsch, ich hab auch jahrelang mit typisierten dateien gearbeitet, aber irgendwann sieht man ein, dass das mehr ärger als nutzen bringt...

und JA das geht schnell und einfach! Leite einfach eine klasse von TCollectionItem (TPatient) ab und leite eine klasse von TPersistent ab (TZustand). Alle daten die du speichern willst deklariest du als published properties und erzeugst im konstruktor des items die nötigen unterobjekte (TZustand und die stringlisten). Dann nimmst du die TmxJsCollection (dpCollection unit -> codeLib) und fütterst sie mit der item-klasse. dann collection.saveToFile/loadfromFile...und alles wird gut