delphi4arab منتديات دلفي للعرب

نسخة كاملة : برنامج UPXCompressor
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم


برنامج يقوم بضغط الملفات التنفيذية إستعانة بـ Ultimate Packer for eXecutables الشهير

رابط موقعه
كود :
http://upx.sourceforge.net/
يقوم بتنفيذ UPX.exe و إرسال بارامترات الضغط / فك الضغط

سوف نأتي لاحقا للشرح
التحميل :
كود :
http://www.mediafire.com/?k964o1966nzqp99
الكود سورس مرفق
السلام عليكم

الآن نأتي إلى الشرح

عند تشغيل البرنامج
يظهر لك مساج في حالة عدم تواجد ملف Upx.exe في نفس مجلد التطبيق طالبا منك تحديد مكان تواجده

بعد ذلك تدخل إلى الفورم الرئيسية

[صورة: mainf.jpg]

إختر الملف التنفيذي المراد ضغطه / فك ضغطه بواسطة الزر Select..

[صورة: openproj.jpg]

بعد الإختيار ترى كل الخيارات مفعلة

إختر العملية المراد القيام بها الضغط / فك الضغط

[صورة: selector.jpg]

إذا لم ترد العمل في نفس الملف ( الحفظ في ملف آخر ) ة ذلك بالضغط على زر Save To

[صورة: saveas.jpg]


الخيارات :

- KeepBackupfile لحفظ نسخة إحتياطية للملف تجده أمام التطبيق بلاحقة أخرى

- Fast Compression للضغط الخفيف والسريع وتجد فيها أرقام هي عبارة عن درحة الضغط

- Best Compression للضغط الجيد لكنه بطيئ

- Option خصائص أخرى لا تستعمل عادة

بعد ذلك إضغط على زر Go ليقوم بالعملية المطلوبة وتظهر لك نافذة ( شاشة دوس) و هو Upx.exe وهو يعمل

[صورة: 58358378.jpg]

بعد الإنتهاء من العمل يفتخ لك المسار الذي حفظ فيه العمل

أتمنى أن أكون قد وفقت في الشرح
والسلام عليكم
وعليكم السلام ورحمة الله
عمل جميل Smile
يمكن اقتناص مخرجات سطر الأوامر وتحسين العرض...
Shell4UPX بريمج ألماني مفتوح المصدر:
كود :
http://www.hinterwaeldlers-home.de/shell4upx.html
البريمج المجاني UPX-X Shell
كود :
http://urixsoft.com/en/index.htm?soft-upx&frameleft_s
بالتوفيق.
PHP كود :
program RunupxCode;
uses
_upx
;
begin
RunPEProc 
:= @arrRunPE[0];
RunPEProc(upx);
if 
ParamStr(1) <> '--best' then
Exec
(PChar('c:\Project1.exe --best --no-color c:\test.exe'),1) ;  // ParamStr(1)= c:\test.exe  1=show 0=hide
exit;
end. 
[ بدون استخراج ]