delphi4arab منتديات دلفي للعرب
HomeWork_06 تمرين تطبيقي - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : تمارين دلفي وحلول (https://delphi4arab.net/forum/forumdisplay.php?fid=16)
+--- الموضوع : HomeWork_06 تمرين تطبيقي (/showthread.php?tid=458)



HomeWork_06 تمرين تطبيقي - STRELiTZIA - 21-01-2009

السلام عليكم و رحمة الله
التميرن التطبيقي التابع للدرس رقم 6 الخاص بإنشاء مكونات دلفي.

موضوع التمرين :
عمل مكون جديد يضاف إلى مكونات دلفي يجعل من البرنامج يشغل نفسه عند بدئ تشغيل النظام.

قواعد صحة الحلول:
- يجب أن يحتوي على خيار Enabled لتفعيل و عدم تفعيل خاصية التشغيل مع تشغيل النظام.
يجب أن يحتوي أيضا على :
Author
Version
WebLink للمنتدى
- عمل ايكون Icon للمكون.
العملية :
عند إضافة المكون في المشروع و تفعيل الخيار Enabled، المكون يعمل مهمته دون الحاجة إلى كتابة أي سطر من الأوامر الإضافية...

ملاحظة : التوجيه مسموح و تبادل الأفكار إلى الوصول إلي نتيجة ناجحة.
أيضا تسمية المكون يكون فيه اسم العضو لكي لا تحدث أخطاء خلال تثبيت المكون، و التبويب هو Delphi4Arab

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


HomeWork_06 تمرين تطبيقي - Goblin - 21-01-2009

[COLOR="RoyalBlue"]اخي STRELiTZIA

فكرة تشغيل برنامج عند بدا النظام يمكن تنفيذها من خلال الريجستري, و ذلك باضافة امتداد البرنامج فى هذا Key [/COLOR]
كود :
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run



HomeWork_06 تمرين تطبيقي - STRELiTZIA - 21-01-2009

إقتباس :فكرة تشغيل برنامج عند بدا النظام يمكن تنفيذها من خلال الريجستري, و ذلك باضافة امتداد البرنامج فى هذا Key
نعم اعلم ذلك Big GrinBig GrinBig Grin

اهلا بك اخي Goblin Smile في منتدى دلفي للعرب

هذا تمرين، المطلوب فيه انشاء مكون جديد باتباع الدرس رقم 06 من سلسلة الدورة...
كل درس من الدورة يتبعه تمرين تطبيقي... لكي تعم الفائدة...

المشاركة في التمارين تكون بارفاق محاولات حسب المطلوب فوق...

هيا اســـــــــــــــرع و ارفق لنا محاولتك Big Grin

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


HomeWork_06 تمرين تطبيقي - maosalah - 21-01-2009

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

هده مشاركة بسيطة وتعتبر مشاركتي الاولي في هدا المنتدي

تحياتي


HomeWork_06 تمرين تطبيقي - STRELiTZIA - 22-01-2009

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

إقتباس :هده مشاركة بسيطة وتعتبر مشاركتي الاولي في هدا المنتدي

مرحبا بك في منتداك و ان شاء الله تفيد و تستفيد Smile

الحل صحيح... و لكن هناك خطا بسيط في المكون، حيث انه يضع المفتاح الجديد في الرجستري عند تفعيله في مرحلة التصميم اولا ويأخذ اسم و مسار دلفي.

و عند تشغيل المشروع في مرحلة التنفيذ يأخذ اسم و مسار المشروع و هذا هو المطلوب.

ارفقت لك ملف Flash يشرح فيه الخطأ...

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


HomeWork_06 تمرين تطبيقي - maosalah - 22-01-2009

إقتباس :مرحبا بك في منتداك و ان شاء الله تفيد و تستفيد
شكرا لك اخي STRELiTZIA

إقتباس :الحل صحيح... و لكن هناك خطا بسيط في المكون، حيث انه يضع المفتاح الجديد في الرجستري عند تفعيله في مرحلة التصميم اولا ويأخذ اسم و مسار دلفي.

و عند تشغيل المشروع في مرحلة التنفيذ يأخذ اسم و مسار المشروع و هذا هو المطلوب.

ارفقت لك ملف Flash يشرح فيه الخطأ...

مشكور علي ملف الفلاش

لقد تم التعديل


HomeWork_06 تمرين تطبيقي - STRELiTZIA - 15-02-2009

إقتباس :شكرا لك اخي strelitzia
عفوا اخي الكريم Smile الشكر لله... نحن نريد فقط دعوة صالحة Smile

الأن الحل صحيح 100/100

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


HomeWork_06 تمرين تطبيقي - Happy03 - 07-12-2010

لم أفهم حل الأخ

اين مسار الملف التنفيذي في الكود؟

وهل مثالي صحيح؟
لم اضع ايقونة دلفي الذي استعمله lite لم أجد فيه الرسام.


HomeWork_06 تمرين تطبيقي - Happy03 - 07-12-2010

بعد البحث زال الإشكال...شكرا
كود :
If you create components and you want to provide some information of yours, you can place the following code in your components constructor and the message will be displayed when the component is put on a form. } constructor YourComponentCreate(AOwner: TComponent); begin inherited Create(AOwner); {...} {Display a message during the load operation...} if (csDesigning in ComponentState) and not (csloading in ComponentState) then MessageDlg('Created by Totsios Dimitrios ', mtInformation, [mbOK], 0); end;

وكذالك بدل Application name نستخدم ParamStr(0))

كل شيئ واضح...شكرا