البرمجة الغرضية التوجه في دلفي
البرمجة الغرضية التوجه في دلفي
البرمجة الغرضية التوجه في دلفي
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
<strong>البرمجة</strong> <strong>الغرضية</strong> <strong>التوجه</strong> <strong>في</strong> دل<strong>في</strong><br />
عروة عيسى<br />
: ملاحظة<br />
إن البادئة T التي سبقنا ا إسم المتحول هي عبارة عن تقليد (عرف) للمترجم ، يتبعة مبرمجو الدل<strong>في</strong> منذ ظهورها بإيعاذ<br />
من شركة بورلاند نفسها<br />
. الحرف<br />
شفرتك مفهومة أكثر من قبل بقية المطورين الذين اعتادو على ذلك .<br />
T هو إختصار لType ، وهو مجرد حرف ولكن إتباع هذا العرف سيجعل<br />
ربما لاحظت من تعريف الصنف أننا قمنا بتعريف أسماء التوابع والإجراءات فقط (رؤوس المناهج) ولم نقم بكتابة<br />
أجسامها هناك ، حيث نقوم بتعريف أجسام المناهج (توابع+إجراءات) <strong>في</strong> جسم الوحدة نفسها<br />
Implementation الخاص ا<br />
،<br />
.<br />
أي قسم ال<br />
وبما أننا نستطيع تعريف أكثر من صنف <strong>في</strong> الوحدة (Unit) ولكل صنف مناهج خاصة به لذلك يجب تمييز جسم كل<br />
منهج لنعرف لإي صنف يتبع<br />
المنهج مثلا<br />
.<br />
: TDate.SetValue<br />
من أجل ذلك فإن تعريف أجسام المناهج يسبق بإسم الصنف مفصولا بنقطة عن إسم<br />
Implementation<br />
…<br />
procedure TDate.SetValue (m, d, y: Integer);<br />
begin<br />
Month := m;<br />
Day := d;<br />
Year := y;<br />
end;<br />
function TDate.LeapYear: Boolean;<br />
begin<br />
// call IsLeapYear in SysUtils.pas<br />
Result := IsLeapYear (Year);<br />
end;<br />
فكرة :<br />
إذا ضغطت Ctrl+Shift+C عندما يكون المؤشر ضمن تعريف الصنف<br />
،<br />
تلقائيا بمساعدتك وتوليد هيكل التعريف الخاص بالمناهج التي قمت بتعريفها <strong>في</strong> الصنف<br />
عرفنا الآن كيف نبني صنف جديد<br />
.<br />
،<br />
فإن ميزة تكميل التعريف <strong>في</strong> دل<strong>في</strong> سوف تقوم<br />
وأننا نستطيع أن ننشيء أغراضا ً من هذا الصنف وإستخدامها <strong>في</strong> شفرتنا<br />
.<br />
٧
Change language