Показать сообщение отдельно
  #3  
Старый 12.12.2012, 09:23
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

в кратце:
-создай новый конструктор у наследника TThread
-передавай url и Handle формы в конструктор и сохраняй значение в наследнике
-FreeOnTerminate присвоить в конструкторе False
-всю работу с TIdHTTP перенести в Execute
-после завершения Get уведомлять форму об окончании работы, посылкой сообщения, к примеру
-в обработчике считать результат и удалить объект потока
__________________
Пишу программы за еду.
__________________
Ответить с цитированием