В общем пишу программу, много функций, не имеют отношения к делу, эти функции выполняются в цикле через определенное количество времени.
например:
while i=1 do
load_file;
sleep(60000);
end;
т.е. программа качает файл, ждет 60 секунд и качает опять.
переменная i меняется при нажатии кнопок Старт и Стоп, т.е. нажали Старт i:=1 и процесс пошел, нажали Стоп i:=0 и процесс кончился. Естественно при таком раскладе на форме ничего нажать не получиться, надо выносить в потоки, а все процедуры выносить в потоки долго будет и не легко, т.к. программа большая по коду. Вот меня интересует, как можно функцию sleep вынести в отдельный поток так, чтобы программа скачала файл, и поток ожидания запустился, при этом остальные функции ждали пока поток завершится.
Либо вопрос, если так сделать нереально, то можно ли в потоке подключать функции, которые были прописаны в главном разделе программы (unit1). Т.е. чтобы не переписывать все заново в файл потока. Ну и как это реализовать
заранее спасибо!

А не проще кинуть на форму таймер, установить ему период в минуту, и load_file засунуть в OnTimer?

Таймер уже подсказали.
Sleep с прокачкой сообщений.
Вынос кода в поток.

Выбирайте любое.

Это сообщение отредактировал(а) CodeMonkey - 15.12.2010, 13:40

спасибо, только вот насчет прогресс бара не понял как реализовать... ведь в программе это не единственная функция, их много...

CodeMonkey, за ссылки спасибо, только сюда не заходит, ошибка - Sleep с прокачкой сообщений.

попробуем погуглить еще чтонибудь...

еще появился вопрос, ведь если я в таймер ставлю запуск процедуры где выполняется скачивание, то таймер один раз отпашет и запустит процедуру, а потом... ведь если сделать цикл, где таймер будет запускаться в цикле, пока не нажали кнопку стоп, то программа опять будет вешаться... отпишите по подробнее про Sleep с прокачкой сообщений.
ссылка не открывается