Tema
:
quitar numeros en un string
Ver Mensaje Individual
#
4
24-09-2004
quetzal
Miembro
Registrado
: may 2003
Posts
: 78
Reputación
:
22
o mejor dicho
function SoloPalabra(Texto : String) : String;
var
palabra : String;
i, k : integer;
begin
k := Length(Texto);
for i := 1 to k do
if Texto[i] in ['0'..'9']
then Break
else palabra := palabra + Texto[i] ;
Result := palabra;
end;
quetzal
Ver Perfil
Encontrar Todos los Mensajes de quetzal