Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   Windows (https://forum.antichat.xyz/forumdisplay.php?f=42)
-   -   PScanner (https://forum.antichat.xyz/showthread.php?t=35219)

W!z@rD 11.03.2007 09:10
PScanner
 
Целью написания данной проги было изучение Потоков на основе класса TThread...
Цель считаю выполненной )))
с сорцами... BDS 2006

Бинарник:
http://tcpv.narod.ru/Downloads/PScanner/PScanner.7z

Исходник:
http://tcpv.narod.ru/Downloads/PScanner/PScanner_scr.7z

gemaglabin 11.03.2007 10:08
Не работай в потоке с vcl

W!z@rD 11.03.2007 10:56
Цитата:
Сообщение от gemaglabin
Не работай в потоке с vcl
если тебя смущает вот этот участок кода:
PHP код:
addr.sin_addr.S_addr:=inet_addr(PChar(frmMain.edTarget.Text)); 
то он тоже меня немного смущает... но работает

(знаю что для работы с VCL нодо юзать Synchronize)

кстати по нажатии на "?" должно было быть сообшение типа:

PScanner v 1.0*betta
coded by:
W!z@rD

For: www.antichat.ru

Greetz to:
[sL1p], GreenBear, +toxa+, tclover, FQziT, Ypcyla, RemaerD,
PEPSICOLA, k1b0rg, n-e-r-d, _Great_, gemaglab1n, Puff, KoTeG.
ASSCOL, ZerRider, ncux, r12u

made in Kz (Karaganda) 2007

забыл извиняюсь ))) Просто у меня кодерская-примета:
"если about сделаешь раньше чем прога заработает, то она вообще не заработает" ;)

gemaglabin 11.03.2007 11:05
Создавай поток так

Код:
with YourThreadName.Create(true) do begin
Host := Edit1.Text;
Port  := Edit2.Text;
Resume;
end;
В потоке

Код:
public
host:string;
port:string;

W!z@rD 12.03.2007 13:35
Гем, а ты сорцы смотрел??? ))) Кстати все рабочее... ;) (*по крайней мере с основной задачей справляется*)


Время: 20:20