Delphi Create Json String Javascript Functions