| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Tthread
umx © (2003-12-01 23:49:00)
Здравствуйте уважаемые мастера!
код программы
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 запросы. Как сделать так чтобы она не томрозила? чтобы при выполнении можно было легко перетащить окно программы?
Заранее благодарен.
Эдик (2003-12-02 19:54:00) [1]
TcpClient1.ClientType:=ctNonBlocking;
поставь перед TcpClient1.active:=true;
Хотя чтоб сделать что-то большее, нужно читать доку... Без этого никак.
Digitman (2003-12-02 16:42:00) [2]
> только ничего не понял
так не бывает - "тут все понял, там ничего не понял"
говори, что не понял... конкретно ! на то и форум
umx (2003-12-02 16:31:00) [3]
я читал в мануале, только ничего не понял! оч долго копался. не могли бы вы пожалуйста привести пример ????
Polevi (2003-12-02 11:37:00) [4]
асинхронный режим или синхронный с доп. кодовыми потоками
| |
