الدرس(4): التركيبات أنواعها واستخداماتها

دورة الدوت نت

الدرس(4): التركيبات أنواعها واستخداماتها

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

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

 درسنا اليوم دسم بعض الشيء ويحتاج لشيء من التركيز.

 بداية علينا أن نتيقن أن الأنواع في فيجوال بسيك دوت نت لا تقتصر على ما قد طور مع اللغة مثل short int16 int32 single short integer string date point .......إلخ

 فربما احتاج أنواع جديدة من المتغيرات والثوابت التي لا تتواجد في فيجوال بيسك دوت نت....لا مشكلة.....اصنعها بنفسك!

 سيحتوي الدرس باذن الله على التالي:

التركيبات من نوع Enums

التركيبات من نوع Structure

أولا: التركيبات من نوع Enums

 بالنسبة للتركيبات من نوع Enums فهي تستخدم لتعريف أنواع جديدة من التركيبات على وجه الحصر أو التعميم ....كيف ذلك؟؟!

 كما نعرف في السنة 12 شهرًا وبما ان عددها ثابت فيمكننا اختصار جهد تكرارها في الشيفرة كالتالي:

كود:

Enum Month

          Jan

          Feb

          Mar

          Apr

          May

          Jun

          Jul

          Aug

          Sep

          Oct

          Nov

          Dec

End Enum

لكن ما الذي حدث وما استفيد؟؟

 انظر أخي الكريم:

 لقد قمنا بصنع تركيبة جديدة واسميناها بالشهر ووضعنا كل شهر داخل التركيبة كجزء منها....

 وماذا بعد...؟

 الآن علينا معرفة بعض الأمور:

.عند الاستعلام عن عنصر من عناصر الEnum فاننا نستعلم بالشكل التالي:

كود:

TextBox1.Text =Month.Jan

                       وبما أن الثابت Month.Jan لم يتم اسناد قيمة له فسيتم اسناد القيمة الافتراشية له وهي صفر ..لماذا؟

العنصر الأول من عناصر تركيبة الEnum تبدأ من الصفر والعنصر الثاني يساوي السابق+1 والثالث يساوي السابق+1 وهكذا إلى أن نصل إلى العنصر Month.Dec فسنراه يحمل القيمة 11 ولك التجربة

.يمكن اسناد قيم وقت صنع التركيبة كالتالي:

كود:

Enum Month

          Jan = 22

          Feb = 5

          Mar = 23

          Apr

          May

          Jun

          Jul

          Aug

          Sep

          Oct

          Nov

          Dec

 End Enum

كود:

      TextBox1.Text =Month.Mar

وكما نرى فان العنصر Month.Mar يحمل القيمة 23 والعنصر التالي سيحمل القيمة السابقة + 1 حسب ما ذكرنا في الأعلى .

كود:

 TextBox1.Text =Month.Apr

ملاحظة: يمكننا الجزم بأن التركيبات من نوع Enum تعادل بوظيفتها الثوابت فعناصرها عبارة عن ثوابت ولهذا عند محاولة اسناد قيم للعنصر خارج سطره في التركيبة فان ذلك سيتوج بالرفض من قبل المترجم......

ونص رسالة الخطأ يقول:Constant cannot be the target of an assignment أي أنه الثابت لا يمكن أن يكون هدفا لعملية تعيين.(أي اسناد قيمة)

اذن يمكن استخدام الEnum في استخدامات الثوابت

ملاحظة : جميع قيم الEnum في المثالين السابقة من النوع Integer كما يمكن تغيير نوعها لLong او Short او ما الى ذلك(أقصد المتغيرات العددية الصحيحة)

مثال:

كود:

Enum Month As Long

Jan

Feb

....

....

 End Enum

والآن دعونا نتطرق قليلا الى موضوع مرتبط بالمتغيرات والثوابت ألا وهو محدودية المتغيرات والثوابت (بمعني آخر أين يمكنني استخدامها) .... يمكنك تحديد محدودية الEnum كالتالي:

عندما تريد الEnum عامة ومستخدمة من جميع وحدات المشروع عليك سبقها ب Public أو بلا شيء

مثال:

كود:

Public Enum Month As Long

Jan

Feb

....

....

 End Enum

أو

كود:

  Enum Month As Long

Jan

Feb

....

....

 End Enum

وإن كنت حصرها داخل الوحدة البرمجية المعلنة بها فعليك سبقها ب Private

مثال:

كود:

Private Enum Month As Long

Jan

Feb

....

....

End Enum

ملاحظة أخيرة: علينا وضع التركيبة خارج أي حدث لان ذلك سوف يحدث خطأ برمجي:

مثال:

كود:

 Public Class Form1

 'لا مشكلة

     Enum Month

        Jan

        Feb

        Mar

        Apr

....

....

End Enum

كود:

     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 'هنا المشكلة

Enum Month

        Jan

        Feb

        Mar

        Apr

....

....

End Enum

 End Sub

ثانيا: التركيبات من نوع Structure

يعرف هذا النوع من التركيبات بالانواع المعرفة من قبل المستخدم(User Defined Type-UDT)

ويمكن دمج العديد من المتغيرات والتركيبات داخل التركيبة الأم باستخدام الكلمة المحجوزة Structure

نعرف انه لدينا متغيرات من النوع String و Integer وDate وما الى ذلك.

لكن هل يمكنني صياغة متغير بالكيفية التي اريدها....لم لا؟

هذا النوع من المتغيرات يسمى Structure والتي دعمت ببيئة الدوت نت اكثر من ذي قبل

الآن نريد صنع متغير من نوع سيارة اي صنع خاص لا يعرفه فيجوال بيسك دوت نت...لكن قبل ذلك علينا تحديد العناصر التي تدخل في مكونات السيارة وهي الاسم والموديل والسعر والسعة وتاريخ الصناعة وتاريخ التصدير..... وما الى ذلك

مثال:

كود:

  Structure Car

        Dim Name As String

        Dim cost As Integer

        Dim Model As String

End Structure

استخدام المتغير الجديد بالضبط كاستخدام المتغير العادي

مثال:

كود:

Dim NewCar As Car

        NewCar.Name = "Mercedes"

        NewCar.cost = 15

         'طبعا انا ما بعرف ايش موديلاتها بس للتوضيح مش اكثر

        NewCar.Model = "Gaosdh/#25"

        MsgBox("Name: " & NewCar.Name & vbCrLf & "Cost: " & (NewCar.cost).ToString & vbCrLf & "Model: " & NewCar.Model)

لعلك لاحظت شيئا: عندما قمنا بربط المعطيات داخل الرسالة فان الجزء NewCar.Cost الحقناه بالدالة .ToString ......ما وظيفتها...؟!

 عندما قمنا بربط نصوص في محتوى الرسالة رأينا أن هناك معطى يلزم ربطه لكنه خارج عن الجماعة(جماعة النصوص) ولكي يتم التلاءم قمنا بتطبيق الدالة ToString عليه والتي تقوم بتحويل المعطى من قيمة عددية الي نصية ليتم الربط بسلام (يمكن تشبيهها بالدالة Str()) في لغة الفيجوال بيسك 6

الآن دعونا نتعمق أكثر

يمكن للتركيبة من Structure أن تحتوي على تراكيب داخلية الأمر الذي يطلق عليه تراكيب متداخلة

Nested Structures

كيف ذلك ولماذا..؟

الآن دعنا نرجع قليلا الى السيارة ...نريد ألحاق مكون آخر للسيارة وهو تاريخ الانتاج وتاريخ التصدير..هل يتوجب علينا جعل كل مكون منفصلا عن الآخر؟

ليس تماما .. كما نعلم فان كلا المكونين من النوع Date والذي يمكن اجماله بالشكل التالي:

كود:

Structure Car

        Dim Name As String

        Dim cost As Integer

        Dim Model As String

 

      Structure DateOfx

            Dim Produce As Date

            Dim Export As Date

        End Structure

Dim DateOf As DateOfx

ما الذي حدث؟

الآن قمنا بادخال تركيبة التواريخ داخل تركيبة مكونات السيارة والذي يمكن استخدامه بالصورة التالية:

كود:

                    Dim NewCar As Car

        NewCar.Name = "Mercedes"

        NewCar.cost = 15

        NewCar.Model = "Gaosdh/#25"

        NewCar.Dateof.Produce = #11/29/2003#

        NewCar.Dateof.Export = #11/29/2005#

        MsgBox("Name: " & NewCar.Name & vbCrLf & "Cost: " & (NewCar.cost).ToString & vbCrLf & "Model: " & NewCar.Model & vbCrLf & "DateOf Produce: " & NewCar.Dateof.Produce & vbCrLf & "DateOf Export: " & NewCar.Dateof.Export

والناتج:

كما يمكننا تضمين أحداث داخل التركيبة والتي ساوجزها وساخصص للاحداث فصل كامل ان شاء الله

مثال بسيط:

كود:

Structure Car

     

        Structure DateOfx

            Dim Produce As Date

            Dim Export As Date

        End Structure

  

     Dim Name As String

        Dim cost As Integer

        Dim Model As String

        Dim Dateof As DateOfx

       

Sub CloseForm(ByVal frm As Form)

        frm.Close()

End Sub

End Structure

ويستخدم كالتالي:

كود:

NewCar.CloseForm(Me)

لذي حصل اننا صنعنا حدث أو اجراء يقوم باغلاق النموذج الذي تم تمريره وهنا مررنا للاجراء النموذج Me وهو النموذج قيد التطوير

بهذا نكون قد انهينا درسنا لهذا اليوم ان شاء الله

دعواتكم لي بشفاء

بانتظار القادم باذن الله

الدرس 4- طرق إستخدام ال void و ومجالاتها

دورة السي شارب

الدرس 4- طرق إستخدام ال void و ومجالاتها

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

 _________________________

 الان سوف نبدأ بحديث هام جدا وهو الكلمة المحجوزة void...

 ______________________________________________

 أولا قم بإنشاء مشروع جديد وأختر Console Application

 (( ال Console Application هو تطبيق يستخدم إلى القيام بمهمة معينة ((مثلا حذف بعض الملفات))

 ومن ثم الإغلاق))

 والان سوف تجد أنه كتب تلقائيا ما يلي:

كود:

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

namespace ConsoleApplication1

{

    class Program

    {

        static void Main(string[] args)

        {

        }

    }

} 

ولم يعد هناك داعي لكي أشرح ما كتب فأصبحنا نعرف ذلك ولكن ماهو الأمر Main الذي كتب؟؟؟

 إن كل ما نكتب في الأمر Main سوف ينفذ عند بدء البرنامج مثلا:

كود:

static void Main(string[] args)

        {

            Console.Write("mytest");

        } 

وجرب سوف تلاحظ أنه ظهرت ال Console وكتبت mytest ثم أغلقت بسرعة

 السبب: أن ال Console تغلق فور ما تنتهي مهمتها ((عندما يموت كل ال Theards الحية الأمامية سوف نشرح ذلك في ما بعد ))

 الان سوف نقوم بعمل أمر خاص بنا ولكون أسمه Myvoid ولكن قبل ذلك عليي تعريفك بمجالات رؤية بعض الكلمات المحجوزة التالية:

 public: تظهر إلى كل محتوى المشروع الحالي مع إمكانية الظهور إلى خارج البرنامج ولذلك تستخدم في ال Class Library (سوف نتطرق لشرحها في ما بعد ) لكي يتمكن المستخدم من رؤية الأوامر التي تحويها

 private: يمكن رؤيتها من خلال البرنامج الحالي فقط!!

 والان سوف نبدأ بعمل أمر جديد لنا...

 أولا أكتب ما يلي (( أنتبه: يجب أن يكون الأمر ينتمي إلى Class وليس ل NameSpace))

 فمكان الكتابة الان سوف يكون هنا :

كود:

namespace ConsoleApplication1

{

    class Program

    {

مثلا هنا

        static void Main(string[] args)

        {

هنا لا لإننا داخل الأمر Main

        }

هنا ممكن

    }

} 

الان أكتب

كود:

static void Myvoid()

{

Console.Write("My Void Is Working");

}

وعلى هذا النمط تكتب الأوامر الخاصة بك

 والان نكتب في الأمر Main

Myvoid(); 

فيصبح الكود:

 (( أنتبه لن يتم ظهور الأمر Myvoid إذا لم يكن من نوع shared لذلك إستخدمنا static))

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

namespace ConsoleApplication1

{

    class Program

    {

        static void Main(string[] args)

        {

            Myvoid();   

        }

        static void Myvoid()

        {

            Console.Write("My Void Working");

        }

    }

} 

جرب ولاحظ

 النتيجة أن البرنامج ظهر وكتب الرسالة ( My Void Working) ثم أغلق

 ولكن كيف نعطي args للأمر الذي قمنا بصنعه؟؟؟

 مثلا أنا أريد أمر أرسل له رقمين يعود لي بناتج جمعهما

 سوف يكون كالتالي:

كود:

static void Main(string[] args)

        {

            double x = 0;

            Myvoid(5, 5,ref x);

        }

        static void Myvoid(double firstnumber,double secnumber,ref double Total)

        {

            Total = firstnumber + secnumber;

       

حيث عندما قمنا باستدعاء الأمر Myvoid طلب ال firstnumber وال lastnumber ومن ثم ال Total

 فما هذا ال Total ???

 هو الذي من خلاله سوف يعيد ناتج الجمع عن طريق الكلمة المحجوزة ref

 فمثلا لو أردنا أن نرجع قيمة نصية string يكون الكود كالتالي:

 ref string nameofvar

 (( ملاحظة يمكنك إستخدام الكلمة المحجوزة out بدلا من ref ))

 إلى اللقاء في الدرس القادم إن شاء الله...

قصص الانبياء : 3- قصة نوح علية السلام .

قصص الأنبياء كاملة من بداية الخلق الى رسول الله صلى الله عليه وسلام :

نوح  عليه  السلام

 نبذة:

 كان نوح تقيا صادقا أرسله  الله  ليهدي قومه وينذرهم عذاب الآخرة ولكنهم عصوه وكذبوه، ومع ذلك استمر يدعوهم إلى الدين الحنيف فاتبعه قليل من الناس، واستمر الكفرة في طغيانهم فمنع  الله  عنهم المطر ودعاهم نوح أن يؤمنوا حتى يرفع  الله  عنهم العذاب فآمنوا فرفع  الله  عنهم العذاب ولكنهم رجعوا إلى كفرهم، وأخذ يدعوهم 950 سنة ثم أمره  الله  ببناء السفينة وأن يأخذ معه زوجا من كل نوع ثم جاء الطوفان فأغرقهم أجمعين.

 سيرته: 

 حال الناس قبل بعثة نوح: 

 قبل أن يولد قوم نوح عاش خمسة رجال صالحين من أجداد قوم نوح، عاشوا زمنا ثم ماتوا، كانت أسماء الرجال الخمسة هي: (ودَّ، سُواع، يغوث، يعوق، نسرا). بعد موتهم صنع الناس لهم تماثيل في مجال الذكرى والتكريم، ومضى الوقت.. ومات الذين نحتوا التماثيل.. وجاء أبنائهم.. ومات الأبناء وجاء أبناء الأبناء.. ثم نسجت قصصا وحكايات حول التماثيل تعزو لها قوة خاصة.. واستغل إبليس الفرصة، وأوهم الناس أن هذه تماثيل آلهة تملك النفع وتقدر على الضرر.. وبدأ الناس يعبدون هذه التماثيل.

 إرسال نوح  عليه  السلام:
 كان نوح كان على الفطرة مؤمنا بالله تعالى قبل بعثته إلى الناس. وكل  الأنبياء  مؤمنون بالله تعالى قبل بعثتهم. وكان كثير الشكر لله عزّ وجلّ. فاختاره  الله  لحمل الرسالة. فخرج نوح على قومه وبدأ دعوته:

 يَا قَوْمِ اعْبُدُواْ اللَّهَ مَا لَكُم مِّنْ إِلَهٍ غَيْرُهُ إِنِّيَ أَخَافُ عَلَيْكُمْ عَذَابَ يَوْمٍ عَظِيمٍ

 بهذه الجملة الموجزة وضع نوح قومه أمام حقيقة الألوهية.. وحقيقة البعث. هناك إله خالق وهو وحده الذي يستحق العبادة.. وهناك موت ثم بعث ثم يوم للقيامة. يوم عظيم، فيه عذاب يوم عظيم.شرح "نوح" لقومه أنه يستحيل أن يكون هناك غير إله واحد هو الخالق. أفهمهم أن الشيطان قد خدعهم زمنا طويلا، وأن الوقت قد جاء ليتوقف هذا الخداع، حدثهم نوح عن تكريم  الله  للإنسان. كيف خلقه، ومنحه الرزق وأعطاه نعمة العقل، وليست عبادة الأصنام غير ظلم خانق للعقل.

 تحرك قوم نوح في اتجاهين بعد دعوته. لمست الدعوة قلوب الضعفاء والفقراء والبؤساء، وانحنت على جراحهم وآلامهم بالرحمة.. أما الأغنياء والأقوياء والكبراء، تأملوا الدعوة بعين الشك… ولما كانوا يستفيدون من بقاء الأوضاع على ما هي عليه.. فقد بدءوا حربهم ضد نوح.

 في البداية اتهموا نوحا بأنه بشر مثلهم:

 فَقَالَ الْمَلأُ الَّذِينَ كَفَرُواْ مِن قِوْمِهِ مَا نَرَاكَ إِلاَّ بَشَرًا مِّثْلَنَا

 قال تفسير القرطبي: الملأ الذين كفروا من قومه هم الرؤساء الذين كانوا في قومه. يسمون الملأ لأنهم مليئون بما يقولون.

 قال هؤلاء الملأ لنوح: أنت بشر يا نوح.

 رغم أن نوحا لم يقل غير ذلك، وأكد أنه مجرد بشر.. والله يرسل إلى الأرض رسولا من البشر، لأن الأرض يسكنها البشر، ولو كانت الأرض تسكنها الملائكة لأرسل  الله  رسولا من الملائكة.. استمرت الحرب بين الكافرين ونوح.

 في البداية، تصور الكفرة يومها أن دعوة نوح لا تلبث أن تنطفئ وحدها، فلما وجدوا الدعوة تجتذب الفقراء والضعفاء وأهل الصناعات البسيطة بدءوا الهجوم على نوح من هذه الناحية. هاجموه في أتباعه، وقالوا له: لم يتبعك غير الفقراء والضعفاء والأراذل.

 هكذا اندلع الصراع بين نوح ورؤساء قومه. ولجأ الذين كفروا إلى المساومة. قالوا لنوح: اسمع يا نوح. إذا أردت أن نؤمن لك فاطرد الذين آمنوا بك. إنهم ضعفاء وفقراء، ونحن سادة القوم وأغنياؤهم.. ويستحيل أن تضمنا دعوة واحدة مع هؤلاء.

 واستمع نوح إلى كفار قومه وأدرك أنهم يعاندون، ورغم ذلك كان طيبا في رده. أفهم قومه أنه لا يستطيع أن يطرد المؤمنين، لأنهم أولا ليسوا ضيوفه، إنما هم ضيوف الله.. وليست الرحمة بيته الذي يدخل فيه من يشاء أو يطرد منه من يشاء، إنما الرحمة بيت  الله  الذي يستقبل فيه من يشاء.

 كان نوح يناقش كل حجج الكافرين بمنطق  الأنبياء  الكريم الوجيه. وهو منطق الفكر الذي يجرد نفسه من الكبرياء الشخصي وهوى المصالح الخاصة.

 قال لهم إن  الله  قد آتاه الرسالة والنبوة والرحمة. ولم يروا هم ما آتاه الله، وهو بالتالي لا يجبرهم على الإيمان برسالته وهم كارهون. إن كلمة لا إله إلا  الله  لا تفرض على أحد من البشر. أفهمهم أنه لا يطلب منهم مقابلا لدعوته، لا يطلب منهم مالا فيثقل عليهم، إن أجره على الله، هو الذي يعطيه ثوابه. أفهمهم أنه لا يستطيع أن يطرد الذين آمنوا بالله، وأن له حدوده كنبي. وحدوده لا تعطيه حق طرد المؤمنين لسببين: أنهم سيلقون  الله  مؤمنين به فكيف يطرد مؤمنا بالله؟ ثم أنه لو طردهم لخاصموه عند الله، ويجازي من طردهم، فمن الذي ينصر نوحا من  الله  لو طردهم؟ وهكذا انتهى نوح إلى أن مطالبة قومه له بطرد المؤمنين جهل منهم.

 وعاد نوح يقول لهم أنه لا يدعى لنفسه أكثر مما له من حق، وأخبرهم بتذلله وتواضعه لله عز وجل، فهو لا يدعي لنفسه ما ليس له من خزائن الله، وهي إنعامه على من يشاء من عباده، وهو لا يعلم الغيب، لأن الغيب علم اختص  الله  تعالى وحده به. أخبرهم أيضا أنه ليس ملكا. بمعنى أن منزلته ليست كمنزلة الملائكة.. قال لهم نوح: إن الذين تزدري أعينكم وتحتقر وتستثقل.. إن هؤلاء المؤمنين الذي تحتقرونهم لن تبطل أجورهم وتضيع لاحتقاركم لهم،  الله  أعلم بما في أنفسهم. هو الذي يجازيهم  عليه  ويؤاخذهم به.. أظلم نفسي لو قلت إن  الله  لن يؤتيهم خيرا.

 وسئم الملأ يومها من هذا الجدل الذي يجادله نوح.. حكى  الله  موقفهم منه في سورة (هود):

 قَالُواْ يَا نُوحُ قَدْ جَادَلْتَنَا فَأَكْثَرْتَ جِدَالَنَا فَأْتَنِا بِمَا تَعِدُنَا إِن كُنتَ مِنَ الصَّادِقِينَ (32) قَالَ إِنَّمَا يَأْتِيكُم بِهِ اللّهُ إِن شَاء وَمَا أَنتُم بِمُعْجِزِينَ (33) وَلاَ يَنفَعُكُمْ نُصْحِي إِنْ أَرَدتُّ أَنْ أَنصَحَ لَكُمْ إِن كَانَ اللّهُ يُرِيدُ أَن يُغْوِيَكُمْ هُوَ رَبُّكُمْ وَإِلَيْهِ تُرْجَعُونَ (34) (هود)

 أضاف نوح إغواءهم إلى  الله  تعالى. تسليما بأن  الله  هو الفاعل في كل حال. غير أنهم استحقوا الضلال بموقفهم الاختياري وملئ حريتهم وكامل إرادتهم.. فالإنسان صانع لأفعاله ولكنه محتاج في صدورها عنه إلى ربه. بهذه النظرة يستقيم معنى مساءلة الإنسان عن أفعاله. كل ما في الأمر أن  الله  ييسر كل مخلوق لما خلق له، سواء أكان التيسير إلى الخير أم إلى الشر.. وهذا من تمام الحرية وكمالها. يختار الإنسان بحريته فييسر له  الله  تعالى طريق ما اختاره. اختار كفار قوم نوح طريق الغواية فيسره  الله  لهم.

 وتستمر المعركة، وتطول المناقشة بين الكافرين من قوم نوح وبينه إذا انهارت كل حجج الكافرين ولم يعد لديهم ما يقال، بدءوا يخرجون عن حدود الأدب ويشتمون نبي الله:

 قَالَ الْمَلأُ مِن قَوْمِهِ إِنَّا لَنَرَاكَ فِي ضَلاَلٍ مُّبِينٍ (60) (الأعراف)

 ورد عليهم نوح بأدب  الأنبياء  العظيم:

 قَالَ يَا قَوْمِ لَيْسَ بِي ضَلاَلَةٌ وَلَكِنِّي رَسُولٌ مِّن رَّبِّ الْعَالَمِينَ (61) أُبَلِّغُكُمْ رِسَالاَتِ رَبِّي وَأَنصَحُ لَكُمْ وَأَعْلَمُ مِنَ اللّهِ مَا لاَ تَعْلَمُونَ (62) (الأعراف)

 ويستمر نوح في دعوة قومه إلى الله. ساعة بعد ساعة. ويوما بعد يوم. وعاما بعد عام. ومرت الأعوام ونوح يدعو قومه. كان يدعوهم ليلا ونهارا، وسرا وجهرا، يضرب لهم الأمثال. ويشرح لهم الآيات ويبين لهم قدرة  الله  في الكائنات، وكلما دعاهم إلى  الله  فروا منه، وكلما دعاهم ليغفر  الله  لهم جعلوا أصابعهم في آذانهم واستكبروا عن سماع الحق. واستمر نوح يدعو قومه إلى  الله  ألف سنة إلا خمسين عاما.

 وكان يلاحظ أن عدد المؤمنين لا يزيد، بينما يزيد عدد الكافرين. وحزن نوح غير أنه لم يفقد الأمل، وظل يدعو قومه ويجادلهم، وظل قومه على الكبرياء والكفر والتبجح. وحزن نوح على قومه. لكنه لم يبلغ درجة اليأس. ظل محتفظا بالأمل طوال 950 سنة. ويبدو أن أعمار الناس قبل الطوفان كانت طويلة، وربما يكون هذا العمر الطويل لنوح معجزة خاصة له.

 وجاء يوم أوحى  الله  إليه، أنه لن يؤمن من قومك إلا من قد آمن. أوحى  الله  إليه ألا يحزن عليهم. ساعتها دعا نوح على الكافرين بالهلاك:

 وَقَالَ نُوحٌ رَّبِّ لَا تَذَرْ عَلَى الْأَرْضِ مِنَ الْكَافِرِينَ دَيَّارًا (26) (نوح)

 برر نوح دعوته بقوله:

 إِنَّكَ إِن تَذَرْهُمْ يُضِلُّوا عِبَادَكَ وَلَا يَلِدُوا إِلَّا فَاجِرًا كَفَّارًا (26) (نوح)

 الطوفان: 

 ثم أصدر  الله  تعالى حكمه على الكافرين بالطوفان. أخبر  الله  تعالى عبده نوحا أنه سيصنع سفينة (بِأَعْيُنِنَا وَوَحْيِنَا) أي بعلم  الله  وتعليمه، وعلى مرأى منه وطبقا لتوجيهاته ومساعدة الملائكة. أصدر  الله  تعالى أمره إلى نوح: (وَلاَ تُخَاطِبْنِي فِي الَّذِينَ ظَلَمُواْ إِنَّهُم مُّغْرَقُونَ) يغرق  الله  الذين ظلموا مهما كانت أهميتهم أو قرابتهم للنبي، وينهى  الله  نبيه أن يخاطبه أو يتوسط لهم.

 وبدأ نوح يغرس الشجر ويزرعه ليصنع منه السفينة. انتظر سنوات، ثم قطع ما زرعه، وبدأ نجارته. كانت سفينة عظيمة الطول والارتفاع والمتانة، وقد اختلف المفسرون في حجمها، وهيئتها، وعدد طبقاتها، ومدة عملها، والمكان الذي عملت فيه، ومقدار طولها، وعرضها، على أقوال متعارضة لم يصح منها شيء. وقال الفخر الرازي في هذا كله: أعلم أن هذه المباحث لا تعجبني، لأنها أمور لا حاجة إلى معرفتها البتة، ولا يتعلق بمعرفتها فائدة أصلا. نحن نتفق مع الرازي في مقولته هذه. فنحن لا نعرف عن حقيقة هذه السفينة إلا ما حدثنا  الله  به. تجاوز  الله  تعالى هذه التفصيلات التي لا أهمية لها، إلى مضمون القصة ومغزاها المهم.

 بدأ نوح يبني السفينة، ويمر  عليه  الكفار فيرونه منهمكا في صنع السفينة، والجفاف سائد، وليست هناك أنهار قريبة أو بحار. كيف ستجري هذه السفينة إذن يا نوح؟ هل ستجري على الأرض؟ أين الماء الذي يمكن أن تسبح فيه سفينتك؟ لقد جن نوح، وترتفع ضحكات الكافرين وتزداد سخريتهم من نوح. وكانوا يسخرون منه قائلين: صرت نجارا بعد أن كنت نبيا!

 إن قمة الصراع في قصة نوح تتجلى في هذه المساحة الزمنية، إن الباطل يسخر من الحق. يضحك  عليه  طويلا، متصورا أن الدنيا ملكه، وأن الأمن نصيبه، وأن العذاب غير واقع.. غير أن هذا كله مؤقت بموعد حلول الطوفان. عندئذ يسخر المؤمنون من الكافرين، وتكون سخريتهم هي الحق.

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

 وجاء اليوم الرهيب، فار التنور. وأسرع نوح يفتح سفينته ويدعو المؤمنين به، وهبط جبريل  عليه  السلام إلى الأرض. حمل نوح إلى السفينة من كل حيوان وطير ووحش زوجين اثنين، بقرا وثورا، فيلا وفيلة، عصفورا وعصفور، نمرا ونمرة، إلى آخر المخلوقات. كان نوح قد صنع أقفاصا للوحوش وهو يصنع السفينة. وساق جبريل  عليه  السلام أمامه من كل زوجين اثنين، لضمان بقاء نوع الحيوان والطير على الأرض، وهذا معناه أن الطوفان أغرق الأرض كلها، فلولا ذلك ما كان هناك معنى لحمل هذه الأنواع من الحيوان والطير. وبدأ صعود السفينة. صعدت الحيوانات والوحوش والطيور، وصعد من آمن بنوح، وكان عدد المؤمنين قليلا.

 لم تكن زوجة نوح مؤمنة به فلم تصعد، وكان أحد أبنائه يخفي كفره ويبدي الإيمان أمام نوح، فلم يصعد هو الآخر. وكانت أغلبية الناس غير مؤمنة هي الأخرى، فلم تصعد. وصعد المؤمنون. قال ابن عباس، رضي  الله  عنهما: آمن من قوم نوح ثمانون إنسانا.

 ارتفعت المياه من فتحات الأرض. انهمرت من السماء أمطارا غزيرة بكميات لم تر مثلها الأرض. فالتقت أمطار السماء بمياه الأرض، وصارت ترتفع ساعة بعد ساعة. فقدت البحار هدوئها، وانفجرت أمواجها تجور على اليابسة، وتكتسح الأرض. وغرقت الكرة الأرضية للمرة الأولى في المياه.

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

 نادى نوح ابنه قائلا: يَا بُنَيَّ ارْكَب مَّعَنَا وَلاَ تَكُن مَّعَ الْكَافِرِينَ
 ورد الابن عليه: قَالَ سَآوِي إِلَى جَبَلٍ يَعْصِمُنِي مِنَ الْمَاء
 عاد نوح يخاطبه: قَالَ لاَ عَاصِمَ الْيَوْمَ مِنْ أَمْرِ اللّهِ إِلاَّ مَن رَّحِمَ

 وانتهى الحوار بين نوح وابنه:

 وَحَالَ بَيْنَهُمَا الْمَوْجُ فَكَانَ مِنَ الْمُغْرَقِينَ


 انظر إلى تعبير القرآن الكريم (وَحَالَ بَيْنَهُمَا الْمَوْجُ) أنهى الموج حوارهما فجأة. نظر نوح فلم يجد ابنه. لم يجد غير جبال الموج التي ترتفع وترفع معها السفينة، وتفقدها رؤية كل شيء غير المياه. وشاءت رحمة  الله  أن يغرق الابن بعيدا عن عين الأب، رحمة منه بالأب، واعتقد نوح أن ابنه المؤمن تصور أن الجبل سيعصمه من الماء، فغرق.

 واستمر الطوفان. استمر يحمل سفينة نوح. بعد ساعات من بدايته، كانت كل عين تطرف على الأرض قد هلكت غرقا. لم يعد باقيا من الحياة والأحياء غير هذا الجزء الخشبي من سفينة نوح، وهو ينطوي على الخلاصة المؤمنة من أهل الأرض. وأنواع الحيوانات والطيور التي اختيرت بعناية. ومن الصعب اليوم تصور هول الطوفان أو عظمته. كان شيئا مروعا يدل على قدرة الخالق. كانت السفينة تجري بهم في موج كالجبال. ويعتقد بعض العلماء الجيولوجيا اليوم إن انفصال القارات وتشكل الأرض في صورتها الحالية، قد وقعا نتيجة طوفان قديم جبار، ثارت فيه المياه ثورة غير مفهومة. حتى غطت سطح الجزء اليابس من الأرض، وارتفعت فيه قيعان المحيطات ووقع فيه ما نستطيع تسميته بالثورة الجغرافية.

 استمر طوفان نوح زمنا لا نعرف مقداره. ثم صدر الأمر الإلهي إلى السماء أن تكف عن الإمطار، وإلى الأرض أن تستقر وتبتلع الماء، وإلى أخشاب السفينة أن ترسو على الجودي، وهو اسم مكان قديم يقال أنه جبل في العراق. طهر الطوفان الأرض وغسلها. قال تعالى في سورة (هود):

 وَقِيلَ يَا أَرْضُ ابْلَعِي مَاءكِ وَيَا سَمَاء أَقْلِعِي وَغِيضَ الْمَاء وَقُضِيَ الأَمْرُ وَاسْتَوَتْ عَلَى الْجُودِيِّ وَقِيلَ بُعْداً لِّلْقَوْمِ الظَّالِمِينَ (44) (هود)

 (وَغِيضَ الْمَاء) بمعنى نقص الماء وانصرف عائدا إلى فتحات الأرض. (وَقُضِيَ الأَمْرُ) بمعنى أنه أحكم وفرغ منه، يعني هلك الكافرون من قوم نوح تماما. ويقال أن  الله  أعقم أرحامهم أربعين سنة قبل الطوفان، فلم يكن فيمن هلك طفل أو صغير. (وَاسْتَوَتْ عَلَى الْجُودِيِّ) بمعنى رست عليه، وقيل كان ذلك يوم عاشوراء. فصامه نوح، وأمر من معه بصيامه. (وَقِيلَ بُعْداً لِّلْقَوْمِ الظَّالِمِينَ) أي هلاكا لهم. طهر الطوفان الأرض منهم وغسلها. ذهب الهول بذهاب الطوفان. وانتقل الصراع من الموج إلى نفس نوح.. تذكر ابنه الذي غرق.

 لم يكن نوح يعرف حتى هذه اللحظة أن ابنه كافر. كان يتصور أنه مؤمن عنيد، آثر النجاة باللجوء إلى جبل. وكان الموج قد أنهى حوارهما قبل أن يتم.. فلم يعرف نوح حظ ابنه من الإيمان. تحركت في قلب الأب عواطف الأبوة. قال تعالى في سورة (هود):

 وَنَادَى نُوحٌ رَّبَّهُ فَقَالَ رَبِّ إِنَّ ابُنِي مِنْ أَهْلِي وَإِنَّ وَعْدَكَ الْحَقُّ وَأَنتَ أَحْكَمُ الْحَاكِمِينَ (45) (هود)

 أراد نوح أن يقول لله أن ابنه من أهله المؤمنين. وقد وعده  الله  بنجاة أهله المؤمنين. قال  الله  سبحانه وتعالى، مطلعا نوحا على حقيقة ابنه للمرة الأولى:

 يَا نُوحُ إِنَّهُ لَيْسَ مِنْ أَهْلِكَ إِنَّهُ عَمَلٌ غَيْرُ صَالِحٍ فَلاَ تَسْأَلْنِ مَا لَيْسَ لَكَ بِهِ عِلْمٌ إِنِّي أَعِظُكَ أَن تَكُونَ مِنَ الْجَاهِلِينَ (46) (هود)

 قال القرطبي -نقلا عن شيوخه من العلماء- وهو الرأي الذي نؤثره: كان ابنه عنده -أي نوح- مؤمنا في ظنه، ولم يك نوح يقول لربه: (إِنَّ ابُنِي مِنْ أَهْلِي) إلا وذلك عنده كذلك، إذ محال أن يسأل هلاك الكفار، ثم يسأل في إنجاء بعضهم. وكان ابنه يسرّ الكفر ويظهر الإيمان. فأخبر  الله  تعالى نوحا بما هو منفرد به من علم الغيوب. أي علمت من حال ابنك ما لم تعلمه أنت. وكان  الله  حين يعظه أن يكون من الجاهلين، يريد أن يبرئه من تصور أن يكون ابنه مؤمنا، ثم يهلك مع الكافرين.

 وثمة درس مهم تنطوي  عليه  الآيات الكريمة التي تحكي قصة نوح وابنه. أراد  الله  سبحانه وتعالى أن يقول لنبيه الكريم أن ابنه ليس من أهله، لأنه لم يؤمن بالله، وليس الدم هو الصلة الحقيقية بين الناس. ابن النبي هو ابنه في العقيدة. هو من يتبع  الله  والنبي، وليس ابنه من يكفر به ولو كان من صلبه. هنا ينبغي أن يتبرأ المؤمن من غير المؤمن. وهنا أيضا ينبغي أن تتصل بين المؤمنين صلات العقيدة فحسب. لا اعتبارات الدم أو الجنس أو اللون أو الأرض.

 واستغفر نوح ربه وتاب إليه ورحمه  الله  وأمره أن يهبط من السفينة محاطا ببركة  الله  ورعايته. وهبط نوح من سفينته. أطلق سراح الطيور والوحش فتفرقت في الأرض، نزل المؤمنون بعد ذلك. ولا يحكي لنا القرآن الكريم قصة من آمن مع نوح بعد نجاتهم من الطوفان.

لسماع قصة نوح بالصوت .. مع الدكتور طارق السويدان .. اتبع الرابط التالي :
http://www.youtube.com/watch?v=dz_nGclowmY

.................................................................................................................
زورنا في مجموعة ملتقى الجامعات(لكافة التخصصات العلمية ) .. على الرابط التالي .. https://www.facebook.com/groups/459876307429381/
بكم نفيد ونستفيد ..

.....
.....
ترتيب وجمع : محمد دماج