EasyDelphi Q&A

.تم الانتقال للموقع الجديد . وسيبقى الموقع القديم هذا متاح للقراءة فقط حتى الانتهاء من نقل كل الاسئلة إلى الموقع الجديد

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


+2 تصويتات
79 مشاهدات
لدي استفسار عن المكونات في الدلفي
مثلا مكونmediaPlayer لديه خصائص وإجراءات مبرمجة مسبقا فيه
فهل أستطيع إضافةأعني برمجة اجراء غير موجود فيه مثلا
Mediaplayer.loadFromStream
وإن كان الجواب بالنفي فهل أستطيع انشاء مكون يرث جميع خصائصMediaPlayerمع إضافة خصائص ودوال وإجراءات ٱخرى
وشكرا للجميع
سُئل في تصنيف Components بواسطة (430 نقاط) | 79 مشاهدات

1 إجابة واحدة

0 تصويتات

اكيد طبعا. جواب السؤالين هو نعم يمكن بكل تاكيد .

  1. السؤال الاول : طبعا نعم يمكن اضافة اجراءات جديدة لمكونات سابقة .  استخدم THelper . راجع هذا الدرس عن THelper . فيه شرح ومثال حيل وافكار برمجية: الاستفادة من Helper لتسهيل العمل .
  2.  السؤال الثاني : نعم يمكن انشاء مكون جديد تماما يرث كل شيء . واضافة مكونات جديد . هذا يدعى الاشتقاق. انشء كلاس جديد من كلاس اخر . هذا اساس الـ OOP .

 

 

تم الرد عليه بواسطة (32,580 نقاط)
0
شكرا لك سأحاول إنشاء هدا الاجراء لمنصة الاندرويد
0
الموضوع متعلق بلغة الباسكال . ستعمل مهما كانت المنصة
0
Type
Tmyhelper =class helper for tmediaplayer
Public
Procedure loadfromstream(stream:tstream)
Ebd;



في الإجراء
Procedure tmyhelper.loadfromstream(stream: tstream);
Var
S: tfilestream;
Filename:tfilename;
Begin
S:= tfilestream.create(filename,fmopenread);
Try
//S.read( s,sizeof(s));//loadfromstream
Finally
S.free;

End;


وان كان loadfromfile
يكون كاتالي
Procedure tmyhelper.loadfromfile(const filename: tfilename);
Var
S: tfilestream;
Begin

S:=tfilestream.create(filename,openread);
Try
//S.copyfrom(s,sizeof(s));//loadfromstream
Finally
S.free;

End;

لم أعرف الكود الدي يجعلني ٱحمل الى المتغير ستريم
0
ضع سؤالًا جديدا اذا, واشرح فيه بالضبط مالذي تريد تحقيقه, وفصل المشكل.

اسئلة متعلقة

+2 تصويتات
11 إجابة
+4 تصويتات
2 إجابة
+3 تصويتات
2 إجابة
سُئل يوليو 11، 2018 في تصنيف Delphi بواسطة مجهول | 87 مشاهدات
+3 تصويتات
2 إجابة
0 تصويتات
2 إجابة
سُئل أكتوبر 5، 2019 في تصنيف fmx بواسطة xorpas (1,360 نقاط) | 202 مشاهدات
ادعُ اصدقائك في الفايسبوك لمشاركتك
Comodo SSL

مرحبًا بك إلى EasyDelphi Q&A، حيث يمكنك طرح الأسئلة والحصول على الإجابة عليها من المستخدمين الآخرين.

لا يسمح بطلب او السؤال عن كراك او تفعيل او كسر او فك او اي شيء يخالف اتفاقيات الترخيص  مهما كان السبب ومهما كان البرنامج ونوعه. ولا حتى نشر روابط تحتوي على مثل هذه الاشياء لا في الاسئلة ولا في الاجابات ولا التعليقات . نهائيا

497 سؤال
752 إجابة
1,417 تعليق
271 مستخدم