delphi4arab منتديات دلفي للعرب
كيف يمكن التعديل والحذف في نفس الوقت؟ - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكن التعديل والحذف في نفس الوقت؟ (/showthread.php?tid=7625)

الصفحات: 1 2


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - PLANSHARP - 20-03-2016

جرب Compact & Repair لملف الأكسس.


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - Manarsoft - 20-03-2016

Absolute لا يحتاج إلى أي إظافات فهو مدمج مع الملف التنفيذي


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - ALG2009 - 20-03-2016

(20-03-2016, 03:23 AM)Mr.DOS كتب : سلام عليكم
قم بإخراج الشرط المساواة total = 0
قبل تنفيذ الاستعلام الثاني  delete

ارفق مثال
مثال مرفق وأرجو من وجد سبب هذا الخطأ أن يوضح لي السبب أو إلافاقي برسالة الخطأ باللغة الأجنبية


.rar   pro.rar (الحجم : 22.07 ك ب / التحميلات : 5)


(20-03-2016, 08:28 AM)Manarsoft كتب : Absolute لا يحتاج إلى أي إظافات فهو مدمج مع الملف التنفيذي
سأحاول الإطلاع على قاعدة البيانات هذه وأتمنى أن لا تكون للمشاريع الكبيرة


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - PLANSHARP - 21-03-2016

أخي العزيز:
يجب أن تقوم بعمل التالي:
كود :
ADOQuery1.Close; ADOQuery1.SQL.Text:='update table1 set total=(total-5) '; ADOQuery1.ExecSQL; // ADOQuery1.Close; ADOQuery1.SQL.Text:='delete from table1 where total=0'; ADOQuery1.ExecSQL; // ADOTable1.Close; ADOTable1.Open
وذلك لكي يعيد ال adotable جلب بيانات الجدول من جديد, حيث أنه ليس هو من قام بالتحديث, أو يمكنك ترك الـ active = false لل adotable
و بعد الإنتهاء من تعليمات الحذف تعيدها إلى true.
أو استخدم adoquery آخر للإتصال بالجدول نفسه و عندها يمكن تطبيق الأمر refresh.


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - Delphi4Us - 21-03-2016

كود :
try Adoconnection1.BeginTrans; try \\ Any Thing Here Except ON  E:Exception DO ADOConnection1.RollbackTrans; end; end;


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


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - ALG2009 - 21-03-2016

(21-03-2016, 11:18 AM)Delphi4Us كتب :
كود :
try Adoconnection1.BeginTrans; try \\ Any Thing Here Except ON  E:Exception DO ADOConnection1.RollbackTrans; end; end;


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

جزاك الله خير
سأضعها في الحسبان
هل جربت البرنامج المرفق وإن كانت لغة الرسالة باللغة الأجنبية أرجو أن تضعها هنا لأبحث عن حل لهذه المشكلة


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - Mr.DOS - 22-03-2016

السلام عليكم

شاهد المرفق


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - PLANSHARP - 23-03-2016

أخي العزيز هل جربت الكود الذي أرفقته لك أعلاه؟
كما قلت لك هذا هو الحل, أو أن تقوم باستعمال ال adoquery للإتصال بالجدول عوضاً عن adotable أيضاً كم أوضحت لك في الرد السابق!!


RE: كيف يمكن التعديل والحذف في نفس الوقت؟ - ALG2009 - 23-03-2016

(23-03-2016, 09:03 AM)PLANSHARP كتب : أخي العزيز هل جربت الكود الذي أرفقته لك أعلاه؟
كما قلت لك هذا هو الحل, أو أن تقوم باستعمال ال adoquery للإتصال بالجدول عوضاً عن adotable أيضاً كم أوضحت لك في الرد السابق!!

الله يرضى عليك ويدخلك الجنه

لم أنتبه
كود :
ADOTable1.Close; ADOTable1.Open

كود :
لقد طبقتها وإشتغل الكود عذرا صدقي

Blush