So ich habe letzte Nacht 2 Stunden geschlafen um dan festzustellen, daß wir das Thema verfehlen. Es ist nicht nur das Update sonderen auch ein SQLQuery 'Insert into' geht ja auch nicht.
Delphi-Quellcode:
werte := '
0, '+#39+KuNr+#39+'
, '+#39+inttostr(AnNr)+#39+'
, '+#39+DateToStr(DateTimePicker1.Date)+#39+'
, '+#39+Edit1.Text+#39+'
, '+#39+JvMemo1.Lines.Text+#39+'
, '+#39+'
Text'+#39+'
, '+#39+'
Text'+#39;
sql := '
Insert into ANGEBOT (STATE, KNR, ANR, DATUM, LDATUM, KTEXT, TEXT1, TEXT2) VALUES ('+Werte+'
) ';
DM.sSQL(
sql);
ich mache noch nicht mal ein Commit. Er bleibt schon bei ExecQuery hängen
Delphi-Quellcode:
procedure TDM.sSql(
Sql :
String);
begin
IBSQL1.SQL.Clear;
IBSQL1.SQL.Text :=
Sql;
IBSQL1.ExecQuery;
end;