also, so wie HANSA es schon andeutete:
Aufräumen
Der allgemeinen Übersicht ist es oft sehr dienlich, wenn du deine Werte anhand von Variablen übergibst.
Und zwar so:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| myvar1 := QuotedStr(edit1.text);
myvar2 := QuotedStr(edit2.text);
Das "QuotedStr" packt deine Variable auch gleich in 2 Quote´s, du brauchst dich darum also auch nicht mehr kümmern.
Dann kannst du den ganzen Schmarn an deine Query übergeben:
query.SQL.Text := 'INSERT INTO mydb (feld1, feld2) VALUES ' +
' ( ' + myvar1 + ',' + myvar2 + ')';
query.ExecSQL; |
So wie es da steht, dürfte es schonmal funktionieren.
Natürlich kannst du auch den Datenbank-Namen und die Namen der Felder dynamisch übergeben, brauchst in dem Fall aber KEIN QuotedStr!
Undzwar so:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| mydb := 'testdb.dbf';
myfeld1 := 'feld1';
myfeld1 := 'feld2';
Und das jetzt übertragen auf das obere Beispiel:
query.SQL.Text := 'INSERT INTO ' + mydb +
' ( + feld1 + ',' + feld2 + ' ) VALUES ' +
' ( ' + myvar1 + ',' + myvar2 + ')';
query.ExecSQL; |
Tja, und fertig.
Sieht auf den ersten Blick etwas konfus aus, aber mit der Zeit geht das ins Blut über.
Fragen? Fragen!
mfg
ps: hansa, bist mir doch jetzt nicht böse das ich deine Frage beantwortet habe?
