حذف تمام رکوردها در جدول اکسس با دلفی

سلام
چطور یه جدول رو با لود شدن یه فرم خالیش کنم؟
پایگاه داده اکسس استفاده میکنم و دلفی 2010
از emptytable فک کنم باید استفاده کنم ولی نمیدونم چطور.
با جدول ها در اکسس با dataset و adotable ها در دلفی رابطه ایجاد کردم.
از کوری هم استفاده کردم ولی واسه حذف رکوردها نمیدونم چطور کار کنم؟

نقل قول:

---

چطور یه جدول رو با لود شدن یه فرم خالیش کنم؟

---

اگه منظورت حذف کردن رکوردها باشه که می تونی یه حلقه بزاری و تا جدول خالی نشده رکورد ها رو حذف کنی

کد:

---

table1.first;
while not eof table1 do
table1.delete;

---

یا از دستور زیر در قسمت adocom استفاده کن

کد:

---

ADOC.CommandText:='delete from table1';
ADOC.Execute;

---

نقل قول:

---

نوشته شده توسط as13851365 [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

اگه منظورت حذف کردن رکوردها باشه که می تونی یه حلقه بزاری و تا جدول خالی نشده رکورد ها رو حذف کنی

کد:

---

table1.first;
while not eof table1 do
table1.delete;

---

یا از دستور زیر در قسمت adocom استفاده کن

کد:

---

ADOC.CommandText:='delete from table1';
ADOC.Execute;

---

---

مرسی از کمکت
از دستو دوم استفاده کردم ولی مشکلی که هست اینه که این دستوراتو در یه باتون گذاشتم رکورد حذف میکنه ولی در dbgrid نشون نمیده . فقط در دیتا بیس حذف میکنه. dbgrid با adotable و dataset وصل شده به جدول اکسس.
adotable رو هم refresh میکنم خطا میده. چی کار کنم که باتتون رو زدم بلافاصله در dbgrid هم نشون بده؟ باید برنامه رو یه بار بازو بسته کنم تا تغییرات در dbgrid اعمال بشه.


کد insert با dbgrid مشکلی نداره

adotable6.Insert;
adotable6['idfactor']:=adotable8['idfactor'];
adotable6['nservice']:=ADOQuery1['nservice'];
adotable6['pservice']:=ADOQuery1['pservice'];
adotable6.Post;
edit4.Text:=inttostr(strtoint(edit4.Text)+strtoint (adotable6['pservice']));
end;

ولی موقع delete در dbgrid نشون نمیده

form5.ADOCommand1.CommandText:='delete from factorjozm';
form5.ADOCommand1.Execute;

باید یکبارadotablet رو ببیندی و دوباره باز کنی

اگه می خواهی یکی دو تا رکورد رو حذف کنی از دستور adotabl1.delete استفاده کن