Thema: SQLDataSet

Einzelnen Beitrag anzeigen

juelin

Registriert seit: 9. Mai 2006
Ort: Mannheim
142 Beiträge
 
Delphi XE5 Professional
 
#1

SQLDataSet

  Alt 20. Dez 2017, 21:01
Datenbank: MySql • Version: 5.6.24 • Zugriff über: SQLDataSet
Habe Windows 7 und Delphi XE5
Habe ein Programm mit unter anderen ein SQLDataSet mit dem ich auf eine MySQL Datenbank
zugreife (nur Insert, Update und Delete).

Habe ein Programm:
......
Form1.SQLDataSet1.CommandText:='INSERT INTO ware (Ware, Warengruppe, Mengeneinheit, Menge, MWST, Preis, Aus) values ('''+wa5+''', '''+wg5+''', '''+me5+''', '''+f1+''', '''+f2+''', '''+f3+''', '''+wk5+''')';
h1:=Form1.SQLDataSet1.ExecSQL(False);
.......
Form1.SQLDataSet1.CommandText:='INSERT INTO finanzamt (Tabelle, Zeit, Art, PNR, Feld1, Feld2, Feld3, Feld4, Feld5, Feld6, Feld7, Feld8, Feld9, Feld10, Feld11, Feld12, Feld13, Feld14, Feld15, Feld16, Feld17) values ('''+'Ware'+''', '''+fiz+''', '''+'1'+''', '''+IntToStr(pnr)+''', '''+wa5+''', '''+wg5+''', '''+me5+''', '''+f1+''', '''+f2+''', '''+f3+''', '''+wk5+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''')';
h1:=Form1.SQLDataSet1.ExecSQL(False);

........

Wenn ich das Programm compeliere erschein vor jdem Befehl vorne links ein Punktt in der IDE
(wie Haltepunkte).

Dummerweise fehlen die Punkte vor dem ersten
h1:=Form1.SQLDataSet1.ExecSQL(False);
bis zum Befehl
Form1.SQLDataSet1.CommandText:='INSERT INTO finanzamt (Tabelle, Zeit, Art, PNR, Feld1, Feld2, Feld3, Feld4, Feld5, Feld6, Feld7, Feld8, Feld9, Feld10, Feld11, Feld12, Feld13, Feld14, Feld15, Feld16, Feld17) values ('''+'Ware'+''', '''+fiz+''', '''+'1'+''', '''+IntToStr(pnr)+''', '''+wa5+''', '''+wg5+''', '''+me5+''', '''+f1+''', '''+f2+''', '''+f3+''', '''+wk5+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''', '''+''+''')';
und natürlich führt das Programm die Befehle (ohne Punkt) auch nicht aus.

Ich verstehe nicht warum.
Kann da jemand helfen?

Danke und Gruß
Jürgen
Jürgen Linder
  Mit Zitat antworten Zitat