اشكال حول الجدول مشغول ( Table est occupée )

[lahcen]

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

اثناء برمجتي استخدمة تعليمة
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;