Controles/Librerías/Componentes :: Dudas Con Textbox(solucionado)

Portal

Foro

Buscar

FAQ

Registrarse

Conectarse

Fecha y hora actual: Domingo, 28 Abril 2024, 08:28 • Todas las horas son UTC + 1 Hora

Dudas Con Textbox(solucionado)

Página 1 de 1

Dudas Con Textbox(solucionado)

Autor	Mensaje
Dani26 Analista Programador Registrado: Junio 2010 Mensajes: 365 Edad: 58 Ubicación: Montevideo	Dudas Con Textbox(solucionado) Hola, soy nuevo en el foro y en gambas. Si bien hace un par de años que uso principalmente linux, en programacion solo habìa hecho algunas cosas en visual basic. Entre ellas en juego del ahorcado, que basicamente se trata de ir adivinando letras antes de cometer seis errores o que pasen dos minutos. Ahora estoy tratando de migrarlo a gambas y no tengo ni idea de còmo descomponer el título de la pelìcula en varios textbox, poniendo un caracter (letra o espacio) en cada uno de ellos, En visual basic creaba una matriz de textbox y ponìa una letra en cada una, pero sinceramente no sè por donde empezar a hacerlo con gambas. Algunos aspectos del programa ya los solucionè, como cargar la lista de pelìculas invisible y seleccionarlas aleatoriamente, pero esta parte me tiene trancado. Agradezco la ayuda que puedan darme,y si resulta de utilidad puedo subir el còdigo que usè en visual basic, el cual, grave error de aficionado, no comentè debidamente y no recuerdo la mitad de las cosas que hice. Mi version de gambas es la 2.19, mi so es ubuntu 10.04 . Gracias, =================== Migrando desde visual basic, el Gambas de Ms Mi blog gambero última edición por Dani26 el Lunes, 14 Junio 2010, 03:16; editado 1 vez
#1 Sabado, 12 Junio 2010, 01:32

abarzuaf Ingeniero Programador Registrado: Octobre 2009 Mensajes: 265 Edad: 54 Ubicación:	Re: Dudas Con Textbox 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 última edición por abarzuaf el Sabado, 12 Junio 2010, 03:43; editado 1 vez
#2 Sabado, 12 Junio 2010, 03:38

Dani26 Analista Programador Registrado: Junio 2010 Mensajes: 365 Edad: 58 Ubicación: Montevideo	Re: Dudas Con Textbox Gracias abarzuaf, el còdigo funciona a las mil maravillas. Le he hecho algunos cambios, como por ejemplo no eliminar los espacios entre palabras, poner una barra visible debajo de cada text box para saber la cantidad que hay, ya que estos quedan ocultos hasta que el usuario vaya adivinando las letras, y otros cambios menores (tamaño,posiciòn, etc. Subo el còdigo modificado por si resulta ùtil a otro usuario. Saludos 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 DIM label AS label '------------------------------Cambiar el nombre de la pelicula DIM nombrePelicula AS String = "Harry Potter y el principe mestizo" '------------------------------- dividir caracteres pelicula = Split(nombrePelicula) '--------------------------------Juntar nombre pelicula FOR EACH partesCadena IN pelicula cadenaCompleta = cadenaCompleta & partesCadena NEXT '------------------------------Tomar largo pelicula 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) label = NEW label(ME) '--------------------------------------Posicionamiento de los textbox textbox.X = (x * 10 + x) * 5 + 2 textbox.Y = 200 textbox.width = 40 textbox.height = 60 textbox.visible = FALSE label.x = (x * 10 + x) * 5 + 2 label.y = 270 label.Width = 40 label.Height = 5 label.Background = Color.Black '-------------------------------------------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 =================== Migrando desde visual basic, el Gambas de Ms Mi blog gambero
#3 Domingo, 13 Junio 2010, 00:55

abarzuaf Ingeniero Programador Registrado: Octobre 2009 Mensajes: 265 Edad: 54 Ubicación:	Re: Dudas Con Textbox [Solucionado] Hola. Me alegra que te sirviera. Cuando lo termines si quieres lo subes para probarlo y jugar un poco Saludos última edición por abarzuaf el Domingo, 13 Junio 2010, 17:12; editado 3 veces
#4 Domingo, 13 Junio 2010, 04:20

Dani26 Analista Programador Registrado: Junio 2010 Mensajes: 365 Edad: 58 Ubicación: Montevideo	Re: Dudas Con Textbox(Solucionado) Gracias, cuando este listo lo pondrè a disposiciòn de todos, còdigo fuente incluìdo. Saludos =================== Migrando desde visual basic, el Gambas de Ms Mi blog gambero
#5 Domingo, 13 Junio 2010, 20:54

Mostrar mensajes anteriores:

Temas parecidos

	Autor	Foro	Respuestas	último mensaje
Programilla Y Dudas	rodoval	Aplicaciones/Fragmentos de Código	16	Lunes, 05 Abril 2010, 23:12 rodoval
Dudas Sobre El Diseño..	CanihoJR	General	6	Viernes, 26 Noviembre 2010, 17:14 estrella_de_galicia
Dudas Al Hacer Un Programa	AGarcia	General	25	Miercoles, 13 Julio 2011, 00:40 razaAztk
Dudas Con << Y >>, ~	jsbsan	Javascript	6	Miercoles, 27 Abril 2016, 08:51 Shell

Página 1 de 1

Fecha y hora actual: Domingo, 28 Abril 2024, 08:28 • Todas las horas son UTC + 1 Hora

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

Lista de permisos

No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

Versión reducida del foro - (Lo-Fi)
Página generada en:: 3.5263s (PHP: -97% SQL: 197%)
Consultas SQL: 48 - Debug off - GZIP Activado

Design by Mighty Gorgon