+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : اريد حذف جميع التسجيلات من جدول بضغطة زر ? (/showthread.php?tid=10202)
اريد حذف جميع التسجيلات من جدول بضغطة زر ? - hamza101110 - 10-05-2019
السلام عليكم
عندي جدولين لهما علاقة كالاتي
table1
N°bon----------nom-----date
table2
N°SEL-------name----prenom--N°bon
اريد حذف جميع السجلات على الجدولين
بحيث يحذف الاول table2 ثم يحذف الجدول table1
وذايك بضغطة زر
دلفي..
قاعدة بيانات اكسس
وشكرااا
RE: اريد حذف جميع التسجيلات من جدول بضغطة زر ? - لؤي - 10-05-2019
وعليكم السلام
Table1.delete
RE: اريد حذف جميع التسجيلات من جدول بضغطة زر ? - hamza101110 - 10-05-2019
(10-05-2019, 09:48 AM)لؤي كتب : وعليكم السلام
Table1.delete
شكراا ولكن
هذا لحذف سجل واحد فقط
اريد حذف كل السجلات
RE: اريد حذف جميع التسجيلات من جدول بضغطة زر ? - لؤي - 10-05-2019
السلام عليكم
ما عليك إلا وضع حلقة لحذفهم
كود :
mytable.BeginBatch;
for i := mytable.RecordCount - 1 downto 0 do
begin
mytable.Delete;
end;
mytable.EndBatch;
mytable.Refresh;RE: اريد حذف جميع التسجيلات من جدول بضغطة زر ? - merouane - 10-05-2019
TTable.EmptyTable
http://docwiki.embarcadero.com/CodeExamples/Rio/en/TTable.EmptyTable_(Delphi)
أو من خلال sql :
Trancate
https://www.w3schools.com/sql/sql_ref_drop_table.asp
أو كالتالي
Delete * from table2
https://docs.microsoft.com/en-us/office/client-developer/access/desktop-database-reference/delete-statement-microsoft-access-sql