Sonderzeichen ( z.b. " ' ) auslesen und schreiben

[Real_Thunder]

Ich kann die werde nicht gleich wieder in neu andere tabelle schreiben, weil sie vorher ersteineinmal vom programm analysiert werden...
das mit dem QuoteStr klapt irgendi auch nicht....

ich .. ich schriebe die datn folgenermaßen in die datenbank:

Delphi-Quellcode:

 NeuDbQuery.SQL.Text:='INSERT INTO [pers59] ('+
                       'id, altid, geschlecht, anrede, Nachname, Vorname, strasse, plz, ort, tel, '+
                       'tel2, fax, email, bemerkung, erstellt, modify, sterntaler, '+
                       'patenschaft, kastration, kostrin'+

                       ') VALUES ('+

                       '"'+getid+'", '+
                       '"'+NeuDbRec_Pers_Array[a].ID       + '", '+
                       '"'+NeuDbRec_Pers_Array[a].gesch    + '", '+
                       '"'+NeuDbRec_Pers_Array[a].Anrede   + '", '+
                       '"'+NeuDbRec_Pers_Array[a].Nname    + '", '+
                       '"'+NeuDbRec_Pers_Array[a].vname    + '", '+
                       '"'+NeuDbRec_Pers_Array[a].strasse  + '", '+
                       '"'+NeuDbRec_Pers_Array[a].plz      + '", '+
                       '"'+NeuDbRec_Pers_Array[a].ort      + '", '+
                       '"'+NeuDbRec_Pers_Array[a].tel      + '", '+
                       '"'+NeuDbRec_Pers_Array[a].tel2     + '", '+
                       '"'+NeuDbRec_Pers_Array[a].fax      + '", '+
                       '"'NeuDbRec_Pers_Array[a].email     + '", '+
                       '"'NeuDbRec_Pers_Array[a].bemerkung + '", '+
                       '"'+NeuDbRec_Pers_Array[a].datum    + '", '+
                       '"'+NeuDbRec_Pers_Array[a].modify   + '", '+
                       'false, '+
                       'false, '+
                       'false, '+
                       'false'+
                       ')';
 NeuDbQuery.ExecSQL;

Und sobald ein wert kommt der " oder ' enthält, schmeißt er mir ne ole exeption an den kopf