Tabelle über TAdotable löschen

[shmia]

Zitat von socialist:

Ich muss dank meiner eingeschränkten Kenntnisse auf euch zurückgreifen.
Na ja meine Frage (denk ich zeigt auch der Titel) ist, wie ich eine Access Tabelle über die Tadotable Kompo löschen kann.

Über TADOTable klappt das nicht.

Stattdessen:

Delphi-Quellcode:

function DeleteADOTable(cn: TADOConnection; const TableName:string):Integer;
const
   DELETE_STATEMENT = 'DELETE FROM ';
begin
   {
   if IsSQLServerConnection(cn) then
   begin
      try
         cn.Execute('TRUNCATE TABLE ' + TableName, Result);
      except
         // use (slower) delete if truncate fails
         cn.Execute(DELETE_STATEMENT + TableName, result);
      end;
   end
   else
   }
      cn.Execute(DELETE_STATEMENT + TableName, result);
end;

function DeleteADOTable(ATable: TADOTable):Integer;
begin
   ATable.Close;
   Result := DeleteADOTable(ATable.Connection, ATable.TableName);
end;