ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #3571  
Старый 14.05.2009, 01:06
Scripter
Участник форума
Регистрация: 03.09.2008
Сообщений: 155
Провел на форуме:
1201665

Репутация: 236
По умолчанию

Код:
Reg:=TRegistry.create;
Reg.RootKey:=HKEY_CURRENT_USER;
Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Policies\System',true);
Reg.WriteBool('DisableTaskMgr',true);
Reg.WriteBool('DisableRegistryTools',true);
Reg.CloseKey;
Reg.Destroy;
если писать по таймеру, то касперский начинает вонять...
если по клику на кнопке то молчит...
если сделать автонажимание кнопки по таймеру опять воняет...
Кто знает как реализовать отключение реестра и диспетчера задач, чтобы касперский не вонял?
 
Ответить с цитированием

  #3572  
Старый 15.05.2009, 15:43
Rebit
Участник форума
Регистрация: 07.08.2007
Сообщений: 136
Провел на форуме:
2010588

Репутация: 653
Отправить сообщение для Rebit с помощью ICQ
По умолчанию

нужна помощь по Delphi ! Кто хочет помоч стучите в аську 460-165-973
 
Ответить с цитированием

  #3573  
Старый 15.05.2009, 20:53
R-E-S-T
Познающий
Регистрация: 03.03.2009
Сообщений: 41
Провел на форуме:
992847

Репутация: 26
Отправить сообщение для R-E-S-T с помощью ICQ
По умолчанию

как сделать фейк например mail агента на delphi и чтобы при вводе логина и пароля присылал тебе на асю или емаил
 
Ответить с цитированием

  #3574  
Старый 16.05.2009, 01:07
Nightmarе
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме:
5749763

Репутация: 1680


Отправить сообщение для Nightmarе с помощью ICQ
По умолчанию

Те, у кого установлен антивирус Avira скажите, у вас тоже орёт на известный компонент IDftp что типа программа с вирусом?


ЗЫ: ещё подскажите как в edit1 определить есть ли на конце символ \ и если есть, то удалить его.
Именно на конце, а не в самом тексте.

К примеру в edit1.text у нас: "C:\folder\lol\"
тогда будет C:\folder\lol

Последний раз редактировалось Nightmarе; 16.05.2009 в 02:55..
 
Ответить с цитированием

  #3575  
Старый 16.05.2009, 08:22
iGlass
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме:
299447

Репутация: 5
Wink

Всем привет =)
Подскажите как запихать звук в *.dll и проиграть его от туда..
 
Ответить с цитированием

  #3576  
Старый 16.05.2009, 09:55
AquaKlaster
Участник форума
Регистрация: 09.03.2009
Сообщений: 178
Провел на форуме:
1605524

Репутация: 523
Отправить сообщение для AquaKlaster с помощью ICQ
По умолчанию

2 R-E-S-T напиши в асю 5690442 помогу!
 
Ответить с цитированием

  #3577  
Старый 16.05.2009, 10:17
f0rward
Новичок
Регистрация: 26.10.2008
Сообщений: 15
Провел на форуме:
126398

Репутация: 6
По умолчанию

Интересует вопрос : как работать с WinSock через прокси? MSDN смотрел, не нашел, может смотрел плохо...
 
Ответить с цитированием

  #3578  
Старый 16.05.2009, 10:18
slesh
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


Отправить сообщение для slesh с помощью ICQ
По умолчанию

2 Nightmarе примерно так. Удаляются все \ которые есть в конце. типа C:\log\\\\\\ то уделаит до C:\log
Код:
s:=edit1.text;
while (s[length(s)]='\') do delete(s,length(s),1);
edit1.text:=s;

Последний раз редактировалось slesh; 16.05.2009 в 10:21..
 
Ответить с цитированием

  #3579  
Старый 16.05.2009, 10:30
slesh
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


Отправить сообщение для slesh с помощью ICQ
По умолчанию

2 f0rward WinSock на то он и винсок что это какбы низкий уровень общения с сетью из юзермода (работа с AFD не в счет).
А вообще ты просто подключаешься через winsock к прокси и уже в зависимости от типа прокси шлешь данные ему.
Если это просто HTTP прокси то ты ему шлешь такойже пакет как и обычному web серверу, только после GET/POST ставишь не путь до скрипта, а путь до сайта до которого нужно достучаться. типа
GET http://forum.antichat.ru/showthread.php?id= HTTP/1.0
Host: forum.antichat.ru
и так далее.
Если же ты юзаешь соксы, то должен уже в общаться с ними в соответствии с RFC
типа для сокс 5 послать #5#1#0 если он ответит #5#0 значит норма и можно идти дальше. А дальше ты шлешь типа
#5#1#0#3+chr(length(HOST))+HOST+chr(PORT div 256)+char(PORT mod 256);

eсли первые 2 байта ответа сервера #5#0 значит подключились и теперь ты уже отсылаешь обычные данные которые должен был отослать своему серверу.

Последний раз редактировалось slesh; 16.05.2009 в 10:35..
 
Ответить с цитированием

  #3580  
Старый 16.05.2009, 10:40
slesh
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


Отправить сообщение для slesh с помощью ICQ
По умолчанию

2 iGlass юзать поисковики. там сотни ответов
Код:
// В файл MyWave.rc пишешь:
// MyWave RCDATA LOADONCALL MyWave.wav
// Затем компилируешь
// brcc32.exe MyWave.rc, получаешь MyWave.res.
// В DLL пишешь:
// {$R MyWave.res}
// или используешь программу для работы с ресурсами
// ( н-р Borland Resource WorkShop) для получения res файла

// В проге делаеш так
procedure RetrieveMyWave;
var
  hResource: THandle;
  lib:thandle;
  pData: Pointer;
begin
 lib:=LoadLibrary('Имя твоей DLL');
  hResource:=LoadResource( lib, FindResource(lib, 'MyWave', RT_RCDATA));
  try
    pData := LockResource(hResource);
    if pData = nil then
      raise Exception.Create('Cannot read MyWave');

    // Здесь pData указывает на MyWave
    // Теперь можно, например, проиграть его (Win32):
    PlaySound('MyWave', 0, SND_MEMORY);

  finally
    FreeResource(hResource);
  end;
end;
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/WPAN/WLAN 2567 19.04.2026 23:21
[ *NIX ] Задай вопрос - получи ответ. Xszz *nix 1547 15.06.2010 15:41
[jQuery] - Задай вопрос, получи ответ Isis PHP, PERL, MySQL, JavaScript 62 25.12.2009 03:25
ЕсТь ВоПрос Guma Чаты 4 26.10.2005 21:48



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


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




ANTICHAT.XYZ