اريد حذف جميع التسجيلات من جدول بضغطة زر ?

[hamza101110]

السلام عليكم 
عندي جدولين لهما علاقة كالاتي

table1
N°bon----------nom-----date
table2
N°SEL-------name----prenom--N°bon

اريد حذف جميع السجلات على الجدولين 

بحيث يحذف الاول table2 ثم يحذف الجدول table1

وذايك بضغطة زر  

دلفي..

قاعدة بيانات اكسس

وشكرااا  

[لؤي]

وعليكم السلام
Table1.delete

[hamza101110]

وعليكم السلام
Table1.delete

شكراا ولكن 
هذا لحذف سجل واحد فقط 
اريد حذف كل السجلات

[لؤي]

السلام عليكم 
ما عليك إلا وضع حلقة لحذفهم 

كود :

mytable.BeginBatch;
for i := mytable.RecordCount - 1 downto 0 do
begin
   mytable.Delete;
end;
mytable.EndBatch;
mytable.Refresh;

[merouane]

TTable.EmptyTable
http://docwiki.embarcadero.com/CodeExamp...e_(Delphi)

أو من خلال sql :
Trancate
https://www.w3schools.com/sql/sql_ref_drop_table.asp

أو كالتالي
Delete * from table2

https://docs.microsoft.com/en-us/office/...access-sql