Delphi - error en insertar datos

hola espero y me puedan ayudar lo que pasa es que estoy insertando datos desde delphi a mysql mi instruccion es la siguiente

adqinsertar.SQL.Add('insert into socio_telenovela value ' + #40 + edcvesocio.Text + #44 + edcvetel.Text + #44 + ednum.Text + #44 + edimporte.Text + #44 + #39 + ednombre1.Text + #39 + #41 );

y me manda un error de sintaxys donde me dice que coloca un apostrofe de mas es decir ejemplo: (2,2,2,2,'dsdaf ' )' y quisiera saber como quitar el ultimo apostrofe por que en la instruccion de delhpi lo coloca automaticamente
gracias

Yo te recomendaría que no construyeses la consulta por código, sino que la tengas ya escrita en la propiedad SQL del TQuery utilizando parámetros pero, si por alguna razón te ves obligado a hacerlo así, mi consejo es que utilizes la función QuotedStr. Ejemplo:

adqInsertar.SQL.Add('INSERT INTO...' + QuotedStr(edcvetel.Text) + ...)

Echa un vistazo a la ayuda de dicha función.

De todos modos, y como culturilla general, nada más fácil que quitar el último carácter de una cadena.

Cadena := Copy(Cadena, 1, Length(Cadena)-1);

Feliz año.

gracias voy a probar el consejo que me diste espero que si me sirva muchas gracias
atte fernando (refvaz)

FELIZ AÑO