أصغر برنامج على الإطلاق مكتوب بدلفي

لقد قمت بعمل تطبيق وصل حجمه الى 4 كيلو بايت و بعد الضغط اصبح حجمه 3 كيلو بايت

الملفين في المرفق

اقتباس

أرجو أن لا تكون قمت بعملية hack وتعديل جدري على بنية PE وباقي segments code أو data .

ارجوا ذلك لان هذا لا يعتبر ضغط

اقتباس

ما هذا !

تحيز كبير لikossan هل لانه مشرف ؟

اين باقي الشباب

نريد مشاركات

ليس تحيز اخي الكريم هل رأيت الطريق التي قام بها ايكوسان حتى عرض النافذة

ظننت انه لم يعد هناك شيئ يمكن عمله بعد هذا

ولكن كيف قمت بعمل ملف 2.66 بدون اي برنامج ضغط !!

وانا ايضا اضع اسلحتي بعد بحث على الانترنت دام 6 ساعات و لم افلح بشيئ

استغراب:

في الملفين المرفقين الملف الموجود داخل After اي بعد الضغط اصغر من الملف الموجود داخل Before و

مع ذلك ال WinRar قام بضغط الملف الاصغر و اصبح حجمه اكبر يا ترى لماذا!!!!!! :huh: :huh:

After.rar

Before.rar

هل اختبرتم هذا للضغط بما انه لدلفي

http://www.uplib.com/

بخصوص ازدياد الحجم بسيطة, هناك كتلة ثابتة تخص فك الضغط لنقل انها بحجم 25بايت, وافرض ان البيانات التي تم ضغطها نقصت بمقدار 5بايت فقط.. بالتالي تجد زيادة 20بايت تابعة لاجرائية فك الضغط.

مع إني خنت و خذلت دلفي (إلى فيجوال بيسك نت) و تركتها لكن الموضوع أثار إهتمامي كثيراً ..

والمنافسة برأيي الشخصي تحتاج إلى معايير تضبطها .. حتى يتم تقييم كل مشاركة ..

وشكراً لكم :)

Xacker كتب:

هل اختبرتم هذا للضغط بما انه لدلفي

http://www.uplib.com/

بخصوص ازدياد الحجم بسيطة, هناك كتلة ثابتة تخص فك الضغط لنقل انها بحجم 25بايت, وافرض ان البيانات التي تم ضغطها نقصت بمقدار 5بايت فقط.. بالتالي تجد زيادة 20بايت تابعة لاجرائية فك الضغط.

أعتقد ان أفضل أدوات الضغط حاليا هو upx بإصدارته الأخيرة 2.00 Apr 27th 2006 التي توفقت على aspack 2.12 التي لم يطور منذ 2002.

imadouzoun كتب:

مع إني خنت و خذلت دلفي (إلى فيجوال بيسك نت) و تركتها لكن الموضوع أثار إهتمامي كثيراً ..

والمنافسة برأيي الشخصي تحتاج إلى معايير تضبطها .. حتى يتم تقييم كل مشاركة ..

وشكراً لكم :)

الشرط على ما أعتقد هو أن تقوم ببرمجة تطبيق بلغة pascal delphi يعرض رسالة arabteam2000 ولك أن تستعمل أدوات التعديل ك ressource editors او أدوات الضغط pe packer.

اقتباس

هي بقولوها بالسوري معناها "اتفضل مع السلامة بلا مطرود"

بالسورية: يبعتلوا حمة شوغليز :P

دعابة :D

اقتباس

والمنافسة برأيي الشخصي تحتاج إلى معايير تضبطها .. حتى يتم تقييم كل مشاركة ..

ومن طلب رايك ؟

ان كان عندك مشاركة شارك او اصمت

اقتباس

الشرط على ما أعتقد هو أن تقوم ببرمجة تطبيق بلغة pascal delphi يعرض رسالة arabteam2000 ولك أن تستعمل أدوات التعديل ك ressource editors او أدوات الضغط pe packer

لا

اكتب بريمج بلغة باسكال باستحدام دلفي يعرض كلمة ArabTeam2000

استعمل اي طريقة كانت لتحصل على اصغر ملف تنفيذي

بانتظار مشاركات باقي الشباب

مموضوع أخر له علاقة

يا لـقوة الدلفي الرسوم الثلاثية الأبعاد !, عروض و رسوم ثلاثية ابعاد بملف حجمه 64 ك.

اقتباس

استغراب:في الملفين المرفقين الملف الموجود داخل After اي بعد الضغط اصغر من الملف الموجود داخل Before و مع ذلك ال WinRar قام بضغط الملف الاصغر و اصبح حجمه اكبر يا ترى لماذا!!!!!!

كما قال أخي Xacker

هناك Header لبرنامج Winrar بها معلومات عن ماهو مضغوط مثل إسم الملف و التاريخ و غيره

عندما يكون الملف غير قابل للضغط: تطبيق خواريزميى الضغط لا يعطي حجم أضغر من الحجم الأولي

اقتباس

لأن أفضل برامج الضغط هي upx و aspack لا تتعدى كمعدل ضغط قصوي 70% من الملف الأصلي

هناك برامج كثيرة تضغط أحسن من UPX و AsPAck

ربما عيبها الوحيد هو أنها غير معروفة عند الكثير من المبرمجين عامة

مثل fsg,Mew, upack...وغيرها

وهناك أيضا Private اي غير متوفرة للعامة مثل krunchy

هناك برنامجي الصغير الذي لا يزال قيد التطويرmPack لملفات أكبر من 100 كيلوا فقط

وكمثال على البرامج غير المعروفة ،البرنامج المرفق صيني أحبه كثيرا لا لأن نسبة ضغطه جيدة بل لأن به دعابة من مبرمجه

PEQuake.rar

:lol: شكرا delta :lol: .

للرفع

هذه وصلات في منتدى الأخ orwah:

عشر نصائح لتحسين حجم وسرعة تطبيقات دلفي

حجوم ملفات لغة دلفيDelphi . خطأ لغة ام خطأ مبرمج

لقد كان عندي مشكل في الحاسب: bitdefender برنامج مضاد الفيروسات تعرف على برنامج الأخ dj-siba ذو 700bytes على أنه مصاب بفيروس.

قمت بتعطيل مضاد الفيروسات حتى أستطيع تنفيذه, بعد أن تأكدت أنه خالي فعلا من الفيروسات بل كان فقط تخمين وحجز إحتياطي من مضد الفيروسات حول برنامج الأخ.

هذا الحجز كان سببه أن البرنامج كان برنامج مكتوب لل dos بتقنية .com ويقوم بإستدعاء برنامج من الذاكرة بلغة win32.

هذا ليس ببرنامج لديلفي لأن ديلفي لا تبرمج للدوس في real mode ولا في 16bits عموما, إلا ديلفي 1 التي كانت تبرمج ل win16. و لا أعلم ما هو برنامج الضغط الذي يضغط برنامج win32 في ملف تنفيذي dos 16 bits بامتداد Com.

هذا نص الكود للملف 700bytes مكتوب بلغة assembly تظهر أنه ملف dos 16 bits بتقنية com files:

; File Name   :	C:\Documents and Settings\Mourad\Mes documents\_tiny.EXE
; Format	  :	MS-DOS COM-file
; Base Address:	0h Range: 100h-3BCh Loaded length: 2BCh

		.686p
		.mmx
		.model tiny

; ***************************************************

; Segment type:	Pure code
seg000		segment	byte public 'CODE' use16
		assume cs:seg000
		org 100h
		assume es:nothing, ss:nothing, ds:seg000, fs:nothing, gs:nothing

; **************** S U B	R O U T	I N E ***************


		public start
start		proc near
		mov	si, 10Dh
		mov	di, 7F00h
		mov	cx, di
		cld
		push	di
		rep movsb
		retn
start		endp; sp = -2
;othe instractions..... for the body win32 compressed

في المرفق الملفين التنفيذيين كأقصى حد وصلت إليه بإستعمال ديلفي ووسائل الضغط المتاحة دون التعديل الجذري على بنية الملف التنفيذي.

فملف الضغط لم يقم بضغط الملفات المجمعة بديلفي و لكن قام بحذف relocation من الملف التنفيذي ولم يضف إليه أي شيئ, حتى LOADER.

في إنتظار توضيح الأخ dj-siba .

2_exec_3k_and_2.5k.rar

dj-siba كتب:

وحسب الشرط: ننطلق من برنامج دلفي و نطبق عليه كل ما أمكن للحصول على اصغر حجم

بانتظار باقي الشباب و المشاركات

:rolleyes:

لقد رفع الموضوع كثيرا :o أخاف أن يرفع ويرفع إلى أن يهوي على أم رأسه :lol: .

ما هى الدعابة التى فى برنامج PEquake ؟؟

في إنتظار الأخ dj-siba للشرح و إبداء التوضيح حول برنامجه الذي يعد أصغر برنامج وضع في المشاركات, إن شاء الله نستفيد و نعمم الفائدة المرجوة من كل مواضيع المنتدى. :D

عفوا على الدخول المفاجئ ولكن أود التأكيد على ما ذكره الأخ ikossan بأن الملف صاحب الـ 700 بايت هو ليس بملف exe أساسا لذلك أعتقد أنه من غير المقبول تصنيفه كبرنامج صنع بلغة Delphi حتى ولو كانت الانطلاقة منها, حيث بالإمكان صنع برنامج بلغة Delphi ثم فتحه ببرنامج تحرير وتغيير كل ما يحتويه فنصل إلى برنامج Assimbly

ولكن هذا لا ينفي أنني مازلت أتشوق لمعرفة الطرق التي استخدمتها ;)

وبعد الانتهاء من هذه المنافسة الرائعة للحصول على أصغر تطبيق Delphi وكما اقترح بعض الأخوة أود لو تكون المنافسة التالية لأحسن أداء لمهمة معينة...

اقتباس

شو ؟ الزاهر ما شفت كل المشاركات والشروط

لقد قرأت جميع المشاركات والجيد أنك أعدت ذكر القوانين والتي قد خالفتها أنت ببرنامجك

اقتباس

المهم برنامج دلفي و الملف التنفيذي بأقل حجم ممكن

حيث وكما قلت لم يعد برنامجك يعتبر بأنه برنامج دلفي

اقتباس

يمكنك استعمال برامج الضغط أو برامج Hex

إن هذه العبارة ضمن الشروط تجعلني أسكت :unsure: ولنها تتعارض مع العبارة السابقة

على كل حال لن نطيل بالنقاش فلقد أذهلتنا جميعا بصغر ببرنامجك وننتظر منك الشرح

اين شرح ما فعلت اخي dj-siba ؟

للرفع :)

اسف، نسيت الموضوع

ساحاول تحضير درس في اقرب وقت ممكن

أه دلفاي أه B)

SaD jAckAl كتب:

أه دلفاي أه B)

لماذا هذه ال أه, هل هي بعد ترك الدلفاي لمدة طويلة:)

اقتباس

ساحاول تحضير درس في اقرب وقت ممكن

بالانتظار يا dj, بالانتظارررر.

if u search the net u get some alternative system and sysutilis unit made by rootkit programmers, using it u can get smaller exe

plus , i think using older delphi (i.e delphi 2?) will generate more smaller exe too

في الانتظار اخي dj-sba