Unificar nombres y apellidos
Hola amigos, resulta que tengo en una tabla Paradox los nombres y apellidos de todos los empleados de la empresa y estos vienen de la siguiente forma:
Juan Perez Reyes Jorge L. Nápoles Cabrera ALBERTO GONZALES LUGO Luis R Ramírez Oviedo ... Necesito hacer una función a la cual le vaya pasando los nombres y me los devuelva de la primera forma, es decir cada palabra debe empezar en mayúsculas y continuar en minúsculas. No tengo ningún problema en hacer la función y tal vez en el tiempo que llevo redactando este post ya la hubiera terminado pero quería saber si delphi cuenta con algo para salir de dudas. Gracias. |
Hola.
En el link siguiente se trató un tema donde una de las propuestas, la de rgstuamigo, creo que es lo que buscas: http://www.clubdelphi.com/foros/showthread.php?t=67467 Saludos. |
amigo, ya revisé el post pero no me sirve para lo que necesito. recuerda que ya toda la información está en una base de datos, solo tengo que recorrer la tabla en cuestión e ir aplicando la "función" para lograr el resultado que deseo.
|
Cita:
Saluditos |
Cita:
Basándome en código de rgstuamigo: Código:
function FirstUp(APasar: string): string; Código:
procedure TForm1.Table1NameGetText(Sender: TField; var Text: String; |
Cita:
|
La franja horaria es GMT +2. Ahora son las 08:29:08. |
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