Hallo Leute,

Für mein nächstes Projekt brauche ich in meinem Programm eine kleine Datenbank und stehe im Moment vor folgendem Problem:

markieren

Delphi-Quellcode:

  SQLTable:= database.GetTable('SELECT * FROM Spieler ORDER BY Spielername');
  Edit1.Text:=SQLTable.FieldAsString(SQLTable.FieldIndex['Alter']);
  Edit2.Text:=SQLTable.FieldAsString(SQLTable.FieldIndex['Spielername']);

  Edit3.Text:=SQLTable.FieldAsString(SQLTable.FieldIndex['Alter']);
  Edit4.Text:=SQLTable.FieldAsString(SQLTable.FieldIndex['Spielername']);

In Edit1 und Edit2 wird korrekter Weise der erste Datensatz eingetragen.
Wie kann ich nun in Edit 3 und Edit4 den zweiten Datensatz eintragen?

Viele Grüße,
BenneX

Kennt Deine SQLTable die Methode Next?

Auf den nächsten datensatz wechseln. Wenn es sich um einen TDataSet-kompatiblen Wrapper handelt mit
SQLTable.Next;

Wunderbar!

SQLTable.Next hat funktioniert.

Ich danke Euch für die schnelle Hilfe und werde mich sicher nochmal zurück melden mit weiteren Fragen.

Grüße,
BenneX

Gleich die nächste Frage hinterher:

markieren

Delphi-Quellcode:

a:='23';

  SQLBefehl := 'INSERT INTO Spieler (Koordinaten, Spielername) VALUES (a,"BenneX")';
  database.execsql(SQLBefehl);

Es muss doch möglich sein, dass Variablen als Values fungieren, oder?

Wie oben beschrieben, krieg ich nur den SQL Fehler "No such column: a"

Grüße!

http://docwiki.embarcadero.com/RADSt...agen_verwenden

und

http://docwiki.embarcadero.com/RADSt...aufzeit_setzen

Zitat von BenneX:

Gleich die nächste Frage hinterher:

markieren

Delphi-Quellcode:

a:='23';

  SQLBefehl := 'INSERT INTO Spieler (Koordinaten, Spielername) VALUES (a,"BenneX")';
  database.execsql(SQLBefehl);

Es muss doch möglich sein, dass Variablen als Values fungieren, oder?

Wie oben beschrieben, krieg ich nur den SQL Fehler "No such column: a"

Grüße!

SQLBefehl := 'INSERT INTO Spieler (Koordinaten, Spielername) VALUES ("'+a+'","BenneX")'; Mavarik

So aber nur, wenn gar nichts anderes funktioniert.

Grundsätzlich sollte doch langsam bekannt sein, daß im "kompilierten" Programm keine Variablennamen mehr existieren und selbst wenn, woher soll der Code, innerhalb des ExcecSql-Befehls wissen welche Variable mit dem Namen "a" gemeint ist, wenn es die Codestelle doch nicht kennt, wo das A deklariert/zugänglich ist.
Man muß also die Variable oder den Kontext (z.B. ein Daten-Objekt) übergeben.

Und wenn du das "a" nunmal nicht als Parameter/Variable deklarierst, dann ist es doch klar, daß es an dieser Stelle, von der Syntax her, nur ein Feld sein kann, und da es kein Feld "a" in der Tabelle gibt, muß es auch knallen.

Wir haben uns ein eigenes ExecSql geschrieben function xxx.ExceSql(Query: string; Params: array of variant); , welches die übergebenen Parameter an Params übergibt.

markieren

Delphi-Quellcode:

SQLBefehl := 'INSERT INTO Spieler (Koordinaten, Spielername) VALUES (:a, "BenneX")';
DataBase.ExecSql(SQLBefehl, [a]);

Der Parametername ist hier natürlich egal, da rein auf den Index gegangen wird, also der erste Parameter-Wert geht auch an den ersten Parameter im SQLBefehl.

markieren

Delphi-Quellcode:

b := 'Position';
a := 'Spieler';
SQLBefehl := 'INSERT INTO Spieler (Koordinaten, Spielername) VALUES (:a, :b)';
DataBase.ExecSql(SQLBefehl, [b, a]);

SQLBefehl := 'INSERT INTO Spieler (Koordinaten, Spielername) VALUES (:position, :name)';
DataBase.ExecSql(SQLBefehl, [b, a]);

[/delphi]

Zitat von himitsu:

... woher soll der Code, innerhalb des ExcecSql-Befehls wissen welche Variable mit dem Namen "a" gemeint ist, wenn es die Codestelle doch nicht kennt, wo das A deklariert/zugänglich ist.

Es ist doch noch viel schlimmer. "a" ist ein Bezeichner aus dem SQL-Universum, das hat mit dem Programm nichts aber auch garnichts zu tun.

Und sonst ist nur noch zu sagen Parameter,Parameter,Parameter.........


Gruß
K-H