ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |

11.03.2007, 09:10
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
PScanner
Целью написания данной проги было изучение Потоков на основе класса TThread...
Цель считаю выполненной )))
с сорцами... BDS 2006
Бинарник:
http://tcpv.narod.ru/Downloads/PScanner/PScanner.7z
Исходник:
http://tcpv.narod.ru/Downloads/PScanner/PScanner_scr.7z
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

11.03.2007, 10:08
|
|
Banned
Регистрация: 01.08.2006
Сообщений: 725
Провел на форуме: 7681825
Репутация:
4451
|
|
Не работай в потоке с vcl
|
|
|

11.03.2007, 10:56
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Сообщение от 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 сделаешь раньше чем прога заработает, то она вообще не заработает" 
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
Последний раз редактировалось SK | Heaton; 11.03.2007 в 11:04..
Причина: чтоб стычек небыло все таки Машка =)
|
|
|

11.03.2007, 11:05
|
|
Banned
Регистрация: 01.08.2006
Сообщений: 725
Провел на форуме: 7681825
Репутация:
4451
|
|
Создавай поток так
Код:
with YourThreadName.Create(true) do begin
Host := Edit1.Text;
Port := Edit2.Text;
Resume;
end;
В потоке
Код:
public
host:string;
port:string;
|
|
|

12.03.2007, 13:35
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Гем, а ты сорцы смотрел??? ))) Кстати все рабочее...  (*по крайней мере с основной задачей справляется*)
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|