Einzelnen Beitrag anzeigen

Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#7

AW: TStringList, Pos, PosEx usw.311

  Alt 8. Jun 2011, 14:00
Delphi-Quellcode:
//Fehler
  richedit1.Lines.Add(copy(load.text,i1,i2-1));
Ich glauber hier liegt der Fehler. Copy(Str, Von, Stellen) kopiert vom "Str" ab der Position "Von", "Stellen" Zeichen.

Copy('ABCD', 1, 2) = AB
Copy('ABCD', 2, 2) = BC
Copy('ABCD', 3, 2) = CD

Dein Fehler ist nun, dass du i2-1 nimmst. Es muss aber heißen i2-i1
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG
  Mit Zitat antworten Zitat