Hallo,
bitte ändere zuerst einmal
Query1.Open;
in
Query1.ExecSQL;
Open will eine Ergebnismenge zurückliefern, die bei einem Alter-Table natürlich nicht vorhanden ist.
Funktionieren Select..., dann sind ADOConnection und ADOQuery in Ordnung.
Ansonsten: Zeig' uns bitte mal die Tabellenstruktur, gibt es Indexe, Constraints..., die von der Änderung betroffen sein könnten?
Die Fehlermeldung könnte darauf hinweisen, dass TDatabase (die Tabelle) nicht gefunden wird. Ist sie wirklich vorhanden? sprich: Liefert ein
Select Count(*) from TDatabase
über die ADOQuery ein Ergebnis?
Muss der Tabellenname eventuell in " oder ' oder ` oder ´ oder [] gesteckt werden, da weiß ich bei
Access nie, was richtig ist.