Daten Abfragen

[Sektalas]

danke shonmal für die schnellen antworten.

ich hab die Tabellele selbst erstellt.
Ich poste mal entsprechenden Code, bitte nicht schimpfen und wundern über die unsauberkeit, dashier dient erstmal nur zum verstehen der materie um es in das eigentliche Project einzubinden.

Delphi-Quellcode:

//Button 1:

ZQuery1.SQL.Clear;
ZConnection1.Database:=Edit1.Text + '.db'; //db.db
ZConnection1.Connected:=TRUE;
Zquery1.SQL.Add(Edit4.Text); // CREATE TABLE punktelimit ([ID] INTEGER PRIMARY KEY, [name] VARCHAR (40), [punke] INTEGER (10))
ZQuery1.Active:=TRUE;
ZQuery1.ExecSQL;
ZQuery1.SQL.Clear;
ZConnection1.Disconnect;

// Button 2:
ZConnection1.Database:=Edit1.Text + '.db'; // db.db
Zconnection1.Connected:=TRUE;;
Zquery1.SQL.Clear;
Zquery1.SQL.Add(Edit3.Text); // INSERT INTO [punktelimit]  ([name]) VALUES (:test)
Zquery1.Active:=TRUE;
Zquery1.ExecSQL;
Zquery1.SQL.Clear;
ZConnection1.Disconnect;

// Button 3:
ZConnection1.Database:=Edit1.Text + '.db'; // db.db
Zconnection1.Connected:=TRUE;
Zquery1.SQL.Clear;
Zquery1.SQL.Add(Edit2.Text); // SELECT * FROM [punktelimit]
ZQuery1.Active:=TRUE;
Zquery1.ExecSQL;
Zquery1.SQL.Clear;
ShowMessage('Feld jetzt');
ShowMessage('Name: ' + ZQuery1.FieldByName('name').AsString) ; //Hier wird der Fehler ausgelöst
Zquery1.SQL.Clear;
ZConnection1.Disconnect;