Limpiar espacios en blanco( en string)
 

Trabajo sobre firebird 1.5.3 utilizando delphi 2006
Hasta ahora la funcion TRIM() me ha funcionado correctamente para limpiar los espacios en blanco.

Sin embargo dentro de un procedure:

Código Delphi [-]
uses SysUtils....
..
..
procedure Tomarvalores;
var
    c: string;
begin
  c:= trim('tarifa a');
...
end;

Sorprendente, un misterio, NO VA. ¿ a qué es debido ?

Cuando dices que no va, ¿Qué quieres decir?
¿Cual es el resultado?

----------------------------------------------------------------------
Trims leading and trailing spaces and control characters from a string.
----------------------------------------------------------------------

Elimina espacios del principio y del final; En este caso va a dejar la cadena igual. ¿Esperabas otro resultado?

el resultado es: c= 'tarifa a';

no limpia el espacio

Parece que no has entendido el mensaje de Neftali.

Trim(' Mi tarifa '); devolverá:'Mi tarifa'

es decir, Trim NO está hecha para limpiar los espacios dentro de la cadena. Mira como está hecha la función y haz tú una que si lo haga.

Saludos.

Gracias. Parezco nuevo.

A todos nos pasa, no te preocupes. Si quieres quitar también los espacios intermedios puedes usar StringReplace:

Código Delphi [-]
c := StringReplace('tarifa a', ' ', '', [rfReplaceAll])

// Saludos