Hola Wbarrantes.
Cita:
existe alguna funcion especifica para hacerlo?
|
No conozco (no quiere decir que no haya), pero es muy secillo hacerte una que lo haga:
Código Delphi
[-]
function QuitarEspeciales(const Cad: string): string;
const
VALIDOS=[' ','0'..'9','A'..'Z','a'..'z','á','é','í','ó','ú'];
var
i: Integer;
begin
Result:= '';
for i:= 1 to Length(Cad) do
if Cad[i] in VALIDOS then Result:= Result+Cad[i]
end;
Ejemplos de llamada:
Código Delphi
[-]
var
st: string;
begin
howMessage(QuitarEspeciales('Me costó $100,| #%en& el c#omercio')); st:= QuitarEspeciales('Me costó $100,| #%en& el c#omercio');
...
Podés agregar o eliminar caracteres a considerar como válidos en la constante VALIDOS.
Saludos.