Comunidad Gambas-es

1. Como puedo pasar el contenido de un textbox a una matriz y de ahi cada elemento de la matriz pasarselo a un TableView1(o cualquier otro que me permita ver cada dato por sseparado.

Por ejemplo que ingrese la palabra "Hola" que sería el contenido de textbox1
Pasar cada letra a una matriz
visualizar cada elemento en un TableView1(cualquier otro componente estaria bien)




gracias.....

Este fue el código que me guió sobre como para descomponer un textbox en un programa mío.

abarzuaf escribió: [Ver mensaje]

Hola.

Prueba con este código:

Código: [Descargar] [Ocultar] [Seleccionar]

Código: [Descargar] [Mostrar]

' gambas class file
PRIVATE matrizObjetos AS Object[]
PRIVATE inicializado AS Boolean

PUBLIC SUB Form_Open()
DIM textbox AS TextBox
DIM pelicula AS String[]
DIM partesCadena AS String
DIM cadenaCompleta AS String
DIM largoCadena AS Integer
DIM x AS Integer
DIM caracter AS String
'------------------------------Cambiar el nombre de la pelicula
DIM nombrePelicula AS String = "Harry Potter y el principe mestizo"

'---------------------------------Eliminar caracteres blancos de la cadena
pelicula = Split(nombrePelicula, " ")

'--------------------------------Juntar nombre pelicula sin caracteres blancos
FOR EACH partesCadena IN pelicula
cadenaCompleta = cadenaCompleta & partesCadena
NEXT

'------------------------------Tomar largo pelicula sin caracteres blancos
largoCadena = Len((cadenaCompleta))


IF NOT inicializado THEN
'-------------------------------Creacion de la matriz de texbox
matrizObjetos = NEW Object[]
'-------------------------------Numero de texbox
FOR x = 1 TO largoCadena
'--------------------------------Creacion de los textbox
textbox = NEW TextBox(ME)
'--------------------------------------Posicionamiento de los textbox
textbox.X = (x * 5 + x) * 5 + 2
textbox.Y = 100
textbox.width = 20
textbox.height = 20

'-------------------------------------------Lectura de los caracteres de la cadena
'y colocacion en los textbox.
caracter = Mid(cadenaCompleta, x, 1)
textbox.Text = caracter
matrizObjetos.Add(textbox, x)
NEXT
END IF
END

Saludos

Como ves lo escribió otro compañero del foro, si quieres ver el post completo esta es la dirección.
Saludos

Mi estimado muchas gracias!! [ Solucionado ]

Solo es cuestion de jugar con los controles y sus propoedades
Gracias

Edita tu primer mensaje para poner [solucionado], has editado el ultimo y no se ve en el foro .... gracias

Saludos