Delphi 自带的JSON内存释放问题

{ "error":0, "status":"success", "date":"2014-03-04", "results": [{"currentCity":"成都", "weather_data":[ { "date":"周二(今天, 实时：12℃)", "dayPictureUrl":"", "nightPictureUrl":"", "weather":"多云", "wind":"北风微风", "temperature":"15 ~ 6℃" }, { "date":"周三", "dayPictureUrl":"", "nightPictureUrl":"", "weather":"阴转小雨", "wind":"北风微风", "temperature":"14 ~ 7℃" }, { "date":"周四", "dayPictureUrl":"", "nightPictureUrl":"", "weather":"小雨", "wind":"北风微风", "temperature":"12 ~ 7℃" }, { "date":"周五", "dayPictureUrl":"", "nightPictureUrl":"", "weather":"小雨", "wind":"南风微风", "temperature":"9 ~ 6℃" } ] } ]} //JSON 内容用这个。