Bagaimana menghapus seluruh record dalam sebuat tabel

Dengan mencoba anda akan bisa dan memahaminya

Contoh berikut ini adalah bagaimana menghapus record dalam sebuah tabel dengan
sekali klik. mudah-mudahan tips ini bermanfaat bagi anda yang mempraktekannya.
Selamat mencoba dan sukses bagi anda.

procedure TForm1.ButtonClick(sender:TObject);
begin
tbBarang.First;
While not tbBarang.Eof do begin
tbBarang.Delete;
tbBarang.Next;
end;
end;

tbBarang bisa anda sesuaikan berdasarkan tabel yang anda buat.
pembaca bisa menghubungi saya dalam e-Mail aseppatahlatip@yahoo.co.id