Tthread

← →
umx (2003-12-01 23:49) [0]

Здравствуйте уважаемые мастера!

код программы

for s:=strtoint(editF.Text) to strtoint(editL.Text) do
begin
TcpClient1.RemoteHost := edit1.text + "." + edit2.text + "." +edit3.text + "." + IntToStr(s);
TcpClient1.RemotePort := editp.text;
TcpClient1.active:=true;

прога сканит указанный диапазон. знаю есть много недоработок! но дело не в этом!
после запуска она оч сильна тормозит! замораживается и выполняет tcp запросы. Как сделать так чтобы она не томрозила? чтобы при выполнении можно было легко перетащить окно программы?
Заранее благодарен.

← →
Polevi © (2003-12-02 11:37) [1]

асинхронный режим или синхронный с доп. кодовыми потоками

← →
umx (2003-12-02 16:31) [2]

я читал в мануале, только ничего не понял! оч долго копался. не могли бы вы пожалуйста привести пример ????

← →
Digitman © (2003-12-02 16:42) [3]

> только ничего не понял

так не бывает - "тут все понял, там ничего не понял"
говори, что не понял... конкретно ! на то и форум

← →
Эдик (2003-12-02 19:54) [4]

TcpClient1.ClientType:=ctNonBlocking;
поставь перед TcpClient1.active:=true;
Хотя чтоб сделать что-то большее, нужно читать доку... Без этого никак.

Tthread Найти похожие ветки