Aso..
ich hab das ganz anders versucht.. aber jetzt ist es richtig:
Delphi-Quellcode:
if ((
URL[1]='
h')
and (
URL[2]='
t')
and (
URL[3]='
t')
and
(
URL[4]='
p')
and (
URL[5]='
:')
and (
URL[6]='
/')
and
(
URL[7]='
/'))
and
((
URL[8]='
w')
and (
URL[9]='
w')
and (
URL[10]='
w')
and
(
URL[11]='
.'))
then
result := true;