FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Averiguar el número de repeticiones de un caracter
Hola, me gustaría saber si existe alguna función en Delphi que te devuelve el número de veces que existe un determinado caracter en una cadena.
(Por ejemplo, el número de repeticiones del caracter "&" en la cadena 'abc&&def&fg' sería 3). Muchas gracias. |
#2
|
||||
|
||||
Bueno, no debería ser muy difícil crearla....
...o parecida...
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Este codigo te cambia todas las ocurrencias de una subcadena dentro de una cadena. Adaptalo a tus necesidades.
procedure TForm1.Button1Click(Sender: TObject); function CambiaEn(Cadena, Esto, Por: String): String; var aPos: Integer; begin aPos := Pos(Esto, Cadena); Result:= ''; while (aPos <> 0) do begin Result := Result + Copy(Cadena, 1, aPos-1) + Por; Delete(Cadena, 1, aPos + Length(Esto)-1); aPos := Pos(Esto, Cadena); end; Result := Result+Cadena; end; var ParaCambiar:string; begin ParaCambiar:='Un ejemplo en el que cambiar "cambiar"'; Label1.Caption:=CambiaEn(ParaCambiar,'cambiar','se cambio'); end; Saludos.
__________________
El que pregunta es tonto durante 5 minutos, el que no pregunta es tonto para toda su vida. |
#4
|
|||
|
|||
Gracias a todos por las respuestas. Lo que realmente quería saber era si existía alguna función que me evitara hacer yo el código porque más de una vez me ha pasado que después de currarme una función, ya existía alguna que hacía prácticamente lo mismo.
Si nadie me dice que existe una función que haga esto utilizaré las vuestras. Muchísimas gracias. |
#5
|
||||
|
||||
A mi no me suena, pero en todo caso busca en la ayuda de Delphi "String handling routines", entra en cualquierea de ellas y en el tercer párrafo verás el enlace:
Category string handling routines Revisa la lista que aparece.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
|
|
|