[Delphi]/[Pascal] Задай вопрос, получи ответ

ВЫЕЗД ИЗ УКРАИНЫ • ОФОРМЛЕНИЕ ДОКУМЕНТОВ • БРОНИРОВАНИЕ • ПОМОЩЬ С ТЦК

УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

НОВЫЕ ТОРГОВАЯ НОВОСТИ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
[Delphi]/[Pascal] Задай вопрос, получи ответ

Страница 262 из 677

262

Опции темы

Поиск в этой теме

Опции просмотра

#2611

15.01.2009, 18:06

Stil Free

Познающий

Регистрация: 20.12.2008

Сообщений: 46

С нами: 9152825

Репутация: 9

Всё нашёл что икал кому интересно пишите в личку

#2612

15.01.2009, 20:10

_nic

Постоянный

Регистрация: 05.05.2006

Сообщений: 743

С нами: 10535289

Репутация: 107

А в инди можно как то задать свой "юзер-агент" ?

#2613

15.01.2009, 20:28

KIR@PRO

Постоянный

Регистрация: 26.12.2007

Сообщений: 363

С нами: 9671366

Репутация: 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

#2614

15.01.2009, 20:30

crystalbit

Участник форума

Регистрация: 06.06.2008

Сообщений: 171

С нами: 9436571

Репутация: 110

Цитата:

Сообщение от _nic

А в инди можно как то задать свой "юзер-агент" ?

idhttp1.request.useragent

#2615

15.01.2009, 20:40

lll6

Познающий

Регистрация: 01.03.2008

Сообщений: 99

С нами: 9577084

Репутация: 51

Ни у кого нет исходников аплоадера на какой-нибудь файлообменник или сайт?

Можно вас попросить скомпилировать

#2616

16.01.2009, 11:29

noveek

Познающий

Регистрация: 29.12.2008

Сообщений: 45

С нами: 9140640

Репутация: 1

Можно вас попросить скомпилировать

Скомпилируйте плз кому не лень а то у меня библиотеки в дельфи старые буду примного благодарен

_http://dump.ru/file/1434665

#2617

17.01.2009, 11:22

KIR@PRO

Постоянный

Регистрация: 26.12.2007

Сообщений: 363

С нами: 9671366

Репутация: 332

Может кто помоч:
искал исходники канального снифера на делфях, нашел DumpDemo работает норм, но исходники не хатят компилится на дэлфе) компоненты говорит нужны. компоненты тоже искал но не нашол(

помогите плиз может у кого есть с компонентами етот же снифер или кто писал канальный снифер и остались исходники ... поделитесь плиз)

p.s. вот ссылка на архив с исходниками и скомпиленной прогой с сайта создателя http://rouse.drkb.ru/files/dumpdemo_delphi_vcl.zip

Последний раз редактировалось KIR@PRO; 17.01.2009 в 11:26..

#2618

17.01.2009, 22:03

_nic

Постоянный

Регистрация: 05.05.2006

Сообщений: 743

С нами: 10535289

Репутация: 107

Подскажите кто с инди работал.Там нет никаких ограничений на мультипоточность?К примеру к в случае с wininet

#2619

18.01.2009, 13:09

~~De-visible~~

Banned

Регистрация: 06.01.2008

Сообщений: 904

С нами: 9655526

Репутация: 1821

Цитата:

Сообщение от _nic

Подскажите кто с инди работал.Там нет никаких ограничений на мультипоточность?К примеру к в случае с wininet

Изложи свой вопрос более подробно.

#2620

18.01.2009, 15:38

ZET36

Участник форума

Регистрация: 08.10.2007

Сообщений: 259

С нами: 9785147

Репутация: 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..

Страница 262 из 677

262

Предыдущая тема Следующая тема

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ!	Alexsize	Беспроводные технологии/Wi-Fi/Wardriving	2571	20.06.2026 14:48
[jQuery] - Задай вопрос, получи ответ	Isis	PHP	62	25.12.2009 03:25

Здесь присутствуют: 6 (пользователей: 0 , гостей: 6)

Быстрый переход