سارع بالحصول على دورة احترافية (سعرها 199 دولار) لتعلم لغة البرمجة "C#" مجانا !

سارع بالحصول على دورة احترافية (سعرها 199 دولار) لتعلم لغة البرمجة "C#" مجانا !

دورة احترافية (سعرها 199 دولار)  لتعلم لغة البرمجة "C#" مجانا

دورة مجانية مفيدة لكل مبتدء في يرغب في تعلم هذه اللغة ؛ طبعا هذه الدورة مقدمة من منصة "يوديمي " وسعرها 199 دولار ، لكن يمكنك الاستفادة منها الآن مجانا لفترة محدودة 

C# Basics - Learn Coding & Programming for Beginners

رابط الدورة

هنا

إقرأ المزيد

مذكرة تخرج تقني سامي تسيير المخزونات

مذكرة تخرج تقني سامي تسيير المخزونات

مذكرة تخرج تقني سامي تسيير المخزونات : 👇 ✅

إقرأ المزيد

تحميل RadStudioKeygen + Delphi 10 RAD Studio ISO

تحميل RadStudioKeygen + Delphi 10 RAD Studio ISO

تحميل   Delphi 10 RAD Studio ISO : 

إقرأ المزيد

Download Rad Studio - Delphi | شرح تحميل وتثبيت برنامج الدلفي

Download Rad Studio - Delphi | شرح تحميل وتثبيت برنامج الدلفي

ما هو دلفي؟ 
لغة البرمجة Delphi هي لغة باسكال الرسومية أو المرئية وتستخدم لتصميم وإنشاء تطبيقات تعمل تحت بيئة نظام التشغيل Windows.
تستخدم Delphi لتطوير البرامج والتطبيقات بشكل سريع ولذلك يشار إليها بأنها ذات صفة RAD وهذه الصفة تعني تطوير البرامج بسرعة أي Rapid Application Development وذلك يتحقق باستخدام مكونات وأدوات جاهزة تنسق بالشكل المطلوب ويتم برمجتها بكتابة عدة برامج مرتبطة بأحداث معينة خاصة بهذه المكونات أو العناصر ويشار إلي هذا النوع من البرمجة بالبرمجة بالأحداث.

Delphi 10

دلفي توفر عناصر تحكم VCL قوية لنظام التشغيل Windows 10 وتمكن
تطوير عبر النظام الأساسي لـ FMX لنظام التشغيل Windows و Mac و iOS و Android
Embarcadero للمطورين
تركز على أدوات للمطورين :
  ستوديو RAD ، دلفي ، C ++ Builder
  ExtJS، ExtReact، Sencha Architect
  قاعدة بيانات InterBase

التحميل من هنا

exe

iso

إقرأ المزيد

إنشاء برنامج تحويل العملة

إنشاء برنامج تحويل العملة

المـوضـوع:   إنشاء برنامج تحويل العملة

/- إدراج مكونات المشروع : 

1- المكون panel : من اللوحة standard ندرج المكون panel1.

* معالجة الخصائص:

- ننشط المكون panel1 .               - نغير في الخاصية align إلى altop .

- نغير في الخاصية color إلى رمادي clgray .    - نغير في الخاصية caption إلى convertesseur de vise .
- نغير في الخاصية font (نوع النص: arial black- حجم الخط: 14 – لون الخط: أبيض) .

2-  المكون edit : ندرج المكونedit1  من اللوحة standard .

التحكم في الخصائص: نغير في الخاصية text إلى فراغ .

3-  المكون label : ندرج ثلاثة (03) مكونات label (1،2،3) من اللوحة standard .

التحكم في الخصائص:

- label1 : نغير في الخاصية caption إلى العملة بالدينار .     - label2 : نغير في الخاصية caption إلى العملة بالأجنبية .

* نقوم بتحديد  المكونين label1 و label2، نغير في الخاصية font : (حجم الخط: 12 – نمط الخط: gras ).

- label3 : نغير في الخاصية font إلى: (نوع الخط: arial black - حجم الخط: 16 )، و نغير في الخاصية caption إلى "0" قيمة إبتدائية

4- المكون combobox1 : يسمح لنا بإظهار مجموعة من الإختيارات (قائمة)، ندرج المكون combobox من اللوحة standard .

* التحكم في الخاصية:

- نغير في الخاصية items بالنقر على ...                                                

- تظهر نافذة ندخل فيها الإختيارات كما يلي: دولار أمريكي – ريال سعودي – أورو أوربي – جنيه بريطاني .

- ننقر على موافق (ok).                                                               - نغير في الخاصية indexitem لكي يظهر أول عنوان في القائمة items .

* معالجة الأحداث في المكون  combobox1:

حدث onclick :          

        - ننشط المكون combobox1 .                       

                  - ننقر على evenement .

- نقر مزدوج على ONCLICK . BEGIN IF COMBOBOX1.ITEMINDEX = 0 THEN LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.00102550)+’ USD’ ; IF COMBOBOX1.ITEMINDEX = 1 THEN LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.0384600)+’ SAR’ ; IF COMBOBOX1.ITEMINDEX = 2 THEN LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.00966267)+’ EUR’ ; IF COMBOBOX1.ITEMINDEX = 3 THEN LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.00684825)+’ GBP’ ; END ;

ملاحظة1: لما يحدث خطأ في التنفيذ ننقر على شريط الإختيارات exécuter ثم ننقر على réinisialiser .

ملاحظة2: ترك مسافة قبل العملة مثلاً: ' SAR'

* التعليمة الشرطية case of: إذا تكرر الشرط بحيث تتغير القيمة التي نجري عليها عملية المقارنة مثل:

IF  X := 0 THEN

INSTRUCTION 1 ;

IF  X := 1 THEN

INSTRUCTION 2 ;

IF  X := 2 THEN

INSTRUCTION 3 ;

في هذه الحالة نستعمل التعليمة                                                                                                                                     OF (متغير) CASE

لا يوجد BEGIN

تعليمة 1 : قيمة 1

تعليمة 2: قيمة 2

END.

* معالجة الحدث onclick للمكون combobox1 بإستعمال التعليمة case:

CASE COMBOBOX1. ITEMINDEX OF

0 : LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.00102550)+’ USD’ ;

1 : LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.0384600)+’ SAR’ ;

2 : LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.00966267)+’ EUR’ ;

3 : LABEL3.CAPTION := FLOATTOSTR (STRTOFLOAT (EDIT1.TEXT)*0.00684825)+’ GBP’ ;

END ;

إقرأ المزيد