Daten löschen

[haentschman]

Hallo...

Delphi-Quellcode:

procedure Tform1.table2leeren;
begin
With table2 do begin
if active=true then close;
close;
Exclusive := TRUE;
Active := TRUE;
EmptyTable;
Active := False;
Exclusive :=False;
open;
end;
end;

es reicht...

Delphi-Quellcode:

procedure TForm1.tabelle2leeren;
begin
  Table2.EmptyTable;
end;

Zitat:

"Datei im Gebrauch, Löschen nicht möglich".

...kommt vom Exclusive := TRUE;