Registriert seit: 27. Nov 2017
2.508 Beiträge
Delphi 7 Professional
|
AW: Problem mit Pos/PosEx
12. Apr 2021, 11:33
Der zweite Fehler ist hier:
Dummy_String := Copy(stext, Pos1, Pos2);
Pos1 ist der Beginn von SearchTextA.
Pos2 ist die Länge von SearchTextA zuzüglich der Länge von SearchTextB.
Nun gehst Du her und kopierst genau diesen Teil aus sText. Damit erhälst Du dann SearchTextA + SearchTextB als einen String.
Du möchtest aber alles vor SearchTextA und alles hinter SearchTextB.
Von daher musst Du zuerst den Teilstring vor Pos1 und dann den Teiltring hinter Pos2 kopieren.
Dummy_String := Copy(stext, 1, Pos1 - 1) + Copy(stext, Pos2 + 1,Length(stext));
|