String Code überprüfen

[lemomo]

Hallo Leute,
Ich fange mit Delphi noch mal nach fast 8 Jahren pause und ich habe ein Problem. Ich möchte eine Procedure die ein Datei.txt liest und überprüft ob ein String richtig ist, schreiben. Der String kommt merhmal vor und hat ein Teil als Integer (O1--,O2+-, ... O123++ ) so sehen die String aus. Es muss auch überprüft werden ob unser String auf die erste Reihe geschrieben ist und ob sein Integer Teil sich richtig inkrementiert. Der Rest Teil +- , -- oder ++ muss nicht geprüft werden . Datei lesen ist ok aber für die Überprüfunh weisse ich nicht wie ich anfangen muss. Danke schön
Beispiel datei.txt :
W1
Ich möchte ein Procedur schreiben die ein Datei.txt liest und überprüft
W1
O1-+
A
das Nichtvorliegen unrechtsausschlieáender
A
O2—
A
Zur Bestandes soll erforderlich sein:
A
O3++

[Bummi]

ich habe die Anforderung leider überhaupt nicht verstanden ...

Crosspost: http://www.entwickler-ecke.de/viewtopic.php?t=109844

[Klaus01]

Guten Morgen,

die könntest zuerst alle Ox Zeilen filtern und in eine StringList schreiben.
Dann überprüfst Du ob x aus Zeile[i] größer ist als x aus Zeile[i-1], bzw die Differenz
beider Zahlen = 1 ist.
Zu extractNumbers gibt es meines Wissens auch in diesem Forum eine Routine.

Grüße
Klaus

[p80286]

Da Deine Frage ein wenig verworren formuliert ist, wäre es gut wenn Du einmal ein paar Zeilen Deiner Datei posten würdest.
Als Stichworte würde mir copy,trystrtoint einfallen.

Gruß
K-H

[idefix2]

Statt sich mit copy, trystrtoint und dergleichen herumzuschlagen, ist es praktisch immer viel bequemer, eine Regex Unit einzubinden und die String-Prüfungen und Zerlegungen über reguläre Ausdrücke zu machen. Das reduziert den nötigen Code und den Programmieraufwand auf ein Bruchteil. Ganz am Anfang natürlich etwas gewöhnungsbedürftig, aber es zahlt sich wirklich aus.

Mich erstaunt, dass sich noch immer relativ wenige Programierer dieser Möglichkeit bewusst sind.

[Bummi]

bewusst schon, aber ich empfinde es als unleserlich und mühsam...