HomeWork_01 - تمرين تطبيقي

[STRELiTZIA]

السلام عليكم و رحمة الله

هذا تمرين تطبيقي تكملة لدرس الخصائص و الأحداث.

المطلوب:
- برمجة مثال مطابق للتمرين المرفق في مجلد : Release
- ترفق الحلول مع الملفات المصدرية.


مراحل العملية:
- إنشاء مشروع جديد و إضافة المكونات اللازمة للمشروع اعتمادا على الملفات الموجودة في مجلد Addins.
- اخذ الأوامر، الأحداث و الخصائص الموجودة في ملف Code.txt.


بالتوفيق إن شاء الله

[hanipino]

السلام عليكم
- تم حل التمرين . استعملت الدالفى 2006 بسبب ان الحدث MouseLeave اختفى من الدالفى 7
بعد تثبيت الدالفى 2009 . ساقوم باعادة تثبيته .
- لا ادرى سبب ضخامة حجم الملف التنفيدى 855 KO :(
__________

- السورس .
- الملف التنفيدى .

[me&delphi]

أنجزت التمرين ب الدلفي 7
في انتظار ملاحضاتكم

[STRELiTZIA]

السلام عليكم و رحمة الله

- لا ادرى سبب ضخامة حجم الملف التنفيدى 855 KO


- سؤال مهم جدا... هل من مجيب ؟

- ايضا ما هي اسباب كبر حجم الملفات التنفيذية الناتجة لنفس المشروع بدون اي تغيير بين نسخة Delphi 7 دلفي 7 و Delphi Architect 2009 دلفي اركيتكت 2009 ؟

- لماذا حجم الملف التنفيذي المرفق في التمرين ليس كبير ؟

- لماذا الملفات التنفيذية الناتجة لدلقي هي دائما كبيرة الحجم؟ و ماهي الحلول المقترحة ؟

----
الحلول المقبولة :
me&delphi : حل صحيح و جميل ينقصه فقط بعض التنسيق في تفاعل زر TestMe و ايضا استعمال خاصية Cursor.
hanipino : حل ممتاز، نسيت فقط Underline ايضا لم يرد ذكر حدث MouseLeave في الملف المرفق Code.txt

بالتوفيق ان شاء الله

[Nighttime Dragon]

السلام عليكم ,,

انهيت من حل التمرين بأنتظار ملاحظتكم :rolleyes: حول المشروع ..
اخي العزيز STRELiTZIA اتمنى بعد انتهاء مدة تسليم الحلول شرح حول خاصيتي MouseMove,MouseDown حيث اني قمت بعمل الحل على اكمل وجه لكن يوجد خلل في الزر Test Me في بعض الاحيان عند ابتعاد مؤشر الفأره عنه كما ستلاحظ في البرنامج , لكن لو وجدت الخاصية التي تحدث عنها الاخ hanipino لا اعتقد سوف تحدث نفس المشكلة اي MouseLeave ..

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

برأي لان دلفي عكس الفيجول بيسك ترفق المكتبات و الاضافات الخاصة ببرنامج (مثل الصور والاصوات ..الخ) داخله دون الحاجه الى اي شيء خارجي وهذا شيء جيد بنظري :cool: , اما من ناحية الحلول فأعتقد يجب اثناء العمل على البرنامج ازلة المكتبات التي لسنا بحاجه لها والله اعلم ..

ســلام

[Dr.MOT]

السلام عليكم ,,

محاولتي في المرفقات ,, السورس كود مع الملف التنفيذي

وشكرا لكم

[STRELiTZIA]

اخي dragon :) عندك خلل بسيط في تفاعل الزر، ايضا لون CloseLbl لا يرجع كما كان قبل التفاعل...

بالتوفيق ان شاء الله
---
لي رجعة بما يخص الأحداث التي تخص الفأرة و في انتظار تعاليق الاخوة بما يخص حجم الملفات التنفيذية.

[AL-MOB4RM3G]

اعتقد انن قد حللتها ولكن ليس 100 في 100 :rolleyes:

اخواني الكرام
بارك الله فيكم جميعا...
والحل في المرفقات

اما بخصوص الحجم قألمشكلة والله اعلم بالصور :eek:

يعني الصور لوحدهم حجمهم ما يقارب ال 500 كيلو هذا والله اعلم

[STRELiTZIA]

اخي Dr.Mot :
- ينقصك تحريك النافذة الأساسية مع الماوس.
- خصائص الــ Cursor.

اخي moh__ :
- ينقصك تحريك النافذة الأساسية مع الماوس.
- خصائص الــ Cursor.
- Underline.
- التفاعل الكامل لزر TestMe.

بالتوفيق ان شاء الله

[AvimimuS]

السلام عليكم
هذا تتطبيقي انجزته بالدلفي7
في المرفقات
حجم الملف التنفيذي 488ko
ان كانت اي ملا حظة انا هنا
وشكرا

[hanipino]

السلام عليكم
الان حجم الملف التنفيدى 157 KO لاكن بشروط :confused: مكان تواجد الصور : مع الملف التنفيدى
اضافتا الى دالك استعملت احد البرامج الخاصة بضغط الملفات التنفيدية :o
افيدونا

http://www.arabteam2000-forum.com/style_emoticons/default/016.gif

[STRELiTZIA]

السلام عليكم و رحمة الله
s_billdi : حل صحيح.. فكرة استعمال ضغط الصور الى Jpg - Jpeg انقصت حجم الملف الناتج..
hanipino : حل صحيح ، و تفاعل رز TestMe رائع جدا... بما يخص وضع اللواحق بجانب الملف التنفيذي ليس هو الحل للحصول على ملف تنفيذي صغير...

في نهاية وقت التمرين لي تعاليق بما يخص هذا الموضوع...

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

مدة التمرين تنتهي يوم الأثنين ان شاء الله

بالتوفيق ان شاء الله

[STRELiTZIA]

السلام عليكم و رحمة الله

تصغير حجم الملفات التنفيذية:

1- تفعيل خيار : Build with runtime packages
نعم دلفي يدمج كل المكتبات التي يحتاجها في الملف التنفيذي الناتج، على عكس الفجيال بيزك VB الذي يشتغل فقط بعد تثبيت هذه المكتبات أولا على الجهاز، يمكننا عمل نفس الشئ مع دلفي بتفعيل خيار Build with runtime packages :

المسار :
Project – Options – Packages – Runtime packages – Build with runtime packages

الناتج ملف صغير الحجم من 400 kb إلى 15 kb بدون أي ضغط.

ملاحظة :
الملف التنفيذي يعمل فقط بوجود المكتبات التي يحتاجها مثبتة على الجهاز.

2- استعمال تعليمات Windows API
و هي استدعاء دوال النظام الموجودة في المكتبات الدينامكية Dlls بإدخال البرامترات و الحصول على النتائج مباشرة في الملف التنفيذي.

مثال 01 :
استعمال MessageBoxA الموجودة في المكتبة الدينامكية user32.dll.


function MessageBoxA; external user32 name 'MessageBoxA';
function MessageBoxA(hWnd: HWND; lpText, lpCaption: PAnsiChar; uType: UINT): Integer; stdcall
;


مثال 02 :
إنشاء نافذة – Form باستعمال API تنتج ملف تنفيذي صغير الحجم
function Dialog(HWnd, Msg, wParam, lParam: integer): integer; stdcall;

3- عمل Custom Units مكان المستعملة افتراضيا في دلفي:

اخذ الدوال مباشرة من وحدات دلفي الافتراضية و استعمالها في المشروع دون الحاجة إلى إضافتها في قائمة Uses.

مثال : في وحدة SysUtils توجد دالة IntToStr يمكننا اخذ الدالة و إضافتها إلى مشروعنا دون إضافة SysUtils إلى قائمة Uses بهذه الطريقة نتجنب إدماج ملف يحتوي على دوال كثيرة و نحن نحتاج فقط استعمال دالة واحدة.

4- استعمال برامج ضغط الملفات التنفيذية:

استعمال هذا النوع من البرامج يسهل العملية بكثير.
أمثلة : MarioPacker – Upx – NsPack و غيرها تجدون الكثير على النت. اكتبوا فقط Packers في محركات البحث.

ملاحظة : استعمال هذه البكرز Packers في حالة ادماج ريسورسز Resources كبيرة الحجم او Skins مثلا.

---
تم إرفاق مثال مع الملفات المصدرية. لــ HolyView Template
تم إرفاق الملفات المصدرية للتمرين.

بالتوفيق إن شاء الله

[AL-MOB4RM3G]

السلام عليكم اخي STRELiTZIA...
في الحقيقة اخي لم افهم الكثير من مشاركتك الأخيرة للأسف...
طبعا الخطأ في انا وليس فيك :eek:

لكن اخي... هل هذه فقد جواب على سؤال الحجم ام ماذا ؟
ومتى سيكون هناك حل للهوم وورك ؟

بارك الله فيك

[STRELiTZIA]

و عليكم السلام و رحمة الله


في الحقيقة اخي لم افهم الكثير من مشاركتك الأخيرة للأسف...


هي اعطاء نظرة خفيفة و عامة على مفهوم جعل الملفات التنفيذية الخاصة بدلفي صغيرة الحجم، اكمل الدورة و ستفهم اكثر اخي العزيز :)


ومتى سيكون هناك حل للهوم وورك ؟

بما يخص حل التمرين التطبيقي الأول هل تقصد ارفاق شرح ؟:p لان الغرض منه هو تكملة تطبيقية بحتة بعد فهم و هضم الدرس الأول.

بما يخص الأحداث المختارة في التمرين يمكنك اخي اختيار اي حدث و استعمال ملف المــــساعدة المرفق مع دلفي للمزيد من التفصيل و التعمق لانه كما تعلم لو دخلنا في تفاصيل كل حدث او جزء من دروس الدورة لن نخرج منها ابدا و مع الوقت تصبح مملة :D و قسم الأسئلة موجود لاي استفسار و غموض.


ان شاء الله تكون الفكرة قد وصلت.

بالتوفيق ان شاء الله

[Obito]

يعطيكم العافية شباب...

[DEVASTATING]

اخواني ده اول تمرين لي و لكن في الاحداث ما عرفت كيف اسويها
و الصورة تبع test me
و رز كلوز كيف اغير اللون لما اقترب منه
ان شاء الله تعطونا الشرح تبعها
و في ميزان حسناتكمـ

[anasdrak]

شكرا جزيلا على المجهود الطيب

[AL-MOB4RM3G]

اخواني ده اول تمرين لي و لكن في الاحداث ما عرفت كيف اسويها
و الصورة تبع test me
و رز كلوز كيف اغير اللون لما اقترب منه
ان شاء الله تعطونا الشرح تبعها
و في ميزان حسناتكمـ

اخي الكريم,, انا لست من منظّمي الدورة,, وحقيقة كانت بدايتي مع بداية الدورة تقريبا,,

الى انني بفضل الله تقدمت بعض الشئ,, ولهذا اسعدك ان شاء الله قدر المستطاع لأن الإخوة

مشغولين بعض الشئ,, لهذا سامحني اخي STRELiTZIA على تصحيح الآخرين,,

ولكن هذا ان شاء الله بقصد المسا عدة وليس التعدّي,, والله المستعان,,

نعم اخي الكريم,,

اطلعت على مشروعك,, وبداية جميلة وموفقة,,

الّى انه هناك بعض التنبيهات,, وهي التالي,,

ال FormStyle للفورم يجب ان يكون bsNone

هذا اولا,,

ثانيا,, الكبسة ,, اي ال button في هذه الحآلة ليست button عاديّة,,

ولكن في الدرس تم استخدام ال مكون ال Image وهو موجود تحت additional في الدلفي,,

يمكنك استخدامه ان شاء الله,,

في العنوان ,, عناك ممكن ان تستخدم الحدث,, OnMouseMove و الكود التالي قد يفيد:

UrlLbl.Font.Color := ClRed;

وبعدها ممكن تضيف الكود التالي في نفس الحدث ولكن للمكون Image للخلفيّة,,

UrlLbl.Font.Color := ClBlue;

هذا والله اعلم,,, ان شاء الله اكون قد افدت و اجبت على سؤآلك,,

بخصوص زر الكلوس,, فهو نفس عمليّة العنوان ولكن الخصائص مختلفة والله المستعان

بارك الله فيكم جميعا

والسلام عليكم ورحمة الله

[Dz_VirUs]

:oops:
رغم انني متأخر إلا أنني :kick:
أنجزت التمرين الاول
بالدلفي 7 نسخة خفيفة

[AL-MOB4RM3G]

أنجزت التمرين الاول

لا بئس اخي الكريم,
اطلعت على مشآركتك,
جميل اخي الكريم,

بدآية موفقة,

[Dz_VirUs]

بارك الله فيك
شجعتني سأواصل
حتى أصبح محترفا
بإذن الله لكن سأغيب
من اجل الدراسة
على كل حال والله شجعتني
وشكرا لك اخي المبرمج

[aZoUR]

السلام عليكم ورحمة الله
لقد انجزت التمرين واتمنى ان يكون صحيحا
وقد انجزته بالدلفي 2007
وفي المرفقات الملف التنفيذي مع والملفات المصدرية