Borrar Tabla

[MaMu]

Quiero borrar una tabla access desde delphi y no puedo. La vacio sin problemas con:


ADOCommand1.CommandText:='DELETE FROM '+DBText3.Caption;
ADOCommand1.Execute;


y para borrar ejecuto


ADOCommand1.CommandText:='DROP TABLE '+DBText3.Caption;
ADOCommand1.Execute;


Pero no la borra. Como se hace para borrar una tabla vacia?

Saludos

[marcoszorrilla]

He hecho la prueba de 2 formas y ambas me funcioan correctamente:

procedure TForm1.Button1Click(Sender: TObject);
begin
Adoquery1.Close;
Adoquery1.SQL.Clear;
Adoquery1.sql.Add('Drop Table '+ Edit1.Text);
Adoquery1.ExecSQL;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Adocommand1.CommandText:='Drop Table '+ Edit1.Text;
AdoCommand1.Execute;
end;

Lo que ocurre es que si tienes abierta la base de datos simultaneamente no refresca y te muestra la tabla que ya no existe, si este el caso, cambia a consulta (desde Access) y luego vuelves a tablas y verás que ya no existe la tabla.

Un Saludo.

[MaMu]

La realidad es que no estaba abierta la base de datos desdo otro lugar, mas que desde el mismo programa. Reinicie la computadora y ahi volvio a funcionar correctamente. Se ve que mi maquina pide a gritos un formateo, y en cuanto me haga un tiempo lo hare, ya son varias veces que me esta fallando Delphi. Estoy usando la version 7, aunque tambien tengo la 8 (pero sin licencia).

Saludos