|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.157 Beiträge
Delphi 12 Athens
|
AW: Pos-Funktion rückwärts
1. Jan 2011, 20: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
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. 
my Delphi wish list : BugReports/FeatureRequests
Geändert von himitsu ( 1. Jan 2011 um 21:02 Uhr)
|