Delphi-PRAXiS - Delphi Prüfen, ob Tabelle in DB vorhanden

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Datenbanken (https://www.delphipraxis.net/15-datenbanken/)

- - Delphi Prüfen, ob Tabelle in DB vorhanden (https://www.delphipraxis.net/4901-pruefen-ob-tabelle-db-vorhanden.html)

Prüfen, ob Tabelle in DB vorhanden

Hi, alle miteinander!

Kann mir jemand weiterhelfen? Ich will zur Laufzeit eine Tabelle in einer Datenbank dynamisch generieren - möchte vorher aber abfragen, ob diese Tabelle vielleicht schon existiert, um dann entsprechende Schritte einzuleiten.
Weiss jemand, wie ich prüfen kann, ob die Tabelle vorhanden ist?

:?:
Matthias

Hallo mjenke,

schau dir mal das Beispiel aus der OH an:

Delphi-Quellcode:

			MyStringList := TStringList.Create;

try

  Session.GetTableNames('DBDEMOS', '*.db',False, False, MyStringList);

  { Tabellennamen in Liste einfügen }

  ListBox1.Items = MyStringList;

finally

  MyStringList.Free;

end;

Damit erhälst du alle vorhandenen Tabellen zu einem Alias.

Alternativ dazu kannst du den kompletten Dateinamen erzeugen (also inkl. Pfad) und mit FileExists aus SysUtils überprüfen, ob die Tabelle existiert.

Oder einfach Table.Open in einen try...except Block packen und bei einer exception überprüfen, welcher Fehler aufgetreten ist.