topic-27829

Board index FiveWin para Harbour/xHarbour StrToken() y otra función

Posts: 1445

Joined: Mon Oct 10, 2005 02:38 PM

StrToken() y otra función
Posted: Mon Dec 16, 2013 10:44 PM

Hola a todos,

Si con la función StrToken() puedo extraer una parte de un literal delimitada por un carácter, ¿Cómo puedo eliminar del literal esa parte extraída?

Es decir, si tengo el literal:

"carlos;josé;maría,antonio"

¿Cómo lo hago para eliminar el 3er. nombre y dejar el literal así?
"carlos;josé;antonio"

Gracias,

Un Saludo

Carlos G.

FiveWin 25.12 + Harbour 3.2.0dev (r2502110321), BCC 7.7 Windows 11 Home

horacio

Posts: 1364

Joined: Wed Jun 21, 2006 12:39 AM

Re: StrToken() y otra función
Posted: Mon Dec 16, 2013 10:55 PM

hola, probaste con StrTran ??

Saludos

Marcelo Via Giglio

Posts: 1088

Joined: Fri Oct 07, 2005 03:33 PM

Re: StrToken() y otra función
Posted: Tue Dec 17, 2013 02:22 AM

Hola,

podrias probar algo asi

Code (fw): Select all Collapse

#include "fivewin.ch"

function  main()
  
   LOCAL cTuCadena:="carlos;josé;maría;antonio"
   LOCAL resul := ""
   LOCAL aLista := hb_ATokens( cTuCadena, ";" )
  
  AEVAL( aLista, {|a,i| IF( i!=3, resul+=a+";", NIL ) } )
  ? resul

return nil

FiveWiDi

Posts: 1445

Joined: Mon Oct 10, 2005 02:38 PM

Re: StrToken() y otra función
Posted: Tue Dec 17, 2013 06:59 PM

Gracias a ambos,

Esta noche pruebo ambas sugerencias.

Un Saludo

Carlos G.

FiveWin 25.12 + Harbour 3.2.0dev (r2502110321), BCC 7.7 Windows 11 Home

FiveTech Support Forums

Continue the discussion