Concatenar Cadena Larga dentro de codigo Delphi

[JoanKa]

Hola a Todos.

Espero que me hechen una manito con esta cadena

Como haria para concatenar una cadena larga de 42 campos.
if TBancs.Checked then CopiaDatos(TEmpresas.Name,'INSERT INTO TEmpresa (CODI, DESCRIPCIO, NOM, DNI/NIF, CODI_POSTAL, SUBCODI,
POBLACIO,PROVINCIA, ADRECA, TEL1, TEL2, EMAIL, FAX, MISSATGES, CAMI, REPORTS,EDITDOCUMENT, EDITARTICLE, EDITCLIENT)
VALUES
(:CODI, ESCRIPCIO, :NOM, NI/NIF,
:CODI_POSTAL, :SUBCODI, :POBLACIO, :PROVINCIA, :ADRECA, :TEL1, :TEL2, :EMAIL, :FAX, :MISSATGES, :CAMI, :REPORTS, :EDITDOCUMENT,
:EDITARTICLE, :EDITCLIENT)');


Gracias y saludos

[marto]

exactamente, cuál es tu problema?

[roman]

Empezado por marto

exactamente, cuál es tu problema?

Quizá a su teclado le falle la tecla +

// Saludos

[JoanKa]

Lo que pasa que tengo una cadena muy larga de 42 campos y quiero que toda la cadena de la sentencia Insert into (, , ......) values(:, :,.............) se haga en varias lineas y no todo en una sola linea.

No se si me deje enterder.

[[maeyanes]]

Empezado por roman

Quizá a su teclado le falle la tecla +

// Saludos

E aquí la clave de todo: La tecla +

Código Delphi [-]
if TBancs.Checked then 
  CopiaDatos(TEmpresas.Name,'INSERT INTO TEmpresa (CODI, DESCRIPCIO, ' +
  'NOM, DNI/NIF, CODI_POSTAL, SUBCODI, POBLACIO,PROVINCIA, ADRECA, ' +
  'TEL1, TEL2, EMAIL, FAX, MISSATGES, CAMI, REPORTS,EDITDOCUMENT, ' +
  'EDITARTICLE, EDITCLIENT) VALUES (:CODI, ESCRIPCIO, :NOM, NI/NIF, ' +
  ':CODI_POSTAL, :SUBCODI, :POBLACIO, :PROVINCIA, :ADRECA, :TEL1, ' +
  ':TEL2, :EMAIL, :FAX, :MISSATGES, :CAMI, :REPORTS, :EDITDOCUMENT, ' +
  ':EDITARTICLE, :EDITCLIENT)');

[marto]

Wop!

Empezado por JoanKa

No se si me deje enterder.

Pues yo tampoco lo tengo claro Pero quiza esto te sirva:

Código Delphi [-]

  cadenaMuyLarga := 'kdlsjflsjkdfskjdlfsjdk' + #13 +
    'otra linea' + #13 + 
    'aun otroa';

[JoanKa]

Gracias Marcos Yanes era como tu decias.