Delphi-Quellcode:
Codesource.Insert(i,trim(codesource[i]));
Codesource.Delete(i+1);
kannst du dir doch sparen indem du wie von mir vorher angesprochen direkt den string bearbeitest
per
codesource[i] := trim(codesource[i])
wozu also die liste expandieren?
wobei noch anzumerken wäre, dass du in deinem ersten beitrag gesagt hast, dass du alle leerzeichen entfernen möchtest....
dann wäre nämlich
codesource[i] := stringreplace(codesource[i], ' ', '',[replaceall]);
ideal.
also: nächstes mal ein bissl genauer ausdrücken