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
|
|||
|
|||
Recorrer y Cortar String
Hola a todos, les comento, tengo el siguiente problema.
Cuento con una funcion split para cortar partes de una string Código:
function TForm1.CopyEntre(Cadena:string; Desde,Hasta:string):string; var Inicio,Final: integer; begin Inicio:=Pos(Desde,Cadena)+Length(Desde); Final :=PosEx(Hasta,Cadena,Inicio); If (Inicio>0) and (Final>Inicio) then Result:=Copy( Cadena, Inicio, Final-Inicio ); end; supongamos que quiero cortar la siguiente cadena cadena : string; cadena := '+hola-xxxxx+como-xxxxx+estas-'; usaria la funcion split para obtener "hola" trozo :string; trozo := CopyEntre(cadena,'+','-'); esto me daria "hola" pero como corto lo demas de la string para obtener hola como estas ?? Bueno gracias po su ayuda |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Recorrer un STRING | creus | Varios | 3 | 07-01-2007 22:52:37 |
Error al recorrer string | creus | Varios | 6 | 16-11-2006 22:39:45 |
recorrer string | emiliu | Varios | 2 | 16-11-2005 10:23:25 |
Recorrer un string | davidgaldo | Varios | 3 | 09-11-2005 10:04:28 |
cortar string (substring) | febito | Varios | 1 | 11-08-2004 20:19:56 |
|