SQL: Fehlermeldung "rechtes Anführungszeichen fehlt"

[Sharky]

So, ich habe mal schnell etwas getippelt
Einmal mit Parameter (was ich persönlich für besser halte) und einmal mit der Verwendung von QuotedStr.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Text := 'INSERT INTO errorfile(PartName, PartNo, Error) '+#10
  + ' VALUES (:pstrTmpPart,:pstrTmpNo,:pstrTmpError)';
  //Die mit : beginnenden "Variablen" sind die Parameter

  Query1.ParamCheck := True;  // Parameterverarbeitung aktivieren

  //Den Parameter Werte zuweisen
  Query1.Params.ParamByName('pstrTmpPart').AsString := strTmpPart;
  Query1.Params.ParamByName('pstrTmpNo').AsString := strTmpNo;
  Query1.Params.ParamByName('pstrTmpError').AsString := strTmpError;
  Query1.ExecSQL; // Query ausführen
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Text := 'INSERT INTO errorfile(PartName, PartNo, Error) ' +#10
   + 'VALUES ('
   + QuotedStr (strTmpPart) +','
   + QuotedStr (strTmpNo) + ','
   + QuotedStr (strTmpError)
   + ')';
   Query1.ExecSQL;
end;