Duda Sobre Formularios (Solucionado)


Ir a la página 1, 2  Siguiente

kimizombie
Objetivo: Duda Sobre Formularios (Solucionado)
Buenas chicos en primer lugar tengo una duda porque nose porque ayer me hice una cuenta en el foro y puse un mensaje y hoy mi cuenta estaba desactivada y el mensaje del foro no aparece
dejando a un lado esto que no entiendo porque a pasado tengo una duda la cual es :

Tengo un formulario FORM1 en el cual tengo un listbox y 3 botones, cuando pulso al botón insertar nota se me abre otro formulario FORM2 en el cual me aparece un textbox para insertar la nota, pero el problema está en que desde el form2 no me deja hacer Listbox1.Add al listbox del FORM1 y entonces la nota no la puedo insertar desde el FORM2 sino lo que hago es guardar la nota e una variable y luego con un boton desde el FORM1 añado el texto de la variable al Listbox pero queda un poco antiestético :S me pueden ayudar a insertar desde el FORM2 directamente el texto a Listbox del FORM1? muchas gracias ^^
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

SOLUCIONES


Bien la primera duda que tenia es como acceder a un formulario desde otro es decir, tenemos un boton acceder, cuando se ejecute autmaticamente me dirije a otro formulario por ejemplo form2 ej:

form1 ------------->boton-------------->form2

Simplemente vamos a proyecto propiedades, opciones , los controles son publicos
Luego simplemente ponemos en nuestro boton nombre_del_formulario.show


Mi segunda duda era como guardar los datos recojidos en un listbox en un archivo, simplemente con este codigo:

DIM destino AS String
Dialog.Title = "Selecione un archivo"
Dialog.Filter = ["Datos de agenda (*.data)"]
IF NOT Dialog.SaveFile() THEN
IF Right$(Dialog.Path, 5) <> ".data" THEN
destino = Dialog.Path & ".data"
ELSE
destino = Dialog.Path
END IF
File.Save(destino, FMain.ListBox1.List.Join("\n"))
ENDIF
Message.Info("Ha sido guardado con exito en la carpeta: " & destino)
END


Otra de mis dudas es como insertar desde el form2 un texto recojido en un textbox a un listbox

Simplemente hacemos los constructores publicos como hemos dicho antes y ponemos lo siguiente

formulario_que_tiene_listbox.Listbox.Add(datos)


Otra de las dudas era que no sabia como abrir ese archivo y meter los datos del archivo linea por linea en un listbox, simplemente con este codigo:

PUBLIC SUB abrir_Click()

Dialog.Filter = ["*.data", "Data", "*", "All Files"]
IF Dialog.OpenFile() THEN RETURN
ListBox1.List = Split(File.Load(Dialog.Path), "\n")
CATCH
Message.Info("Cannot load list:\\n" & Dialog.Path & "\n" & Error.Text)

END


Muchas gracias a todos por ayudar a resolver todas estas dudas , este es mi aporte para los que tengan estos problemas

última edición por Invitado el Martes, 27 Julio 2010, 23:10; editado 1 vez
Objetivo: Re: Duda Sobre Formularios
Tal como lo tienes símplemente haz esto

public sub boton1_click()

dim f as new formulario2

f.showmodal

listbox1.list.add(variable)
wait 0.1

end


Con showmodal la ejecución del procedimiento se detiene hasta que el formulario2 se cierra y para entonces ya tienes el valor deseado en tu variable.
Otro camino, aunque no te lo aconsejo, es declarar públicos los controles de los formularios en la ventana de propiedades del proyecto. Así serán accesibles desde cualquier sitio.... pero no es una buena práctica de programación.

Suerte

Perfil MP  
kimizombie
Objetivo: Re: Duda Sobre Formularios
Muchas gracias por tu temprana respuesta ahora ya cuando doy a insertar nota se me abre el FORM2 , en el form2 tengo un textbox y el boton aceptar pero cuando doy a aceptar no mete la nota hasta que no cierro el programa la ventana (FORM2), Lo que quiero es que cuando de a aceptar se cierre el programa y envie la nota

El codigo del boton aceptar del FORM2 es este :

PUBLIC SUB Button1_Click()

Module1.texto = entrada.text
Form2.Close
END

kimizombie
Objetivo: Re: Duda Sobre Formularios
Otra pregunta, aparte de la anterior asi no tengo que poner luego otro post es esta:

Quiero guardar los datos del listbox en un texto hago el dialog y todo eso pero me falta guardar los datos de el listbox
no me se la sintaxis es decir LISTBOX1.XXXXX el codigo es este

DIM lineas AS String

DIM destino AS String

DIM numArchivo AS String

lineas = ListBox1.XXXXXX 'nose que hay que poner para que guarde los datos'
Dialog.Title = "Selecione un archivo"
Dialog.Filter = ["Datos de agenda (*.data)"]
IF NOT Dialog.SaveFile() THEN
IF Right$(Dialog.Path, 5) <> ".data" THEN
destino = Dialog.Path & ".data"
ELSE
destino = Dialog.Path
END IF
File.Save(destino, lineas)
ENDIF
END

Objetivo: Re: Duda Sobre Formularios
Eso es ListBox.List

Aqui tienes toda la info necesaria y la mayor parte de la info sobre Gambas:

ListBox.List :: GambasDoc

Ayortano
Objetivo: Re: Duda Sobre Formularios
El problema que tienes es que Listbox1 no es público. Cambia la propiedad Public de ListBox1 a True y podrás hacer lo siguiente desde el form2:

Form1.Listbox1.Add(Datos)


Saludos

kimizombie
Objetivo: Re: Duda Sobre Formularios
Emmet escribió: [Ver mensaje]
Eso es ListBox.List

Aqui tienes toda la info necesaria y la mayor parte de la info sobre Gambas:

ListBox.List :: GambasDoc


Cuando pongo listbox1.list me da el siguiente error:


pantallazo

:S no se que pasa

y sigo con el mismo problema de no poder añadir la nota desde el form2 no se a que te refieres de pasar el valor public a true

En propiedades no me sale nada de publi mira:

public

Cuando meto el codigo Form1.Listbox1.Add(mivariable) me salta el siguiente error:

a

aclaro que ya Form1 a pasado a ser Fmain

--------------------------------------------------------
repasando sigo con las mismas dudas quiero:

añadir un valor al listbox1 del formulario fmain desde otro formulario

guardar los datos contenidos del listbox en un archivo

---------------------------------------------------------



Gracias a todos

última edición por Invitado el Martes, 27 Julio 2010, 02:09; editado 1 vez
Objetivo: Re: Duda Sobre Formularios
Hola

Como te dijo ayortano, tienes que hacer públicos tus controles de formulario para que otros formularios lo "vean".
Tienes que hacer click en Proyecto > Propiedades > Opciones >Los controles de formulario son Públicos(se deja en si).

Saludos

Perfil MP  
kimizombie
Objetivo: Re: Duda Sobre Formularios
abarzuaf escribió: [Ver mensaje]
Hola

Como te dijo ayortano, tienes que hacer públicos tus controles de formulario para que otros formularios lo "vean".
Tienes que hacer click en Proyecto > Propiedades > Opciones >Los controles de formulario son Públicos(se deja en si).

Saludos


Muchas gracias ya lo e hecho, por lo tanto uno de los objetivos ya esta solucionado,

YA SE PUEDO INSERTAR LOS DATOS AL LISTBOX1 DESDE OTRO FORMULARIO

Mi pregunta es porque me a dicho que no es una buena practica de programación :S

Simplemente me queda la duda de guardar los valores del listbox en un archivo este es el codigo actual

PUBLIC SUB guardar_Click()

DIM lineas AS String[]

DIM destino AS String

DIM numArchivo AS String

lineas = ListBox1.List
Dialog.Title = "Selecione un archivo"
Dialog.Filter = ["Datos de agenda (*.data)"]
IF NOT Dialog.SaveFile() THEN
IF Right$(Dialog.Path, 5) <> ".data" THEN
destino = Dialog.Path & ".data"
ELSE
destino = Dialog.Path
END IF
File.Save(destino, lineas)
ENDIF
END


Pero me muestra el siguiente error

pantallazo_1280193289_185380

Objetivo: Re: Duda Sobre Formularios
Hola.

Prueba con esto:

PUBLIC SUB guardar_Click()

DIM destino AS String
Dialog.Title = "Selecione un archivo"
Dialog.Filter = ["Datos de agenda (*.data)"]
IF NOT Dialog.SaveFile() THEN
IF Right$(Dialog.Path, 5) <> ".data" THEN
destino = Dialog.Path & ".data"
ELSE
destino = Dialog.Path
END IF
File.Save(destino, FMain.ListBox1.List.Join("\\n"))
ENDIF

END


Saludos

Perfil MP  
Ir a la página 1, 2  Siguiente

Página 1 de 2


  
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

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.3981s (PHP: -74% SQL: 174%)
Consultas SQL: 45 - Debug off - GZIP Activado