Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Concatenar valores (https://www.clubdelphi.com/foros/showthread.php?t=89920)

Jasan_Records 03-03-2016 15:53:37

Concatenar valores
 
Hola amigos, como estan? resulta que tengo 3 edit y base de datos en mysql, mi problema es que deseo guardar en un registro de una tabla (varchar (13))concatenados esos tres edits separados por un guion, ya he intentado de todas formas. en base de datos se guarda de la siguiente forma PG'-'12345'-' ocupandome los 13 caracteres. para insertar los valores utilizo esta sintaxis:
DM.ADOQuery1.SQL.Add('values ('(CBInicialesexpte.Text)+QuotedStr(label20.Caption)
+QuotedStr(EENroExpte.Text)
+QuotedStr(Label20.Caption)
+QuotedStr(EELetra.Text)
+QuotedStr(Label20.Caption)
+QuotedStr(EEanio.Text)
+','+QuotedStr(FormatDateTime('yyyy-mm-dd',DTPEFingre.Date))
+','+QuotedStr(FormatDateTime('yyyy-mm-dd',DTPEFvencim.Date))
+','+QuotedStr(EEnombreProp.Text)
+','+QuotedStr(MEObservacion.Text)
+','+QuotedStr(EENroExpteAsoc.Text)
+','+QuotedStr(CBSector.Text)
+','+QuotedStr(FormatDateTime('yyyy-mm-dd',DTPEEnvio.Date))+')');

espero me puedan ayudar. gracias amigos

Neftali [Germán.Estévez] 03-03-2016 15:57:09

Por favor, utiliza TAG's cuando añadas código.
Prueba a cambiar esto:
Código Delphi [-]
...
+QuotedStr(EENroExpte.Text)
+QuotedStr(Label20.Caption)
+QuotedStr(EELetra.Text)
+QuotedStr(Label20.Caption)
+QuotedStr(EEanio.Text)
...

por esto otro:

Código Delphi [-]
...
+QuotedStr(EENroExpte.Text + Label20.Caption + EELetra.Text + Label20.Caption + EEanio.Text)
...

Suponiendo que esta sea la parte y los campos a los que te refieres...

Jasan_Records 05-03-2016 22:33:52

gracias amigo, me super sirvio!!!


La franja horaria es GMT +2. Ahora son las 00:50:31.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi