if Pos('true',S) > 0 then Memo2.Lines.Add('GOOD-'+IntToStr(i)) else Memo2.Lines.Add('ERROR-'+IntToStr(i));