Понедельник, 23.12.2024, 04:46 Приветствую вас Гость | Группа "Гости" 
Меню сайта

Категории раздела
Системные [77]
работа с файлами,устройствами
Интернет и сети [65]
Сетевые и интернет
Документы [3]
Работа с текстом
Архивация [3]
Примеры сжатия файлов
Камера [3]
Работа с вэб камерой
Директории [2]
Работа с папками
Мультимедиа [10]
графика и т.д.
Звук [2]
Работа со звуком
Изображения [2]
Работа с изображениями
Память [1]
Работа с памятью компьютера
Пароли [4]
Работа с паролями
Потоки [2]
Исходники поточных приложений
Процессы [4]
Работа с процессами компьютера
Окна [4]
Работа с окнами
PE файлы [2]
Работа с Portable Executable
Шифрование (криптография) [6]
Примеры применения криптографических алгоритмов
Работа с иконками [1]
Работа с иконками
Работа с файлами [9]
Работа с файлами
Офисные [1]
Работа c Офисными приложениями
Базы данных [1]
Примеры работы с базами данных

Популярные статьи

Недавние темы

Опрос
Вы счастливы?
Всего ответов: 224

Главная » Файлы » Delphi Исходники » PE файлы

Добавление своего кода в exe файлы
5.5 Kb 07.11.2009, 16:52
Исходник программы, показывающей пример добавления произвольного кода в бинарные файлы на примере добавления функции Beep в EXE файл (функция срабатывает при старте программы)
Категория: PE файлы | Добавил: dolphin
Просмотров: 5164 | Загрузок: 799 | Комментарии: 5 | Рейтинг: 2.3/3
Всего комментариев: 5
avatar
5 MAS • 17:37, 17.08.2013
а как добавить мой код, например на запуск другого фаила хотябы, что бы я понял заражон файл или нет, не врубаюсь в ети внедрения я
avatar
4 dolphin • 14:24, 03.05.2011
Работоспособность кода примерно 90%
avatar
3 XDXDXD • 19:54, 23.04.2011
После испытаний на моём компе этого виря у мя полетел EXPLORER.EXE хотя я его не заражал так что несоветую испытывать его на своих компах
avatar
2 rotormega • 02:38, 21.05.2010
Code

  TSect = packed record
  Name: Array [0..7] of Byte;  //Имя секции.
  S_VSiz: DWORD;  //Виртуальный размер.
  S_RVA: DWORD;  //Виртувльное смещение.
  S_FSiz: DWORD;  //Размер в файле.
  S_FOfs: DWORD;  //Смещение в файле.
  S_Res: Array [0..11] of Byte;  //Не используем.
  S_Flag: DWORD;  //Флаг секции.
  end;

Code

  NewSect.Name[0]:= ord('.');
  NewSect.Name[1]:= ord('N');
  NewSect.Name[2]:= ord('e');
  NewSect.Name[3]:= ord('w');  //Имя секции (произвольное).
  NewSect.Name[4]:= ord('S');
  NewSect.Name[5]:= ord('e');
  NewSect.Name[6]:= ord('c');
  NewSect.Name[7]:= ord('t');

Решение для CodeGear2009
avatar
1 rotormega • 01:46, 21.05.2010
у меня проблема, при компиляции кода в кодегеаре2009 подопытный файл перестает работать, однака при компиляции 7 все куль робит. форточка седьмая.
Спс огр автору. помогло контролить юзверей, а то раньше они умудрялись закрывать процесс другой проги, а тут они никак сообразить не могут, wacko в нокауте сразу и обойти еще долго не смогут.
avatar
Профиль



Поиск

Наша кнопка
Вирусология, взгляд из Delphi

Статистика
Top.Mail.Ru Яндекс.Метрика Счетчик тИЦ и PR
Статистика материалов
Файлов: 457
Форум: 1175/8162
Коментариев: 770
Новостей: 29

Статистика пользователей
Всего: 385
За неделю: 2
Вчера: 0
Сегодня: 0
Всего онлайн: 1
Гостей: 1
Пользователей: 0

delphicode.ru © 2008 - 2024 Хостинг от uCoz