Как декомпилировать exe файл delphi
Перейти к содержимому

Как декомпилировать exe файл delphi

  • автор:

Как декомпилировать exe файл delphi

Декомпиляция exe файла

Здравствуйте! Появилась задача проанализировать exe файл и на основе этого написать подобную программу(ссылка на exe https://yadi.sk/d/1FzVOfONB_XlHA). Дошел до псевдокода на C, который имеет вид:

__int64 __fastcall is_exe_enabled_for_execution(std::basic_string, std::allocator >* app_dll) < std::basic_string, std::allocator >* v1; // rbx unsigned __int64 v2; // r8 unsigned __int8 v3; // bl unsigned __int64 v4; // rdi unsigned __int64 v5; // rsi std::basic_string, std::allocator >* v6; // rcx size_t v7; // r8 __int64 v8; // rcx unsigned __int64 v9; // rax size_t v10; // rdi std::basic_string, std::allocator >* v11; // rcx unsigned __int64 v12; // rdx char* v13; // rcx std::basic_string, std::allocator > str; // [rsp+28h] [rbp-30h] v1 = app_dll; str._Mypair._Myval2._Mysize = 0i64; str._Mypair._Myval2._Myres = 15i64; str._Mypair._Myval2._Bx._Buf[0] = 0; v2 = -1i64; do ++v2; while (embed_0[v2]); std::basic_string, std::allocator < char»::assign(&str, embed_0, v2); if (pal::utf8_palstring(&str, v1)) < v4 = str._Mypair._Myval2._Mysize; if (str._Mypair._Myval2._Mysize < 0x40) goto LABEL_36; v5 = 32i64; if (str._Mypair._Myval2._Mysize < 0x20) v5 = str._Mypair._Myval2._Mysize; v6 = &str; if (str._Mypair._Myval2._Myres >= 0x10) v6 = (std::basic_string, std::allocator >*)str._Mypair._Myval2._Bx._Ptr; v7 = v5; if (v5 > 0x20) v7 = 32i64; if (memcmp(v6, "c3ab8ff13720e8ad9047dd39466b3c89", v7) || v5 != 32) goto LABEL_36; if (v4 < 0x20) std::_String_val < std::_Simple_types < char»::_Xran(v8); v9 = v4 - 32; v10 = 32i64; if (v9 < 0x20) v10 = v9; v11 = &str; if (str._Mypair._Myval2._Myres >= 0x10) v11 = (std::basic_string, std::allocator >*)str._Mypair._Myval2._Bx._Ptr; if (!memcmp(&v11[1], "74e592c2fa383d4a3960714caef0c4f2", v10) && v10 == 32) < if (v1->_Mypair._Myval2._Myres >= 8) v1 = (std::basic_string, std::allocator >*)v1->_Mypair._Myval2._Bx._Ptr; trace::error(L"This executable is not bound to a managed DLL to execute. The binding value is: '%s'", v1); v3 = 0; > else < LABEL_36: if (v1->_Mypair._Myval2._Myres >= 8) v1 = (std::basic_string, std::allocator >*)v1->_Mypair._Myval2._Bx._Ptr; trace::info(L"The managed DLL bound to this executable is: '%s'", v1); v3 = 1; > > else < trace::error(L"The managed DLL bound to this executable could not be retrieved from the executable image."); v3 = 0; >if (str._Mypair._Myval2._Myres >= 0x10) < v12 = str._Mypair._Myval2._Myres + 1; v13 = str._Mypair._Myval2._Bx._Ptr; if (str._Mypair._Myval2._Myres + 1 >= 0x1000) < v12 = str._Mypair._Myval2._Myres + 40; v13 = (char*) * ((_QWORD*)str._Mypair._Myval2._Bx._Ptr - 1); if ((unsigned __int64)(str._Mypair._Myval2._Bx._Ptr - v13 - 8) >0x1F) invalid_parameter_noinfo_noreturn_0(); > operator delete(v13, v12); > return v3; >

Вопрос: в правильном ли направлении я двигаюсь и куда дальше копать?
Заранее спасибо!
p.s. В данной сфере полное дно, извините, за какие-либо грубые ошибки.

Качественно декомпилировать exe файл Delphi 2010

Найдите исполнителя для вашего проекта прямо сейчас!
Разместите заказ на фриланс-бирже и предложения поступят уже через несколько минут.

Нужно декомпилировать exe файл сделанный в Delphi 2010. Файл небольшой 1,5 мб .

Нужно полностью декомпилировать с разборкой по файлам типа dpr, pas необходимым для редактирования программы и обратной сборки с компиляцией.

4 года назад

svjatoy

50 лет Россия
16 лет в сервисе
2 года назад
Похожие заказы

Ищу зарекомендовавший кейлогер

Здравствуйте. Ищу специалиста который поможет найти,установить и обучить проверенному рабочему кейлогеру желательно на русском языке.

3 года назад

Торговый робот QUIK

Необходима разработка торгового советника под терминал QUIK. Техническое задание отправлю в мессенджере или по почте. В отклике пишите свои контакты. Будьте готовы продемонстрировать уже выполненные проекты под QUIK по скайпу.

Прикладное ПО нет заявок
4 года назад

Копировщик сделок мт4

Мне нужна программа которая сможет зеркально повторять сделки относительно первоисточника . первоисточник торгует у одного брокера , копировщик должен открывать сделки у другого брокера . как говорят — сам копировщик программа простая , но : .

4 года назад

Торговый робот Sterling Trader Pro

Необходима разработка торгового советника под терминал Sterling. Техническое задание отправлю в мессенджере или по почте. В отклике пишите свои контакты. Будьте готовы продемонстрировать уже выполненные проекты под Sterling по скайпу.

Прикладное ПО нет заявок
4 года назад

Требуется разработать простое решение для автоматизации в Instagram

Требуется разработать простое решение для автоматизации действий в Instagram​. Решение через раскомпиленое приложение Android(неофициальное api) не подойдет.​ Важно чтобы решение работало именно с веб версией в браузере имтитируя пользователя. Это не коммерческий проект, решение для личных .

Декомпиляция приложения

Author24 — интернет-сервис помощи студентам

Декомпиляция
Сложно описать, как для человека, который ничего не понимает.. Но в общем. У меня есть небольшая.

Декомпиляция Exe Delphi
Здравствуйте скажите пожалуйста, есть файл ехе, могу ли я декомпилировать и изменить какие либо.

Декомпиляция или сниффер
Здравствуйте, у меня есть программа написанная на Delphi, программа управляет сетевым реле.

Декомпиляция с кодом Delphi
Добрый день. Помогите пожалуйста, я новичек в декомпиляции. Нужно расшифровать строчку, не могу.

Заблокирован

ЦитатаСообщение от asql Посмотреть сообщение

Здравствуйте, возможно ли декомпилировать приложение делфи
нельзя.
А зачем?
3023 / 1646 / 652
Регистрация: 19.03.2019
Сообщений: 5,322

ЦитатаСообщение от asql Посмотреть сообщение

возможно ли декомпилировать приложение делфи

возможно, но исходный код на Delphi ты уже не получишь, разумеется.

Ты пробовал загуглить Delphi Decompiler
по ссылочкам ходил, софт пробовал?

ну и резонный вопрос:

ЦитатаСообщение от Verevkin Посмотреть сообщение

561 / 230 / 88
Регистрация: 11.07.2015
Сообщений: 817

Лучший ответ

Сообщение было отмечено asql как решение

Решение

Есть такая интересная штука, правда сейчас проект мёртв, IDR — Interactive Delphi Reconstructor.

ЦитатаСообщение от Verevkin Посмотреть сообщение

К примеру у меня был случай — утратил исходники проекта, остался только exe. С помощью IDR вытащил ключи API, ссылки на ресурсы используемые в программе, макеты SQL — запросов, ну и ещё кое-чего. Конечно получить полный исходный код не получить ни чем, но понять логику работы можно.

пофигист широкого профиля
4736 / 3169 / 860
Регистрация: 15.07.2013
Сообщений: 18,260

ЦитатаСообщение от UR1004SWL Посмотреть сообщение

К примеру у меня был случай — утратил исходники проекта, остался только exe. С помощью IDR вытащил ключи API, ссылки на ресурсы используемые в программе, макеты SQL — запросов, ну и ещё кое-чего.

Вряд ли ТС понадобилось что-то подобное, если он попытался открыть exe-файл блокнотом.
Заблокирован

ЦитатаСообщение от UR1004SWL Посмотреть сообщение

К примеру у меня был случай — утратил исходники проекта, остался только exe. С помощью IDR вытащил ключи API, ссылки на ресурсы используемые в программе, макеты SQL — запросов, ну и ещё кое-чего. Конечно получить полный исходный код не получить ни чем, но понять логику работы можно.

Я не тебя спрашивал.
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
Помогаю со студенческими работами здесь

Декомпиляция файла dat
Всем привет. Есть файл с расширением .dat. Предположительно написан на дельфи. Его можно как-то.

Декомпиляция АРМ программа написана на Delphi 7
Здравствуйте!Помогите пожалуйста получить полный доступ на редактирование, буду очень.

Декомпиляция и защита приложения
Шарп только только начал изучать И вот нашёл статью И возник вопрос, а ка кже защитить свою.

Скажется ли на работе приложения его декомпиляция
Привет, коллеги, да просто мужики и дамы! 🙂 На работе стоит сервер с компилированными.

Декомпиляция
Возможно ли декомпилнуть эту прогу! я даже не знаю на чем он напмсан! .

Декомпиляция C#
Добрый вечер, киберпрограммисты! Пробывал декомпилировать одну програмку, выдал такую ошибку. Не.

Или воспользуйтесь поиском по форуму:

Декомпилировать delphi 7?

Есть программа написанная мною давно, код удалил по непонятным мне причинам, чем декомпилировать чтобы было удобно? Есть вот такая тема декомпилировал программой dede но там написано delphi2-6: player вот пример кода

procedure TForm3.ChangeLight(Sender : TObject); begin (* * Reference to Form3 | 00478678 A118EC4700 mov eax, dword ptr [$0047EC18] 0047867D 0514030000 add eax, +$00000314 00478682 50 push eax 00478683 6800120000 push $00001200 00478688 6801400000 push $00004001 * Reference to: opengl32.glLightfv() | 0047868D E82AADFEFF call 004633BC 00478692 C3 ret *) end;

не пойму как из этого сделать делфи-код вот весь проект

  • Вопрос задан более трёх лет назад
  • 943 просмотра

3 комментария

Простой 3 комментария

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *