Discussion on question by HideME: Кто-нибудь может перевести код с JS на Delphi

Imported from a comment discussion on https://ru.stackoverflow.com/questions/826057/%d0%9a%d1%82%d0%be-%d0%bd%d0%b8%d0%b1%d1%83%d0%b4%d1%8c-%d0%bc%d0%be%d0%b6%d0%b5%d1%82-%d0%bf%d0%b5%d1%80%d0%b5%d0%b2%d0%b5%d1%81%d1%82%d0%b8-%d0%ba%d0%be%d0%b4-%d1%81-js-%d0%bd%d0%b0-delphi