التغير في PE Header من برنامجي
#1
السلام عليكم كيف حالكم
طلب منكم طريقة تغير pE Header تبع برنامج اخر من برنامجي بالدلفي
مثل البرنامج الاخر عند وضعه في الهيكس يكون mz اريد تغيرها
[-] كل من 1 user says قال شكرا ل FouoooT على المشاركة المفيدة
  • Rever7eR
الرد
#2
وعليكم السلام ورحمة الله
عند تغيير MZ لايتعامل النظام Windows مع الملف كملف تنفيذي PE
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
[-] كل من 1 user says قال شكرا ل محمد عبد العزيز على المشاركة المفيدة
  • FouoooT
الرد
#3
الاستاذ العزيز عبدالعزيز
نعم هذا الذي اريد ان اغيره في ملف برنامج من برنامجي
اريد طريقة تغير اول mz في برنامج الاخر
الرد
#4
لنقل غيرت MZ الى XL
ثم ماذا ؟ هل تتوقع ان النظام سينفذ البرنامج ؟
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
الرد
#5
انا اعلم ان لن يعمل استاذ عبدالعزيز
لكن اريد معرفتها يوجد فايروسات تتلف البرامج بتغير اول محرفين mz
وانا اريد معرفة ارجاعها من برنامجي
[-] كل من 1 user says قال شكرا ل FouoooT على المشاركة المفيدة
  • Rever7eR
الرد
#6

شيئ على السريع...

كود :
Procedure ChangeMZ(filname:pchar); var  hFile,dwReadWrite:DWORD;  EXE  :WORD; begin if filname='' then Exit; hFile:=CreateFileA(filname, GENERIC_READ + GENERIC_WRITE, FILE_SHARE_READ + FILE_SHARE_WRITE, NIL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); if hFile=INVALID_HANDLE_VALUE then Exit; ReadFile(hFile,EXE,2,dwReadWrite,NIL); if EXE<>$5A4D then    begin      EXE:=$5A4D;      SetFilePointer(hFile, 0, nil, FILE_BEGIN);      WriteFile(hFile, EXE,2 , dwReadWrite, nil);    End;  CloseHandle(hFile); end;
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
[-] كل من 4 users say قال شكرا ل محمد عبد العزيز على المشاركة المفيدة
  • Rever7eR, invocker, FouoooT, S.FATEH
الرد
#7
عمل رايع منك استاذ عبدالعزيز 
ممكن طريقة استخدام هذا الاجراء ؟؟
الرد
#8
لاتناديني استاذ
مجرد مثال يبسيط، الاستدعاء باسم الملف بالمسار كامل، مثل

كود :
ChangeMZ('D:\SOMEDIR\SOMEFILE.exe');
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
[-] كل من 1 user says قال شكرا ل محمد عبد العزيز على المشاركة المفيدة
  • FouoooT
الرد
#9
قمة تواضع منك اخ عبدالعزيز
شكرا وضحت الفكرة
الرد
#10
عند تنفيذ يظهر خطا في صورة التالية ماهو الحل اخ عبدالعزيز
[صورة: 154498572194231.png]
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم