Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Formulas Crystal Reports (https://www.clubdelphi.com/foros/showthread.php?t=68275)

jandres007 04-06-2010 19:31:15

Formulas Crystal Reports
 
Hola A todos!!!!!
Estoy haciendo un reporte en Crystal Rep 8.0: tengo un campo en BD que se llama {Nombre} que contiene los dos nombres de la persona, pero en el Reporte me toca imprimir en dos columnas el Primer Nombre y luego el Segundo Nombre.
No se como hacerlo, si alguien me puede ayudar seria genial!!!!
De antemano Gracias

cloayza 04-06-2010 21:46:05

Hace mucho que no utilizo Crystal Report.

Pero segun recuerdo existen varias funciones de manejo de cadenas

1)Debes insertar un nuevo campo de tipo formula.
2)Te debe pedir un nombre para el campo de tipo formula
3)En el editor de formula debes escribir Mid ({Nombre},1,10) =>Mid(Cadena,Start, Length)
Ejm:
Nombre='Club Delphi';
Mid(nombre,1,4)=>'Club';

Eso por ahora, espero te sirva...
Saludos

jandres007 04-06-2010 22:11:09

OK; fUNCIONO, PERO...
 
Hola!!!
Mil gracias por tu aporte fue muy valioso, veo que apesar de recuerdas muy bien Crysta Report.
Ahora tengo un nuevo lio con el segundo Nombre, porque el 1ero lo hace de maravilla, pero... El segundo.
(Ejemplo:
Nombr_completo: Javier Andrés, deberia tener
1er Nomb: Javier
2do Nomb: Andrés)
Porque no lo quiero hacer desde Delphi sino desde Crystal.:)
Gracias....

cloayza 07-06-2010 16:48:19

Podrias utilizar la funcion InStr(Nombre_Var, Texto_Buscado), te retorna la posicion de inicio del Texto_Buscado en Nombre_Var

Ejm:

mid("Javier Andrés",1,InStr(Javier Andrés," ")-1)=>"Javier"
mid("Javier Andrés",InStr(Javier Andrés," ") ,Length "(Javier Andrés")) =>"Andrés"

Espero te ayuda...

Saludos

jandres007 08-06-2010 15:10:48

Ok. Funciono perfecto. mil gracias por tus aportes sin duda muy valiosos. :)


La franja horaria es GMT +2. Ahora son las 11:31:35.

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