Проблема в том, что пока не выполнится FtpPutFile приложение не реагирует на внешние 'раздражители'. Сначала хотел показывать сколько байт передалось уже, но сам не осилил.
 Решил просто сделать таймер и прогресс бар, пусть заполняется и сбрасывается...Тоесть на событие OnTimer положил:
if progressbar1.posiotion >=100 then progressbar1.position :=0;
progressbar1.position := progressbar1.position + 5;
Но когда программа доходит до выполнения процедуры FtpPutFile всё замирает и пока файл не будет скопирован заново работать не начинает. А копирование по модему не очень быстро происходит, как бы юзер не подумал что всё подвисло. 
Как решить? Может нужно использовать другие компоненты для копирования?

P.S> Ссылка на FtpPutFile : http://forum.vingrad.ru/index.php?showtopic=102850 

Отдельный поток поможет. 

c сетью нужно работать в потоках, или используй Indy  

Это сообщение отредактировал(а) Akella - 6.7.2006, 11:13

Если честно не сталкивался раньше с отдельными потоками, попробовал сделать и всё вылетает.
Не понимаю Synchronize вообще с чем должен синхронизировать и в каком месте мне нужно делать проверку на Terminated, я так понимаю она мне нужна.

Сделал вот как:




Вроде всё как написана в инете 
 

Конечно TThread использовать правильнее, но не обязательно в этом случае. Тем более, как я заметил из твоего кода, ты не совсем понял как ОНО работает  

Попробуй так:


     

Это сообщение отредактировал(а) Poseidon - 7.7.2006, 00:45

Как отдельный поток он конечно запускается, но срабатывает через раз. 
На 2 из 3 вылетает ошибка:
показан лист CPU:
THREAD #2800
7C81EB33  5E               pop esi
и ошибка компилятора:
DEBUGER FAULT NOTIFICATION
"PROJECT  C:\..\project1.exe faulted with message:'application-defined exception (code 0x0eedfade)
at 0x7c81eb33'". Process stoped

Судя по тому, что раньше такого не возникало думаю дело как раз в потоках.  

С каким кодом это происходит? Что делаешь при этом? Даешь-ли завершиться потоку (закачаться файлу) прежде чем запустить еще один поток? 

 Я делаю всё как ты написал. Единственное отличие, что у меня после FtpPutFile вызывается ещё ShowMessage. А в параллельном потоке, тоесть на главной форме в процессе выполнения потока вызывается только OnTimer, который обращается к прогрессбару, чтобы пользователь видел работу приложения.



Вот мой код. Я думаю может дело в памяти, выделяется не правильно или ещё что? 

Synchronize нужно вызывать, когда обращаешься к VCL, например, чтобы не было конфликтов твоего потока с главным потоком VCL.

 

Я так понял, что использование CreateThread освобождает меня он Synchronize . Покрайней мере каждый 2ой раз она обычно срабатывает, что и настораживает если честно.
Такой вопрос, а TReadBarCode.Execute в каком месте вызывать? Я ведь не пишу отдельный модуль с классом TThread.
 

TReadBarCode.Execute вызываю при старте приложения 

Я конечно извиняюсь за то, что не спросил сразу...просто не пытался вызвать.
TReadBarCode, BarCodePort1 это что такое? . 
//SetBarCodeForParentForm - процедура, которая обращается на форме к TEdit
вы имеете ввиду процедуру которая выступает в качестве параллельного потока, copyBD в моем случае?

P.S> Посмотрел кучу инфы на этом форуме и в инете, примеров использования синхрониз нету...видимо в всех так работало. 

Пробовал BeginThread с теми же параметрами(правда h:=0 писал). Работает через раз. Когда не работает вылетает по ошибке:Project raised exception class EInvalidOperation with message "Canvas does not allow drawing"....

Иногда говорит: "Недопустимый дескриптор окна". 

Всем спасибо за советы. Проблема заключалась именно в ShowMessage, его использование в параллельном процессе приводит к перегрузке ЦП. Я лично реализовал BeginThread, но проверил и CreateThread работает безотказно.