Danke für die Antwort und den Tipp!
Habe es jetzt so abgeändert:
Delphi-Quellcode:
for zeilennr:=0 to datei.Count-1 do
if datei[zeilennr]='XXX' then
datei.strings[zeilennr]:='XXX+YYY';
Allerdings bekomme ich hier immernoch den Fehler, dass angeblich der Listenindex überschritten wird...