Hallo und Willkommen in der
DP 
,
schließe doch Deinen Code bitte in Delphi-Tags ein, dann ist er besser zu lesen. Was mich trotzdem wundert, wieso wandelst Du den Text zuerst in eine Integer und dann beim Suchen wieder zurück in ein Zeichen? Das erscheint mir ziemlich umständlich.
[edit] Ahso, hatte das P.S. glatt übersehen [/edit]