FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour necesito insertar "ENTER" cada x cantidad de caracteres
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
necesito insertar "ENTER" cada x cantidad de caracteres
Posted: Wed Dec 06, 2023 09:23 AM

Hola.

Tengo una cadena de 1024 caracteres y quiero mostrarlos en un get multiline, pero al intentar esto:

local cLinea:= substr(texto, 1, 50) + chr(10) + chr(13) + substr....

no me muestra en dos lineas. en que le estoy errando?

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: necesito insertar "ENTER" cada x cantidad de caracteres
Posted: Wed Dec 06, 2023 09:29 AM
goosfancito wrote:Hola.
Tengo una cadena de 1024 caracteres y quiero mostrarlos en un get multiline, pero al intentar esto:

local cLinea:= substr(texto, 1, 50) + chr(10) + chr(13) + substr....

no me muestra en dos lineas. en que le estoy errando?
Just to start, try with chr(13) + chr(10).
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: necesito insertar "ENTER" cada x cantidad de caracteres
Posted: Wed Dec 06, 2023 09:31 AM

local cLinea:= substr(texto, 1, 50) + CRLF + substr....

Intentalo de esa manera

William, Morales

Saludos



méxico.sureste
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: necesito insertar "ENTER" cada x cantidad de caracteres
Posted: Wed Dec 06, 2023 12:15 PM
Code (fw): Select all Collapse
   LOCAL cTexto     := ""

   cTexto += "Esta es la primera linea del texto" + CRLF
   cTexto += Replicate( "*-", 20 ) + CRLF
   cTexto += ON_GRANDE + "LETRAS GRANDES" + OFF_GRANDE + CRLF
   cTexto += "Esta es otra linea de texto..." + CRLF
   cTexto += PADL( "Izquierza", 40 ) + CRLF
   cTexto += PADC( "CENTRALIZADO", 40 ) + CRLF
   cTexto += PADR( "Derecha", 40 ) + CRLF
   cTexto += PADC( "< Linea Final >", 40, "-" ) + CRLF
Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion