اين الخطأ في الكود

[bouh25]

begin

   if (Not DM.Temploye.Locate('Matrecul',DBMat.Text,[locaseinsensitive,lopartialkey])) then

         begin

           DM.Temploye.post;

            MessageDlg('  لقد تمت اضافة ملف عامــل بكل نجاح  ', mtCustom,[mbYes],0);

           exit

         end

        else

         begin

          MessageDlg('الرقم الذي الذي ادخلته مسجل من قبل '+ #13+ DBMat.Text ,mtError,[mbYes],0);

          exit ;

         end;

end;

[mobile]

السلام عليكم ورحمة الله
لا حظ Temploye
ليس في dsEditModes خين قمت بالبحث لذا لا يمكن عمل post

[samir28]

محاولة
أخرج not خارج القوس

[bouh25]

شكرا على تفاعلكم

يبقى المشل قائم الى حد الآن

[samir28]

أنت تستعمل  - DBMat.Text
هذا في حالة ما ان اردن ان تربط الحقول بالجدول 
أما اذا اردت الاضافة فاستعمل مثلا edit.text

[محمد عبد العزيز]

السلام عليكم
كما نوه الاخ mobile
انت تستدعي Locate التي تبحث عن سجل ما وبالتالي تغير السجل المختار ان وجد،
لا يجب ان تكون هناك استدعاء لTable1.Insert/Table1.Edit/Table1.Append قبل استدعاء Table1.Locate