FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Hola.
Desconozco los valores que envías a las funciones, pero revisé a GetToken y GetTokenCount y de este modo me funcionan como se esperaría:
Codigo de prueba:
Resultado: Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#2
|
|||
|
|||
Gracias ecfisa por responder , y veras tengo un campo TEdit desde donde se están ingresando los valores de la variable "texto", pero al momento de ejecutar la función de GetTokenCount esta no reconoce el signo de % como un separador, si no lo toma como si estuviera toda la cadena en un solo valor.
Comparto parte del código en donde se hace esto:
que crees que pudiera ser que no me reconozca el signo como un separador, por que veo que en la prueba que realizaste si que lo reconoce como un separador. Saludos. Última edición por Casimiro Notevi fecha: 09-06-2017 a las 23:13:46. |
#3
|
||||
|
||||
Recuerda poner los tags al código fuente, ejemplo:
Gracias |
#4
|
|||
|
|||
Mirando el código creo que el problema es tu función
Cadena=100%200%300 Separador=% GetTokenCount debería retornar 2, pero retorna 3, porque? En color rojo está el problema, lo inicializas en 1, cuando encuentra los dos % el total es 3 y tu estas preguntando por un valor igual a 2 acá "IF GetTokenCount(texto,'%') = 2 then //cuando hay 2 tokens con signo de %"
Es por so que la función del gran Ecfisa funciona bien... Saludos cordiales |
#5
|
|||
|
|||
Lo estaré haciendo así, gracias por la indicación.
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
¿y tú, de qué signo astrológico eres? | Casimiro Notevi | La Taberna | 11 | 11-04-2009 02:03:54 |
Comparativa entre Free Pascal 2.2.0 y Turbo Pascal 7.0 | esocrates | Varios | 2 | 14-07-2008 14:56:24 |
manual de excepciones de object pascal para free pascal??? | Garion | OOP | 3 | 27-05-2005 00:42:29 |
Cambiar Signo en Interbase | Pablo_L | Firebird e Interbase | 2 | 15-09-2004 14:16:10 |
Numeros positivos con signo | Romanosky | Varios | 1 | 11-05-2004 12:20:10 |
|