[RaggiTech]

كاتب الموضوع : Islam Ibrahim

الكائنات الديناميكية Dynamic Objects هي كائنات يتم تعريف أعضائها (خصائصها وإجراءاتها ) واستدعائها وقت التشغيل Runtime بدل وقت الترجمة Compiletime , يمكنك ذلك من التعامل مع تلك الكائنات ككائنات غير مرتبطة ببناء أو تركيب محدّد, على سبيل المثال , يمكنك استخدام كائن حيوي من أجل الارتباط مع DOM لمستند HTML معيّن, والذي عادة ما يكون محتواه متغيراً , ولأن كل مستند HTML يتميز عن غيره في تركيبه , يمكن باستخدام الكائنات الحيوية الوصول إلى تلك البنية أثناء وقت التشغيل , سابقاً مثلا من أجل الوصول إلى Attribute معين لعنصر HTML يجب تمرير اسم ال Attribute للإجراء GetProperty لذلك العنصر, مثلاً من أجل الوصول إلى Id Attribute لعنصر HTML التالي: <div Id="DIV1"> يحب عليك الوصول أولاً للعنصر dir ومن ثم استخدام الإجراء ("divElement.GetProperty("Id, أما إذا تم استخدام الكائنات الديناميكة (الحيوية) يمكنك عندها الوصول مباشرة إلى Id Attribute بمجرد كتابة divElement.Id .

يتم الحصول على الكائنات الحيوية باستخدام الربط المتأخر Late-Binding, في #C يتم استخدام النوع dynamic لتعريف كائن حيوي, بينما في Visual Basic يتم استخدام النوع Object.

يمكنك إنشاء كائنات حيوية مخصصة باستخدام الفئات الموجودة ضمن مجال الأسماء الجديد System.Dynamic , على سبيل المثال, يمكنك إنشاء كائن حيوي من نوع ExpandoObject وإضافة أعضاء جديدة لهذا الكائن كالحقول Fields أو الإجراءات Methods وقت التشغيل , يمكنك أيضًا إنشاء الأنواع الحيوية الخاصة بك وذلك بتوريث الفئة DynamicObject , عندها يمكنك إعادة تعريف إجراءات تلك الأنواع الحيوية الجديدة لتحقيق الديناميكية أثناء التشغيل.

The ExpandoObject Class

يوفر هذا النوع إمكانية إضافة أعضاء Members إليه أو حذفها وقت التشغيل وكذلك قراءة وإسناد القيم إلى تلك الأعضاء , وهذا النوع يدعم ما يسمى بالربط الحيوي Dynamic Binding والذي يمكنك من استخدام كتابة الكود بطريقة قياسية كأن تكتب sampleObject.sampleMember بدل من كتابة تركيب معقد مثل ("sampleObject.GetAttribute("sampleMember

تقوم الفئة ExpandoObject بتحقيق الواجهة القياسية IDynamicMetaObjectProvider والخاصة بوقت التشغيل الحيوي للغة (Dynamic Language Runtime(DLR , ما يتيح لك إمكانية مشاركة نسخة من النوع ExpandoObject بين اللغات التي تدعم DLR , على سبيل المثال يمكنك إنشاء نسخة من النوع ExpandoObject في #C وتمريرها إلى دالة مكتوبة بـ IronPython.

الفئة ExpandoObject تحقق مبدأ الكائنات الحيوية والتي يمكن من خلالها إسناد قيم والحصول عليها أو استدعاء أعضائها , إذا كنت بحاجة لنوع يحقق كيفية معينة لتحقيق مبدأ الحيوية عليك أن تستخدم النوع DynamicObject , وإذا كنت تريد التحكم في آلية عمل DLR عليك باستخدام الواجهة IDynamicMetaObjectProvider

كيفية إنشاء نسخة من ExpandoObject

في #C من أجل تمكين الربط المتأخر لنسخة من نوع ExpandoObject يجب عليك استخدام الكلمة المحجوزة dynamic

كود :

dynamic sampleObject = new ExpandoObject();

في Visual Basic من أجل تمكين العمليات الحيوية على الكائنات يجب استخدام الربط المتأخر بواسطة Object Class .

كود :

Dim sampleObject As Object = New ExpandoObject()

وهذا يعني أنك إذا لم تستخدم Object وقمت بتعريف كائن من نوع ExpandoObject بالطريقة التالية فلن تتمكن من جعل ذلك الكائن حيوياً :

كود :

Dim sampleObject As New ExpandoObject()

إضافة أعضاء جديدة

بإمكانك إضافة أعضاء جديدة بعد تعريف نسخة من ال ExpandoObject, مثل الخصائص الإجراءات والأحداث , المثال التالي يوضح كيفية إضافة خاصية إلى الكائن المعرف سابقاً:

VB Code

كود :

sampleObject.Test = "Dynamic Property"
Console.WriteLine(sampleObject.test) ' Dynamic Property
Console.WriteLine(sampleObject.test.GetType()) ' System.String

C# Code

كود :

sampleObject.test = "Dynamic Property";
Console.WriteLine(sampleObject.test); // Dynamic Property
Console.WriteLine(sampleObject.test.GetType()); // System.String

بالنسبة للإجراءات فهي تمثل باستخدام تعابير لمدا Lambda Expressions والتي تخزن على هيئة Delegates والتي يتم استدعاؤها عند الحاجة إليها, المثال التالي يوضح كيفية إضافة
إجراء يقوم بزيادة قيمة لخاصية حيوية :

VB Code

كود :

sampleObject.number = 10
sampleObject.Increment =Sub()
sampleObject.number += 1
End Sub


Console.WriteLine(sampleObject.number) ' 10

sampleObject.Increment()

Console.WriteLine(sampleObject.number) ' 11

C# Code

كود :

sampleObject.number = 10;
sampleObject.Increment = (Action)(() => { sampleObject.number++; });

Console.WriteLine(sampleObject.number); // 10

sampleObject.Increment();

Console.WriteLine(sampleObject.number); // 11

المثال التالي يوضح كيفية إضافة حدث إلى ExpandoObject :

VB Code

كود :

Dim sampleObject As Object = New ExpandoObject()

' Create a new event and initialize it with null.
sampleObject.sampleEvent = Nothing

' Add an event handler.
Dim handler As EventHandler = Sub(sender As Object, e As EventArgs)
Console.WriteLine("SampleHandler for {0} event", sender)
End Sub
sampleObject.sampleEvent =
[Delegate].Combine(sampleObject.sampleEvent, handler)

' Raise an event for testing purposes.
sampleObject.sampleEvent.Invoke(sampleObject, New EventArgs())

C# Code

كود :

dynamic sampleObject = new ExpandoObject();
// Create a new event and initialize it with null.
sampleObject.sampleEvent = null;
// Add an event handler.
sampleObject.sampleEvent += new EventHandler(SampleHandler);
// Raise an event for testing purposes.
sampleObject.sampleEvent(sampleObject, new EventArgs());
}
// Event handler.
static void SampleHandler(object sender, EventArgs e)
{ Console.WriteLine("SampleHandler for {0} event", sender); }

تمرير ExpandoObject كوسيط Parameter

بإمكانك تمرير نسخ من النوع ExpandoObject كوسائط للإجراءات, لاحظ أن تلك النسخ سيتم التعامل معها ككائنات حيوية Dynamic Objects في #C , وكائنات مرتبطة متأخراً Late-Bound Object في فيجوال بيسك, وهذا يعني أن IntelliSence لن يتمكن من التعرف على أعضاء تلك النسخ ولن يعرض أي خطأ أثناء الترجمة عند محاولة استدعاء أعضاء غير موجودة سابقاً في تلك النسخ , وإذا حدث وقمت باستدعاء عضو غير موجود فسيتم إطلاق استثناء وقت التشغيل . المثال التالي يوضح كيفية كتابة واستخدام إجراء يقوم بعرض أسماء وقيم خصائص لكائنات من نوع ExpandoObject .

VB Code

كود :

Sub Main()
Dim employee, manager As Object

employee = New ExpandoObject()
employee.Name = "John Smith"
employee.Age = 33

manager = New ExpandoObject()
manager.Name = "Allison Brown"
manager.Age = 42
manager.TeamSize = 10

WritePerson(manager)
WritePerson(employee)
End Sub

Private Sub WritePerson(ByVal person As Object)

Console.WriteLine("{0} is {1} years old.",
person.Name, person.Age)
' The following statement causes an exception
' if you pass the employee object.
' Console.WriteLine("Manages {0} people", person.TeamSize)

End Sub

C# Code

كود :

class Program
{
static void Main(string[] args)
{
dynamic employee, manager;

employee = new ExpandoObject();
employee.Name = "John Smith";
employee.Age = 33;

manager = new ExpandoObject();
manager.Name = "Allison Brown";
manager.Age = 42;
manager.TeamSize = 10;

WritePerson(manager);
WritePerson(employee);
}
private static void WritePerson(dynamic person)
{
Console.WriteLine("{0} is {1} years old.",
person.Name, person.Age);
// The following statement causes an exception
// if you pass the employee object.
// Console.WriteLine("Manages {0} people", person.TeamSize);
}
}
// This code example produces the following output:
// John Smith is 33 years old.
// Allison Brown is 42 years old.

إحصاء الأعضاء Membera وحذفها

يحقق النوع ExpandoObject الواجهة <IDIctionary<String, Object وبهذه الطريقة يمكن الوصول إلى جميع الأعضاء التي تم إضافتها وقت التشغيل إلى كائن من نوع ExpandoObject , وهذا قد يكون مفيداً إذا لم تكن لديك معلومات وقت التشغيل حول الأعضاء التي يمتلكها ذلك الكائن, المثال التالي يوضح كيفية تحويل كائن ExpandoObject إلى الواجهة <IDictionary<TKey, TValue

VB Code

كود :

Dim employee As Object = New ExpandoObject()
employee.Name = "John Smith"
employee.Age = 33
For Each member In CType(employee, IDictionary(Of String, Object))
Console.WriteLine(member.Key & ": " & member.Value)
Next
' This code example produces the following output:
' Name: John Smith
' Age: 33

C# Code

كود :

dynamic employee = new ExpandoObject();
employee.Name = "John Smith";
employee.Age = 33;

foreach (var property in (IDictionary<String, Object>)employee)
{
Console.WriteLine(property.Key + ": " + property.Value);
}
// This code example produces the following output:
// Name: John Smith
// Age: 33

في اللغات التي لا تملك تركيباً من أجل حذف الأعضاء Members مثل VB و #C يمكنك حذف الأعضاء بواسطة تحويل ExpandoObject إلى الواجهة >IDictionary<TKey, TValue وحذف ذلك العضو كزوج Key/Value , كما يوضح المثال التالي:

C# Code

كود :

dynamic employee = new ExpandoObject();
employee.Name = "John Smith";
((IDictionary<String, Object>)employee).Remove("Name");

VB Code

كود :

Dim employee As Object = New ExpandoObject()
employee.Name = "John Smith"
CType(employee, IDictionary(Of String, Object)).Remove("Age")

استقبال التنبيهات عند تغير قيم خصائص كائن من نوع ExpandoObject

النوع ExpandoObject يحقق الواجهة INotifyPropertyChanged لذلك بوسعه إطلاق أحداث عند إضافة عضو أو تعديله أو حذفه , وبهذه الطريقة يستطيع النوع ExpandoObject الاندماج مع أداوات الربط الخاصة بـ WPF وكذا أي بيئة أخرى تتطلب الحصول على تنبيهات عند حدوث تغييرات في المحتوى. الكود التالي يوضح كيفية كتابة معالج حدث EventHandler خاص بالحدث PropertyChanged للكائن ExpandoObject.

C# Code

كود :

// Add "using System.ComponentModel;" line
// to the beginning of the file.
class Program
{
static void Test()
{
dynamic employee = new ExpandoObject();
((INotifyPropertyChanged)employee).PropertyChanged +=
new PropertyChangedEventHandler(HandlePropertyChanges);
employee.Name = "John Smith";
}

private static void HandlePropertyChanges(
object sender, PropertyChangedEventArgs e)
{
Console.WriteLine("{0} has changed.", e.PropertyName);
}
}

VB Code

كود :

' Add "Imports System.ComponentModel" line
' to the beginning of the file.
Sub Main()
Dim employee As Object = New ExpandoObject
AddHandler CType(
employee, INotifyPropertyChanged).PropertyChanged,
AddressOf HandlePropertyChanges
employee.Name = "John Smith"
End Sub

Private Sub HandlePropertyChanges(
ByVal sender As Object, ByVal e As PropertyChangedEventArgs)
Console.WriteLine("{0} has changed.", e.PropertyName)
End Sub

يتبع...