limpiar tabla de access

[ecfisa]

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
  // Asegurarse que la tabla esté en modo exclusivo
  Tabla1.Close;
  Tabla1.Exclusive:= True;
  Tabla1.Open;
  // Vaciar 
  Table1.EmptyTable
end;

TADOTable:

Código Delphi [-]
procedure TForm1.btnVaciarTablaClick(Sender: TObject);
begin
  ADOTable1.DeleteRecords(arAll);
end;

Saludos.