[abu ammar]

السلام عليكم  يسعدني المشاركة بشرح برمجة أزرار المكون  DBnavigator :
المكون  DBnavigator  يستخدم في التنقل بين سجلات قواعد البيانات و اجراء عمليات 
الاضافة والتعديل والحذف والحفظ والالغاء والتحديث لسجلات قاعدة البيانات دون تدخل من المبرمج
يأخد اسم برمجي يبدأ بـ  nb  r  قمثلا زر الحفظ  nbpost
قد يحتاج المبرمج تعديل برمجة زر من هذه الأزرار  وهذا مثال على ذلك :

في حدث النقر على المكون :

كود :

procedure TForm1.DBNavigator1Click(Sender: TObject;
 Button: TDBNavButtonType);
begin
 if Button = nbDelete then
   showmessage('you are about to delete this record');
 end;
end;

[viv]

شكرا اخ ابو عمر

ايضا لاتنسو ان هناك احداث لمكون الجدول نفسه يمكن برمجة ماتحتاج ايضا هناك
احداث ما قبل الاضافة او بعد الاضافة ما قبل التعديل او بعد التعديل ماقبل الحذف او بعد الحذف او عندما يتحرك المؤشر الى سجل اخر وهلم جرا

يمكنك ان تربط الاداة هذه بشكل عادي وتبرمج ما تريد هناك مثلا تؤدي نفس الغرض والنتيجة ، الامر عائد للمبرمج