Einzelnen Beitrag anzeigen

torud

Registriert seit: 26. Jul 2002
Ort: Sachsen
1.198 Beiträge
 
Delphi XE5 Professional
 
#1

Create Table funzt, aber der Compiler schmiert ab...

  Alt 12. Apr 2005, 12:15
Datenbank: Access • Zugriff über: JET 4.0
Hallo Leute!

Mit Create Table erzeuge ich in einer Access-DB eine Tabelle. Diese Wird auch angelegt, aber wenn ich dann später darauf zugreifen will, stürzt meine Applikation ab. Muss ich vielleicht beim Erstellen einer Tabelle zwangsläufig Felder mit erzeugen???

Delphi-Quellcode:
        DM.ADOQuery1.SQL.Clear;
        DM.ADOQuery1.SQL.Text :='CREATE TABLE '+ed_name.Text;
        DM.ADOQuery1.ExecSQL;
        DM.ADOQuery1.SQL.Text := 'SELECT * FROM '+ed_name.Text;
In einer Schleife lese ich dann die Tabellen in einen Treeview ein. Dabei schmiert mir manchmal alles ab. Und zwar dann, wenn ShowMessage(tab_list.Strings[i]); den Tabellennamen einer leeren Tabelle anzeigen soll.

Delphi-Quellcode:
   tab_list:=TStringlist.Create;
   DM.ADOConnection1.GetTableNames(tab_list,false);

   for i:=0 to tab_list.Count-1 do
     begin
       DM.ADOTable1.Active:=false;
       dm.ADOTable1.TableName:=tab_list.Strings[i];
       DM.ADOTable1.Active:=true;
         ShowMessage(tab_list.Strings[i]);

         myNode:=tree_contents.Items.AddChild(nil,tab_list.Strings[i]);
         myNode.ImageIndex:=16;
         myNode.SelectedIndex:=16;
     end;
Die Fehlermeldung lautet:
---------------------------
Abfrage benötigt zumindest ein Zielfeld.
---------------------------

Wer kann helfen?
Danke
Tom
  Mit Zitat antworten Zitat