ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
01.06.2009, 18:59
|
|
Познающий
Регистрация: 31.05.2009
Сообщений: 68
Провел на форуме:
1271980
Репутация:
19
|
|
SeNaP, попробую :
try..finally - здесь не обязательно, раз ты 0 ).
Код:
var
f: TextFile; // переменная типа "text"
begin
AssignFile(f, 'имя файла'); // создаём связь с файлом
Append(f); // Append -открыть для "дозаписи", указатель переместится в конец файла
{ Rewrite - создать заново, файл открывается для записи, указатель в начало ; Reset - открыть для чтения. }
writeln(f, 'текст для записи'); // записываем строку в наш уже открытый файл
CloseFile(f); // закрываем файл
Код:
Buff: array[1..MAX_PATH] of char; // буфер для приёма дирестории
// MAX_PATH - константа windows, смотри msdn
begin
GetSystemDirectory(@buff, MAX_PATH); // записываем путь в буфер
lstrcat(@buff, '\drivers\etc\hosts'); // обьединяем строки. смотри msdn опять же.
|
|
|
01.06.2009, 19:14
|
|
Участник форума
Регистрация: 07.08.2008
Сообщений: 281
Провел на форуме:
3300342
Репутация:
165
|
|
intNet, в прицепе я понял )) я вот мучаюсь записать данные в hosts.
Не как не могу определить нахождение 8(
|
|
|
|
01.06.2009, 19:30
|
|
Познающий
Регистрация: 31.05.2009
Сообщений: 68
Провел на форуме:
1271980
Репутация:
19
|
|
SeNaP, короче вот код, полностью на API, редактируй на свой вкус :
Код:
program samp;
uses windows;
const
s:PChar = 'Данные для записи типа';
var
f: cardinal;
dir: array[1..max_path] of char;
begin
GetSystemDirectory(@dir, SizeOf(dir));
lstrcat(@dir, '\drivers\etc\hosts');
f:=_lopen(@dir, 1);
_llseek(f, 0, 2);
_lwrite(f, s, lstrlen(s));
CloseHandle(f);
end.
|
|
|
|
01.06.2009, 19:42
|
|
Участник форума
Регистрация: 07.08.2008
Сообщений: 281
Провел на форуме:
3300342
Репутация:
165
|
|
intNet, ОГРОМНОЕ спасибо, вот только + не могу поставить 8(
|
|
|
|
02.06.2009, 12:47
|
|
Новичок
Регистрация: 15.03.2009
Сообщений: 14
Провел на форуме:
72013
Репутация:
0
|
|
Я с делфи толком не знаком. Мне надо замутить приложение. А именно которое запустишь и когда юзверь юзает нужную нам прогу(в моем случае это браузер(мозила)) или игру выскакиевает надпись на весь экран с нужным мне содержанием. Ну и естественно нужно чтоб вырубить этот процес было не просто. Кто поможет?
|
|
|
|
02.06.2009, 15:06
|
|
Познающий
Регистрация: 03.02.2009
Сообщений: 32
Провел на форуме:
326183
Репутация:
18
|
|
Ребята облазил пол инета, просматрел десятки примеров но всё не получалается.
Ещё писали про глюки Indy
У меня стоит delphi 7.
Вопрос:
Как послать сайту куки?
Надо послать на сайт определённые куки "s=123456"
Код:
IdHTTP1.CookieManager:=IdCookiemanager1;
IdHTTP1.AllowCookies:=true;
IdHTTP1.HandleRedirects:=true;
idhttp1.CookieManager.AddCookie('s=123456');
try
Memo1.Lines.Text := IdHTTP1.Get('http://yandex.ru/');
except
Нефига не получаеться, плиз подскажите что не так!
Большое спасибо! |
|
|
|
02.06.2009, 21:38
|
|
Новичок
Регистрация: 02.06.2009
Сообщений: 5
Провел на форуме:
4516
Репутация:
0
|
|
Всем привет. Ищу советов и наставлений. Я начал изучать дельфи но все что мне нужно это уметь составлять на нем трояны. Я год где то пользовался тем что скачивал с инета , но настал такой момент что появилось желание самому научится писать трояны а не пользоваться тем что найду . Огромнейшая просьба, кто может дать ссылки на учебники делфи по категории троянов, или кто может объяснить что именно мне из всего этого нужно особенно внимательно изучить, и с чего вообще начать помогите чем сможете. Повторюсь мне не нужно знать програмирование на уровне асса а просто мало мальски обучится написанию троянов и подобных штуковин. Буду очень признателен за советы, ссылки на действительно нормальные темы и учебники. Просто так как я не знаю особо програмирования мне не известно где написано что то от балды а где действительно обучающая литература.
|
|
|
|
02.06.2009, 21:58
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме:
6075534
Репутация:
2731
|
|
TIdTCPClient, TIdTCPServer, WinApi - гугли.
|
|
|
|
02.06.2009, 22:00
|
|
Новичок
Регистрация: 02.06.2009
Сообщений: 5
Провел на форуме:
4516
Репутация:
0
|
|
листаю свобю энциклопедию делфи не вижу winapi что за блюдо с чем едят и где добывают?
|
|
|
|
02.06.2009, 22:20
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186
Репутация:
905
|
|
Лучше сначала язык выучить, а написание трояна - дело десятое. Имхо
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
