PosEx

[youuu]

Delphi-Quellcode:

Pos1 := 1;
while Pos1 <> 0 do
    Begin
      Pos1 := PosEx('<td align="center">', SubStr, Pos1 + 1);
      if Pos1 <> 0 then  // erstes Semikolon gefunden
        Count:= Count + 1
    End;

So oder hab ich da einen Denkfehler drin?