Cadenas: eliminar espacios del final solamente

[ezequiel913]

Empezado por ecfisa

Hola.

Si tenes razón Casimiro, lo olvidé. Esas funciones están en la unit SysUtils.

Pero sus nombres respectivos son:
Trim
TrimLeft
TrimRight

Saludos.

Pd: Rubén, ahora tenés idea de una posible implementación de TrimRight

Hola Ecfisa!!!

probe esas funciones que pusiste, y no me han funcionado, el tema es que yo tengo un edit con un length de 30, y cuando cargo algo que no tiene un length de 30 (por ej. TEXTO, de length 5) los 25 espacios restantes no me los borra.

esto es lo que hago yo y no me funciona:

Código Delphi [-]
LOCALIDAD:= Trim(AnsiUppercase (EditLocal.Text));

lo que pretendia hacer con esto era que ya borre los espacios sobrantes cuando los asigno a la variable.
en ese codigo uso el Trim pero si uso TrimLeft o TrimRight tampoco funciona.

saludos!!!