Parser Yandex Vordstat delphi

Need to parse the issuance of Yandex vordstat
I give the program a list of words – the program parses the issuance of and issue all the words associated with my request.
have worked previously source – at the moment, can't understand what happened there.
worked through the IPA Yanda