Hi,
ich habe folgendes Problem:
Ich lese eine textdatei als stringlist ein und durchsuche diese dann. Wenn der eintrag X in Zeile Y gefunden wurde, dann soll Zeile wo Eintrag X drin ist gelöscht werden und dann in genau der selben Zeile ein neuer String mit "stringlist.insert" eingfügt werden.
Doch dabei tritt immer ein ElistError auf, angeblich wird das Listenmaximum überschritten, was aber definitiv nicht sein kann, da nur bist datei.count-1 durchsucht wird.
Delphi-Quellcode:
for zeilennr:=0 to datei.Count-1 do
if baseengine[zeilennr]='XXX' then
datei.Delete(zeilennr);
datei.Insert(zeilennr,'XXX+YYY');
aus der Delphi Hilfe:
Beschreibung zu EListError:
Zitat:
EListError ist die
Exception-Klasse für Fehler, die in Verbindung mit Strings und Listen auftreten.
Klassenhierarchie
Pascal
EListError = class(
Exception);
Datei
Classes
Beschreibung
EListError wird ausgelöst, wenn ein Fehler in einem Listen-, TStrings- oder TStringList-Objekt auftritt. Die häufigste Ursache ist, dass die Anwendung auf einen Eintrag verweist, der außerhalb des Listenbereichs liegt.
EListError wird außerdem ausgelöst, wenn eine Anwendung versucht, das Duplikat eines Strings zu einem TStringList-Objekt hinzuzufügen, während die Eigenschaft Duplicates den Wert dupError hat.
Eine weitere Ursache für eine EListError-
Exception ist der Versuch, einen String an bestimmter Position in eine sortierte Liste einzufügen, wodurch die Sortierreihenfolge unterbrochen werden könnte.
Beschreibung zu TStringlist.Insert:
Zitat:
Beschreibung
Mit Insert können Sie der Liste den String S an der mit Index bezeichneten Position hinzufügen. Wenn Index 0 ist, wird der String am Anfang der Liste eingefügt. Ist Index 1, wird der String an der zweiten Position eingefügt usw.
Ist dem einzufügenden String ein Objekt zugeordnet, muss die Methode InsertObject verwendet werden.
Anmerkung: Bei einer sortierten Liste verursacht der Aufruf von Insert oder InsertObject eine EListError-Exception. Verwenden Sie deshalb bei sortierten Listen Add oder AddObject.
Das Problem ist eben, dass es keine sortierte Liste ist, da ich den Text aus einer Datei einlese und ich es nicht sortieren darf.
Wie kann ich das problem lösen?
vielen Dank für eure Hilfe im voraus!
[edit=SirThornberry]Code-Tags durch Delphi-Tags ersetzt - Mfg, SirThornberry[/edit]