Probleme bei MySQL INSERTS,UPDATE

[Berserker]

Hallo.

Ich arbeite mit der ZEOS-lIB Mysql Komponente, was aber nchts zur Sache tut, denn das Problem was ich habe tritt auch bei anderen Komponenten auf.

Wenn ich versuche Daten in die MySQL-Tabelle mit Query einzuschieben, sagt er mit immer MYSQL-ERROR near blablablah.

Das Problem ist, das ich in den Texten ' Drin habe. Bei PHP gibts es da den Befehl Addslashes.

Auszug aus dem PHP-MANUAL:

Zitat:

string addslashes ( string str)

Gibt einen String (Zeichenkette) zurück, in dem bestimmten Zeichen ein Backslash "\" voran gestellt wurde. Diese Funktion ist z.B. für Datenbankabfragen wichtig. Die behandelten Zeichen sind der einfache und der doppelte Anführungsstrich (' und "), der Rückstrich (\) selbst sowie NUL (das Null-Byte).

Diese Funktion habe ich bis jetzt bei Delphi nicht gefunden. Wie kann ich das so realisiere, das ich die TextDaten in die MySQL-DB hineinbekomme?

Mein Code sieht folgender Maßen aus:

Code:

qrMAIN.Sql.Text := 'INSERT INTO `shp_artikel` '+
                      '(`l_nummer`,`l_bez1`)'+
                      ' VALUES '+
                      '('''+txtNummer+''','''+txtBez1+''');';
   qrMain.ExecSql;

MfG, Ronny