Уважаемые, спецы и копипастеры, помогите решить проблему.
Проблема: даю запрос на получение данных с сервера и обрабатываю полученный ответ формата JSON
Код:
PostVK:=TStringList.Create;
logVK:=IdHTTP1.Post('http://'+server+'?act=a_check&key='+key+'&ts='+ts+'&wait=25',postvk);
js := TlkJSONobject.Create;
js := TlkJSON.ParseText(logvk) as TlkJSONobject;
ts:=IntToStr(js.getInt('ts'));
jl:=js.Field['updates'] as TlkJSONlist;
В тот момент когда происходит этот ряд операторов, программа подвисает, что именно и мешает мне реализовать задумку.
В чем суть программы? Программа предназначена для обмена мгновенными сообщениями соц сети Вконтакте. Поэтому при проверке апдейтов (пользователь онлайн, оффлайн и тд) категорично нельзя чтобы программа подвисала.
Решение: ?
