Moin moin,
hab mal wieder ein kleines Problem mit einem meiner Programme,
ich plane im Folgenden in der Datenbank CDDVD.db einen neuen Eintrag anzulegen,
leider klappt es nicht wie gewünscht...
Ein paar Zeilen drüber funktioniert es aber bei einer anderen Datenbank fast genauso.
Ich bekomme bei der Showmessage-kontrolle ausgegeben:
"INSERT INTO CDDVD (ID,Lagerort,Name,Monat,Jahr) VALUES (1,2,"WLP2",2,2009)".
Das System meldet den Fehler: Ungültiges Schlüsselwort Symbolstring INSERT.
Und finde den Fehler nicht, kann mir einer verraten wo sich der Wurm da heimisch fühlt?
Delphi-Quellcode:
CDID:=NeuerCDIndex;
If CDID=0
then Abort;
with Query1
do
begin
Close;
SQL.Clear;
Showmessage('
INSERT INTO CDDVD (ID,Lagerort,Name,Monat,Jahr) VALUES ('+IntToStr(CDID)+'
,'+IntToStr(Lagerort)+'
,"'+GetPartitionName(ComboBox1.Text[1])+'
",'+LabeledEdit1.Text+'
,'+LabeledEdit2.Text+'
)');
SQL.Add('
INSERT INTO CDDVD (ID,Lagerort,Name,Monat,Jahr) VALUES ('+IntToStr(CDID)+'
,'+IntToStr(Lagerort)+'
,"'+GetPartitionName(ComboBox1.Text[1])+'
",'+LabeledEdit1.Text+'
,'+LabeledEdit2.Text+'
)');
ExecSQL;
Close;
end;
Herzlichen Dank im Vorraus
Abraxas