miércoles, 11 de septiembre de 2019

Como poner un formulario dentro de otro


Aún no he hecho ningún programa que tenga esta función pero es necesario aprender a hacerlo en principio, pues tiene que ver con el manejo de interfaces y como diseñar interfaces inteligentemente o cual es la mejor forma de visualizar la información para nuestro programa.

Les dejo aquí mi primera prueba sobre esta función que nos permite gambas, que trata de incrustar un formulario dentro de otro, un ejemplo profesional lo tenemos en la ide de gambas mismo con la ventana consola.


' gambas class file

Public Sub Form_Open()

CargarEnContenedor()

End

Public Sub Form_Show()

Me.x = 0
Me.y = 0

End

Public Sub btnSalir_Click()

If Not ventana.Parent Then
ColocarEnContenedor()
Else
SacarDeContenedor()
Endif

End

Public Sub ColocarEnContenedor()

'asignamos un nuevo contenedor a ventana
ventana.Reparent(PanContenedor, 0, 0)
ventana.Center 'centramos ventana

End

Public Sub SacarDeContenedor()

'quitamos la ventana de su contenedor por medio de null
ventana.Reparent(Null, 0, 0)
ventana.Center 'centramos el formulario en la pantalla

End

Public Sub CargarEnContenedor()

'cargamos un formulario x en un contendor x
ventana.Load(PanContenedor)
ventana.Show

End


Public Sub btnCargar_Click()

CargarEnContenedor()

End


Formulario secundario


' gambas class file

Public Sub btnSalir_Click()

  If Not ventana.Parent Then Return
  FMain.SacarDeContenedor

End

Public Sub btnEntrar_Click()

  FMain.ColocarEnContenedor

End



 El proyecto esta en la Granja de gambas.