استعمال الريسورس بدلفي

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

لكي تدمج ملف رسورس مع برنامجك يجب ان تتبع الخطوات التالية:

ملف الرسوس المدمج قد يكون أي ملف يخطر ببالك (ملف نصي, صورة, ملف تنفيدي,.....)

1- قم بانشاء ملف نصي قصد تحويله الى ملف ذو امتداد .RES محتواه هو كالتالي:

RessourceID TYPE_RESSOURCE FILE_NAME انتبه للفراغات بين العناصر الثلاثة

حيث:

RessourceID هو اي اسم يمكنك اعطاؤه للرسورس قصد استخدامه داخل برنامجك

TYPE_RESSOURCE نوع الرسورس حيث يمكن أن يكون

BITMAP,لصور الـ BMP

AVIFILE , فيديو من نوع AVI

ICON للايقونات

CURSOR وهو ملف ذو امتداد cur وهو للمؤشرات 

WAVE

RCDATAوهذا الاخير يستعمل لاي ملف أخر مثلا ملف تنفيذي...

FileName: هو اسم الملف المراد تحويله الى ريسورس ويجب ان يوضع بجانب الملف النصي الذي نحن بصدد تحريره

مثلا : يمكنك انشاءه بالصيغة التالية ress RCDATA "intro.avi" exemple

2-قم بحفظ الملف بامتداد RCمثلا : Ressource.rc

3- الان سنحتاج الى برنامج مدمج مع دلفي وهو Rorland Resource Compilerحيث سنقوم بترجمة الملف الذي حررناه سابقا بواسطة هذا البرنامج ويوجد هذا البرنامج في المجلد Bin داخل ملفات الدلفي

مثلا : C:\Program Files\Borland\Delphi7\Bin

قم بنسخ الملف السابق (.res ) و الملف المراد ترجمته الى هذا المسار ثم افتح نافذة دوس (تاكد انك في هذا المسار) واكتب الامر التالي : brcc32 Ressource.rc 

سوف ينتج الملف : Ressource.rc

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

الان انتهينا من المرحلة الاولى .

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

1- يجب تضمين الرسورس داخل البرنامج ولعمل ذلك اذهب الى العبارة : implementation وأضف السطر التالي:

{R ressource.RES$}

حيث أن {...$} تسمى Directive

الان بما اننا سنقوم باستدعاء الرسورس فعليا . سنعمل ذلك عند بداية برنامجنا مثلا : عند انشاء الفورم 

أي On Create 

وهناك كود خاص لكل نوع من الرسورسات : (ساشرح نوعين فقط )

مثلا :1 Icone ( اذا اردنا استعمال هذه الرسورس كايقونة لبرنامجنا نكتب الكود التالي ) 

Form1.Icon.Handle:=LoadIcon(Hinstance, PChar('MyIcone')); // code

حيت MyIcone هو ID الرسورس

2 Wave: اذا اردنا تشغيل مقطع صوتي عند فتح نافذتنا 

PlaySound(PChar('MonSon'), HInstance, SND_ASYNC or SND_RESOURCE); // code

ارجوا ان تكون الفكرة قد وصلت .

تحياتي.