Forum: Datenbanken
Delphi
by fanavity,
13. Sep 2011
Mit der Variante sagt er mir das Test1 nicht existiert
Query1.sql.clear;
Query1.sql.add('SELECT * FROM sysobjects WHERE name = "'+tabelle+'"');
Query1.Open;
Result:=Query1.Active and (Query1.RecordCount>0);
if result then result1 := '1' else result1 := '0';
ShowMessage(Result1);
Das mit dem Parametisieren habe ich noch nicht so ganz verstanden.
Forum: Datenbanken
Delphi
by fanavity,
13. Sep 2011
Ja das hilft mir jetzt leider nicht weiter.. Da ich nicht alles umstricken möchte.. Es muss doch auch so eine Lösung geben das abzufragen..
Forum: Datenbanken
Delphi
by fanavity,
13. Sep 2011
Schade.. Hat vielleicht sonst noch jemand einen Rat für mich :)?
Forum: Datenbanken
Delphi
by fanavity,
13. Sep 2011
Ja ich habe auf deinen Link geklickt.
Wenn ich jedoch dann
Database1.GetTableNames(ListBox1.Items, False);
Eingebe, erhalte ich eine Fehlermeldung das GetTableNames ein undefinierter Bezeichner sei.
Forum: Datenbanken
Delphi
by fanavity,
13. Sep 2011
FUnktioniert leider auch nicht :(
Hat sonst noch jemand eine Idee?
Forum: Datenbanken
Delphi
by fanavity,
13. Sep 2011
Hallo,
wie genau kann ich prüfen ob eine Tabelle existiert? Wenn ich dem Query1 eine Variable zuweise und diese anschließend prüfen will, passiert rein garnichts..
Query1.close;
Query1.sql.clear;
test2 := Query1.sql.add('SELECT COUNT( * ) FROM sysobjects WHERE name = "'+tabelle+'"');
Query1.Open;
showmessage(IntToSTr(test2));