Der Timer ist aktiv?
[Edit] Time ist nicht zufällig das Time aus der SysUtils?
Wenn doch, dann schäm dich, für einen "genauen" Vergleich mit einem Float
und dem extrem unwahrscheinlichen Fall, dass diese Zeile genau auf die Millisekunde um Mitternacht ausgeführt wird.
Wo wird r initialisiert?
Warum die Variable r und nicht einfach
Break?
Pos<>0 ... ContainsText bzw. ContainsStr oder StartsText bzw. StartsStr >
StrUtils