Thema: Delphi Tabelle überschreiben

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#7

Re: Tabelle überschreiben

  Alt 22. Mai 2006, 17:00
Hallo Leute,

noch besser: vor dem Löschen prüfen, ob die Tabelle existiert:

Delphi-Quellcode:
function TableExists(conn: TAdoConnection; tableName: String): Boolean;
var
  s: TStrings;
begin
  s := TStringList.Create;
  conn.GetTableNames(s);
  Result := s.IndexOf(tableName) >= 0;
  s.Free;
end;
Grüße vom marabu
  Mit Zitat antworten Zitat