Hola.
Puede ser en el evento OnClick de un TButton por ejemplo, pero la sintáxis varía de acuerdo a los componente que uses.
TTable:
Código Delphi
[-]
procedure TForm1.btnVaciarTablaClick(Sender: TObject);
begin
Tabla1.Close;
Tabla1.Exclusive:= True;
Tabla1.Open;
Table1.EmptyTable
end;
TADOTable:
Código Delphi
[-]
procedure TForm1.btnVaciarTablaClick(Sender: TObject);
begin
ADOTable1.DeleteRecords(arAll);
end;
Saludos.