Ver Mensaje Individual
  #7  
Antiguo 04-06-2011
Avatar de Wbarrantes
Wbarrantes Wbarrantes is offline
Miembro
 
Registrado: ago 2010
Posts: 119
Reputación: 14
Wbarrantes Va por buen camino
Grasias Ecfisa, ya tengo un procedimiento que realiza la limpieza...

Código Delphi [-]
begin
Largo:= Length (texto)+1 ;
contador:=1;
  while contadordo
  begin
    valor := Ord(texto[contador]);
    if (valor>LimiteInferior) and (Valorthen
      begin
        TextoLimpio:= TextoLimpio+ texto[contador];
      end  ;
    if Valor=39 then
      begin
        TextoLimpio:= TextoLimpio+' ';
      end;
    contador:=contador+1;
  end;
 Limpiar:= TextoLimpio;
end;
en este caso por medio del codigo Ascii y con unas variantes...
pero si me interesa saber especificamente si existe algun procedimiento de Delphi como tal.... como el Uppercase y funciones similares...

igual agradesco mucho tu aporte...
Responder Con Cita