كيف تنشئ خلفيات احترافية , بشكل أي صورة تريدها

بسم الله الرحمن الرحيم

——————

والله من زمان لم أضع تدوينات عن الدلفي … وعمال اقول ناقصني شيء 😛

اليوم سأعرض في هذه التدوينة , طريقة سهلة وبسييييييطة جدا حتى تقوم بعمل واجهة احترافية “بشكل أي صورة تريدها”

لكن .. ماذا اقصد بـ”بشكل أي صورة تريدها” ؟

حسناً .. هل شاهدت أي برامج واجهتها على شكل دائرة , أو على شكل مشغل MP3 ..الخ

(المهم ان واجهتها ليست الواجهة المستطيلة التقليدية)

وفكرت كيف أقوم بعملها ؟

أنا فكرت 😛 .. أيام الـVB , والرد كان هنا :

http://www.arabteam2000-forum.com/index.php?showtopic=127953&hl=%C7%E1%D5%E6%D1%C9

ولمن ليس لديهم Visual Basic 6 … فإن الكود كان حوالي 63 سطر (انا تركت بعض الأسطر كتعريف الإجراءات وإغلاقها)

لكن في دلفي … الأمر مختلف تماماً , تابع معي لتقوم بعمل برنامج افضل من المثال السابق , وطبعا بدون حرف كود واحد

——————

خطوات العمل :

1- عليك ان تحضر صورة (أي صورة , المهم تكون ذات خلفية بيضاء , والشكل الذي سيكون عليه الفورم غير مربع ,,, دائري مثلاً) . ويمكن الاستعانة بالصورة التالية :

baddrawing

2- الآن نفتح الصورة بالرسام (لأنه بسيط) ونجعل الخلفية باللون الأزرق (ويجب أن تكون قيمه : R=0 / G=0 / B=255 .. أي الأزرق النقي) . ويجب ان يكون لون الخلفية واااااحد + مختلف تماماً عن بقية ألوان الصورة + يكون لون معروف قيمه وليس لون من اختراعك , وذلك حتى يتعرف الدلفي عليه .

ستصبح الصورة بهذا الشكل :

bluebaddrawing

3- نشغل الدلفي الآن .. ونبدأ مشروعاً جديداً من النوع VCL Application .

4- نجعل خاصية BorderStyle للنموذج = bsNone .. أي بدون إطار .

5- من التبويب Additional نضيف الأداة Image إلى النموذج .

6- نعدل الخاصية Top لأداة Image إلى 0 , وخاصية Left إلى 0 أيضاً , وخاصية AutoSize إلى True (الخاصية الأخيرة تجعل أداة Image تتمدد لتأخذ نفس حجم الصورة)

7- من خاصية Picture لأداة Image نضغط على زر (…) الخاص بها , ونختار Load… ونحدد الصورة الجديدة ذات الخلفية الزرقاء (وهي صورة BlueBadDrawing)

8- تلاحظ تمدد أداة Image , لذا سنعدل حجم النموذج إلى 344 للخاصية Height , و 484 للخاصية Width .

9- شغل البرنامج .. ولاحظ اننا لم نقم بعمل التعديلات الرئيسية الآن , لذا ستظهر الخلفية الزرقاء .

10- الأن .. التعديل الأول : قم بتغيير الخاصية TransparentColor للنموذج إلى True .

11- ……… التعديل الثاني: قم بتغيير الخاصية TransparentColorValue إلى clBlue (وهي قيمة الأزرق النقي R=0 / G=0 / B=255)

12- قم الآن بتشغيل البرنامج ..

ألف مبروووووووووووووووووووووووووك , لقد حصلت على نموذج بشكل مميز , وبدون سطر شيفرة واحد .

ملحوظة مهمة جدا جدا جدا :

يجب أن تكون الخلفية نقية (ليست فيها التشوهات التي في صور JPG) , جرب رسم صورة أخرى بصيغة BMP فهذا يعطيك أفضل أداء في دلفي .

كما ان الصورة عندما وضعتها كـJPG لم تعمل في دلفي .

——————

أفكار لم أجربها 😛

– جرب تغيير لون الدائرة الصفراء الصغيرة إلى الأزرق … ولاحظ النتيجة عند تشغيل البرنامج بالصورة المعدلة .

– جرب وضع زر على النموذج يغير صورة أداة Image إلى صور مختلفة أثناء التشغيل .

– قم بتصميم صورك الخاصة لحيوانات , جماجم , طبيعة ..الخ , وجربها .