Quote from Gustavo1973 on April 24, 2020, 3:14 amAl intentar leer mediante un bucle, el texto de cada línea cargada en el Listbox obtiene lo siguiente como resultado:
string: texto1
string: texto2
string: texto3
No entiendo porque le agrega al principio el tipo de archivo que es
¿Es algún tipo de JSON lo que obtienes? y si es asi como obtener solo el texto contenido
Al intentar leer mediante un bucle, el texto de cada línea cargada en el Listbox obtiene lo siguiente como resultado:
string: texto1
string: texto2
string: texto3
No entiendo porque le agrega al principio el tipo de archivo que es
¿Es algún tipo de JSON lo que obtienes? y si es asi como obtener solo el texto contenido

Quote from luishp on April 24, 2020, 7:54 am@gustavo1973 no deberías obtener ese resultado. Quizá se deba al modo en que introduces los valores en ListBox. ¿Podrías adjuntar un ejemplo donde se reproduzca el problema? Gracias!
@gustavo1973 no deberías obtener ese resultado. Quizá se deba al modo en que introduces los valores en ListBox. ¿Podrías adjuntar un ejemplo donde se reproduzca el problema? Gracias!
Quote from Gustavo1973 on April 24, 2020, 2:41 pmHola Luis, gracias por tu respuesta
Los datos que cargo en el Listbox los obtengo desde una base MYSQL de la siguiente manera:
CreateEmptyArray [tableData]
SetVar [tableData] [data]
ArrayLen [tableData] [totalRecords]SetVar [CantidadReservas] [totalRecords]
CreateEmptyArray [Lista]
Math "[totalRecords]-1" 1 [Cantidad]Loop 0 [Cantidad] [x]
DeleteVar "[Nombre]"
SetCompVar "[Nombre]" "[tableData([x])('Nombre')]"
ArrayAddItem "[Lista]" "[Nombre]"
endloopGotoPage "ConsultasVer"
Una vez tengo los Nombres Cargados en el Listbox, tengo un boton que exporta a PDF esa lista, y el resultado es el que adjunto
El codigo para generar el archivo PDF es el siguiente:
SetVar [Pos] 10
neoPdfInit "Reservas" "A4" "portrait"
neoPdfDisplayMode "Reservas" "continuous" "FullScreen"neoPdfFont "Reservas" "helvetica"
neoPdfFontStyle "Reservas" "bold"
neoPdfFontSize "Reservas" "28"
neoPdfSimpleText "Reservas" "Reservas [MesNombre] del [Ano]" 10 [Pos] "left"
Math "[Pos]+10" 0 [Pos]
neoPdfSimpleText "Reservas" "$[Total] " 10 [Pos] "left"
Math "[Pos]+10" 0 [Pos]
neoPdfSimpleText "Reservas" "" 10 [Pos] "left"
Math "[Pos]+10" 0 [Pos]neoPdfFont "Reservas" "helvetica"
neoPdfFontStyle "Reservas" "bold"
neoPdfFontSize "Reservas" "12"
ListBoxSize "Listbox1" [LargoLista]
Loop 0 [LargoLista] [x]
ListBoxGetItem "Listbox1" [x] [Dato]
neoPdfSimpleText "Reservas" "[Dato]" 10 [Pos] "left"
Math "[Pos]+5" 0 [Pos]
If [x] == 50
neoPdfAddPage "Reservas" "portrait" "A4"
SetVar [Pos] 10
endloop
If [x] == 100
neoPdfAddPage "Reservas" "portrait" "A4"
SetVar [Pos] 10
endloop
If [x] == 150
neoPdfAddPage "Reservas" "portrait" "A4"
SetVar [Pos] 10
endloop
endloopneoPdfRender "Reservas" "IFrame1"
neoPdfDownload "Reservas"
Ya aprovecho a preguntarte LUIS , como veras en el codigo que genera el archivo PDF me encontre que solo generaba una pagina en el pdf dejandome afuera algunos datos del listbox, lo tuve que hacer manual como ves en el codigo de agregarle paginas a media que las necesitava, pero existe la manera de que eso lo haga automatico?
Hola Luis, gracias por tu respuesta
Los datos que cargo en el Listbox los obtengo desde una base MYSQL de la siguiente manera:
CreateEmptyArray [tableData]
SetVar [tableData] [data]
ArrayLen [tableData] [totalRecords]
SetVar [CantidadReservas] [totalRecords]
CreateEmptyArray [Lista]
Math "[totalRecords]-1" 1 [Cantidad]
Loop 0 [Cantidad] [x]
DeleteVar "[Nombre]"
SetCompVar "[Nombre]" "[tableData([x])('Nombre')]"
ArrayAddItem "[Lista]" "[Nombre]"
endloop
GotoPage "ConsultasVer"
Una vez tengo los Nombres Cargados en el Listbox, tengo un boton que exporta a PDF esa lista, y el resultado es el que adjunto
El codigo para generar el archivo PDF es el siguiente:
SetVar [Pos] 10
neoPdfInit "Reservas" "A4" "portrait"
neoPdfDisplayMode "Reservas" "continuous" "FullScreen"
neoPdfFont "Reservas" "helvetica"
neoPdfFontStyle "Reservas" "bold"
neoPdfFontSize "Reservas" "28"
neoPdfSimpleText "Reservas" "Reservas [MesNombre] del [Ano]" 10 [Pos] "left"
Math "[Pos]+10" 0 [Pos]
neoPdfSimpleText "Reservas" "$[Total] " 10 [Pos] "left"
Math "[Pos]+10" 0 [Pos]
neoPdfSimpleText "Reservas" "" 10 [Pos] "left"
Math "[Pos]+10" 0 [Pos]
neoPdfFont "Reservas" "helvetica"
neoPdfFontStyle "Reservas" "bold"
neoPdfFontSize "Reservas" "12"
ListBoxSize "Listbox1" [LargoLista]
Loop 0 [LargoLista] [x]
ListBoxGetItem "Listbox1" [x] [Dato]
neoPdfSimpleText "Reservas" "[Dato]" 10 [Pos] "left"
Math "[Pos]+5" 0 [Pos]
If [x] == 50
neoPdfAddPage "Reservas" "portrait" "A4"
SetVar [Pos] 10
endloop
If [x] == 100
neoPdfAddPage "Reservas" "portrait" "A4"
SetVar [Pos] 10
endloop
If [x] == 150
neoPdfAddPage "Reservas" "portrait" "A4"
SetVar [Pos] 10
endloop
endloop
neoPdfRender "Reservas" "IFrame1"
neoPdfDownload "Reservas"
Ya aprovecho a preguntarte LUIS , como veras en el codigo que genera el archivo PDF me encontre que solo generaba una pagina en el pdf dejandome afuera algunos datos del listbox, lo tuve que hacer manual como ves en el codigo de agregarle paginas a media que las necesitava, pero existe la manera de que eso lo haga automatico?
Uploaded files:
Quote from luishp on April 24, 2020, 4:09 pmGustavo, por favor adjunta un archivo .neoapp donde pueda ver lo que sucede. De lo contrario me lleva demasiado tiempo reproducirlo aquí. Gracias!!
Gustavo, por favor adjunta un archivo .neoapp donde pueda ver lo que sucede. De lo contrario me lleva demasiado tiempo reproducirlo aquí. Gracias!!
Quote from Gustavo1973 on April 24, 2020, 5:05 pmAqui te va el archivo adjunto
Aqui te va el archivo adjunto
Uploaded files:
Quote from luishp on April 25, 2020, 6:35 amHola @gustavo1973. No puedo ejecutarlo, al tratar de compilarlo me faltan archivos. Recuerda que para compartir proyectos con dependencias debes utilizar la opción Project > Archive/Backup. Además parace que es necesario utilizar una contraseña...
Hola @gustavo1973. No puedo ejecutarlo, al tratar de compilarlo me faltan archivos. Recuerda que para compartir proyectos con dependencias debes utilizar la opción Project > Archive/Backup. Además parace que es necesario utilizar una contraseña...

Quote from luishp on April 25, 2020, 8:47 am@gustavo1973 no te preocupes, acabo de descubrir donde está el problema...
En cuanto tenga un rato subo un ejemplo completo de como utilizar adecuadamente los ListBox. Hay algunas cosas que no están bien relacionadas con esto en VisualNEO Web, pero afortunadamente tiene fácil solución y es hasta mejor.
@gustavo1973 no te preocupes, acabo de descubrir donde está el problema...
En cuanto tenga un rato subo un ejemplo completo de como utilizar adecuadamente los ListBox. Hay algunas cosas que no están bien relacionadas con esto en VisualNEO Web, pero afortunadamente tiene fácil solución y es hasta mejor.

Quote from luishp on April 25, 2020, 10:40 amPor favor, echa un vistazo aquí:
https://visualneo.com/forum/topic/important-using-listbox-combobox-and-dropdown-properly
Por favor, echa un vistazo aquí:
https://visualneo.com/forum/topic/important-using-listbox-combobox-and-dropdown-properly