GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV 2024
→
caracteres especiales
caracteres especiales
Iniciado por PEDROMANUEL / pedro, nov., 14 2018 3:29 AM - 2 respostas
Conecte-se…
PEDROMANUEL / pedro
#1
Membro registado
26 mensagems
Publicado em novembro, 14 2018 - 3:29 AM
Alguien ya tiene una función para sacar los caracteres especial de una palabra por favor una ayuda
Denunciar
0
0
Rubén Sánchez Peña
#2
Membro registado
796 mensagems
Popularité : +40 (42 votes)
Publicado em novembro, 15 2018 - 3:30 PM
Hola, ¿puedes poner un ejemplo del tipo de texto que debes tratar y definirnos esos caracteres especiales?
Rubén
Denunciar
0
0
F.Ram
#3
Publicado em dezembro, 09 2018 - 7:56 AM
Aqui pongo una funcion para extraer una serie de caracteres
PROCEDURE utFiltra(sx is string,sCharsXP9N is string="P") // P->Caracteres Printables
sRet,sX1 is string
sCar is string
sLista is string="01234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ"
nlj,k is 8-byte int
sX1=""
SWITCH sCharsXP9N
CASE "X"
CASE "x"
sLista+=Lower(sLista)
CASE "9","N"
sLista="0123456789"
CASE "P"
sLista=""
FOR k=32 TO 255
sLista+=Charact(k)
END
OTHER CASE
sLista=sCharsXP9N
END
nlj=Length(sx)
FOR k=1 TO nlj
sCar=sx[[k]]
IF Contains(sLista,sCar) THEN
sRet+=sCar
END
END
RESULT sRet
Denunciar
0
0
→ Voltar para WINDEV 2024
WINDEV 2024
WEBDEV 2024
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto