[T-dayne]

В потоке скачивается текстовый файл с сервера. Но вместо того чтобы остановиться после скачивания он продолжает выполняться, в результате чего текстовый файл в считаные секунды набирает мегабайты
Как мне выполнить

thread.terminate

сразу после первого скачивания?!

Сам код потока:

Код:

1 2 3 4 5 6 7

procedure Tupdate.Execute; var FileOnNet, LocalFileName: string; begin    FileOnNet:='http:\\127.0.0.1\mysite\sitevers.txt';    LocalFileName:=extractfiledir(application.ExeName)+'\sitevers.txt';    GetInetFile(FileOnNet,LocalFileName); end;

и код обращения к нему

Код:

1 2 3 4 5

begin thread:=tupdate.Create(true); thread.Resume; //Запускаем поток thread.Priority:=tpLower; end;

заранее спасибо