مشاهدة النسخة كاملة : اريد حذف جميع سجلات الجدول بضغطة زر واحدة في الدلفي
hamza101110
2019-04-23, 14:14
السلام عليكم
عندي جدول قاعدة بيانات اكسس مربوطة بالدلفي 7
في الواجهة . اريد وضع زر يقوم بحذف جميع البيانات في الجدول اي تفريغه . اريد الكود ان توفر
السءال التاني هو انو لماذا كود الاضافة post في الدلفي 7. لا يعمل مع قاعدة بيانات اكسس . ما هو الكود البديل
و شكررااااا
السلام عليكم
يمكنك استخدام الـ SQL
procedure TForm1.Button1Click(Sender: TObject);
var
Qry: TADOQuery;
begin
Qry := TADOQuery.Create(nil);
try
Qry.Connection := AdoConnection1;
Qry.SQL.Add('delete from table1');
Qry.ExecSQL;
finally
Qry.Free;
end;
end;
بالنسبة لسآلك الثاني ما هي مكونات الاتصال
hamza101110
2019-04-23, 15:57
اخي انا اعمل بقاعدة بيانات اكسس (adotable) مربوطة بالدلفي .
ليست sql.
السلام عليكم
؟؟؟ !!!
كل قواعد البيانات تستخدم الـ SQL كلغة تخاطب بينها و بين Client العميل و لا توجد قاعدة بيانات تسمى SQL بالنسبة لقواعد بيانات Microsoft هناك MS Sql Server و هناك Access في حالتك انت تستخدم Access سواء اعلمت ذلك ام لا فعند ربط Ado Table مع قاعدة البيانات يتم توليد جملة SQL من مكون الاتصال ADOConnection انت تريد ان تحذف كل السجلات لذلك انسب طريقة هي عن طريق sql
قم ببحث بسيط لتفرق بين محرك قاعدة البينات و وبين SQL
https://support.office.com/ar-sa/article/access-sql-%D8%A7%D9%84%D9%85%D9%81%D8%A7%D9%87%D9%8A%D9%85-%D8%A7%D9%84%D8%A7%D8%B3%D8%A7%D8%B3%D9%8A%D9%87-%D9%88-%D9%85%D9%81%D8%B1%D8%AF%D8%A7%D8%AA-%D9%88-%D8%A8%D9%86%D8%A7%D8%A1-%D8%AC%D9%85%D9%84%D9%87-444d0303-cde1-424e-9a74-e8dc3e460671
بالتوفيق
hamza101110
2019-04-24, 01:50
ولكن لم تشرحلي كيف اعمل بالكود
اكيد اضعه في زر
ولكن هل اضيف عنصر جديد للفورم قبل وضع الكود
السلام عليكم
يجب ان تطلع على اساسيات البرمجة بالدلفي/ اساسيات قواعد البيانات قبل محاولة برمجة شيئ ما
يوجد العديد من الدروس على youtube و باللغة العربية
فقط ابحث
hamza101110
2019-04-24, 13:41
اخي شكرااا كثيراااا
fares houdji
2020-01-06, 20:38
while not Table1.Eof do
begin
Table1.First();
Table1.Delete();
end;
باستخدام الكود التالي
while not <name_table>.Eof do
begin
<name_table>.First();
<name_table>.Delete();
end;
hamzawookr
2020-07-14, 23:17
شكر على الموضوع
vBulletin® v3.8.10 Release Candidate 2, Copyright ©2000-2025, TranZ by Almuhajir