|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
Delphi 12 Athens
|
AW: Pos-Funktion rückwärts
1. Jan 2011, 21:23
Die vielen Delete in der Schleife sind eher suboptimal,
dann doch lieber "nur" 2 Stringoperationen.
Result := Length(str) - Length(substr) - Pos(AnsiReverseString(substr), AnsiReverseString(str)) + 2;
[edit]
siehe  http://www.delphipraxis.net/105585-p...ml#post1071689
$2B or not $2B
Geändert von himitsu ( 1. Jan 2011 um 22:02 Uhr)
|