delphi4arab منتديات دلفي للعرب
اشكال حول الجدول مشغول ( Table est occupée ) - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : اشكال حول الجدول مشغول ( Table est occupée ) (/showthread.php?tid=719)



اشكال حول الجدول مشغول ( Table est occupée ) - lahcen - 21-03-2009

لديا جدول من نوع دباج4 DBase4
قمت بالتعليمات التالية
ولكن ظهر هذا الاشكال
PHP كود :
With Table Do
   
Begin
      Close
;
      
Exclusive:=True;
     
EmptyTable;//  هنا حدث الخطأ Table est occupée 
      
Open;
  
End; 
فما هو الحل وشكرا:confused:


اشكال حول الجدول مشغول ( Table est occupée ) - محمد عبد العزيز - 21-03-2009


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



اشكال حول الجدول مشغول ( Table est occupée ) - nabilkeb - 21-03-2009

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


بينما لو استعملت هذا الكود (حتى لو قمت بتفعيل الخاصية من الخصائص أثناء البرمجة) ، لن يظهر المشكل :
كود :
while not table1.Eof do Table1.Delete;
لأنك مع هذا الكود لن تحتاج غلق الجدول .


هذا لتتضح الصورة ، و مع كل هذا : لا ينصح بتفعيل الجدول من خضائص المكون ، بل افعـــل ذلك برمـجــيــــــــــــــــا


اشكال حول الجدول مشغول ( Table est occupée ) - lahcen - 23-03-2009

شكرا على الاجابات بعد عناء كبير استطعت تحديد الاشكال

اثناء برمجتي استخدمة تعليمة
Query1.SQL.Clear;
Query1.DatabaseName := Principale.Rep_Data;
Query1.SQL.Add('Select * From '+Table_Data.Name);
Query1.ExecSQL;
والجدول المستخدم لدي هو Table_Data من الرغم من اني قمت بغلق Query الا انه بقاء الاشكال ونفس الخطا
ثم قمت بتغير الكود بتعلميات اخرى ليست باستخدام SQL فلم يقع اي مشكل

كيف يتم انها عمل Query
علما اني قمت باستعمال مايلي التعليمات التالية فرادا ومجتمعة ولم تنجح
Query1.Close;
Query1.DisableControls;
Query1.Cancel;
Query1.Destroy;