Du könntest dein Ergebnis vllt noch posten, so haben auch die Leute was davon, die irgendwann mal nach dir ein ähnliches Problem, oder gar das selbe haben!
Delphi-Quellcode:
var
i: integer;
for i := Length(deinstring) downto 0 do
//...
kannst du sonnst noch rückwärts deinen String durchsuchen...
mfg