ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
15.01.2009, 18:06
|
|
Познающий
Регистрация: 20.12.2008
Сообщений: 46
Провел на форуме:
123070
Репутация:
9
|
|
Всё нашёл что икал кому интересно пишите в личку  |
|
|
15.01.2009, 20:10
|
|
Постоянный
Регистрация: 05.05.2006
Сообщений: 743
Провел на форуме:
2982851
Репутация:
107
|
|
А в инди можно как то задать свой "юзер-агент" ?
|
|
|
|
15.01.2009, 20:28
|
|
Постоянный
Регистрация: 26.12.2007
Сообщений: 353
Провел на форуме:
905389
Репутация:
332
|
|
Сообщение от Stil Free
Нее такое не прокатит пробовал
вот решение, просто не то событие вы брали
Код:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if edit1.Text=pass then
canclose:=true
else
begin
canclose:=false;
MessageDlg('Пароль неверный!',mtError,[mbOK],0);
end;
end;
p.s. мне никто так и не поможет? по этому вопросу: http://forum.antichat.ru/showpost.php?p=1059432&postcount=2611
|
|
|
|
15.01.2009, 20:30
|
|
Участник форума
Регистрация: 06.06.2008
Сообщений: 171
Провел на форуме:
1085601
Репутация:
110
|
|
Сообщение от _nic
А в инди можно как то задать свой "юзер-агент" ?
idhttp1.request.useragent 
|
|
|
|
15.01.2009, 20:40
|
|
Познающий
Регистрация: 01.03.2008
Сообщений: 99
Провел на форуме:
613745
Репутация:
51
|
|
Ни у кого нет исходников аплоадера на какой-нибудь файлообменник или сайт?
|
|
|
|
Можно вас попросить скомпилировать |
16.01.2009, 11:29
|
|
Познающий
Регистрация: 29.12.2008
Сообщений: 45
Провел на форуме:
83889
Репутация:
1
|
|
Можно вас попросить скомпилировать
Скомпилируйте плз кому не лень а то у меня библиотеки в дельфи старые буду примного благодарен
_http://dump.ru/file/1434665
|
|
|
|
17.01.2009, 11:22
|
|
Постоянный
Регистрация: 26.12.2007
Сообщений: 353
Провел на форуме:
905389
Репутация:
332
|
|
Может кто помоч:
искал исходники канального снифера на делфях, нашел DumpDemo работает норм, но исходники не хатят компилится на дэлфе) компоненты говорит нужны. компоненты тоже искал но не нашол(
помогите плиз может у кого есть с компонентами етот же снифер или кто писал канальный снифер и остались исходники ... поделитесь плиз)
p.s. вот ссылка на архив с исходниками и скомпиленной прогой с сайта создателя http://rouse.drkb.ru/files/dumpdemo_delphi_vcl.zip
Последний раз редактировалось KIR@PRO; 17.01.2009 в 11:26..
|
|
|
|
17.01.2009, 22:03
|
|
Постоянный
Регистрация: 05.05.2006
Сообщений: 743
Провел на форуме:
2982851
Репутация:
107
|
|
Подскажите кто с инди работал.Там нет никаких ограничений на мультипоточность?К примеру к в случае с wininet
|
|
|
|
18.01.2009, 13:09
|
|
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638
Репутация:
1821
|
|
Сообщение от _nic
Подскажите кто с инди работал.Там нет никаких ограничений на мультипоточность?К примеру к в случае с wininet
Изложи свой вопрос более подробно.
|
|
|
|
18.01.2009, 15:38
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
Как из одной формы вызывать процедуру другой формы. Например в Unit2 находятся переменные, которые я хочу передать в Unit1
пробывал так:
Unit2
Код:
procedure TForm2.Button1Click(Sender: TObject);
var
zz:string;
dd:string;
begin
zz:=Edit1.text;
dd:=Edit1.text;
TForm1.the(zz,dd);
end;
Unit1
Код:
procedure TForm1.the(zz:string; dd:string);
begin
showmessage(zz);
showmessage(dd);
end;
неполучается.
Может я забыл, что-то указать?
Последний раз редактировалось ZET36; 18.01.2009 в 15:45..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
