Comunidad Gambas-es

buenas

Resulta que en el formulario principal de visor se me lleno de botones y todo tipo de clases, tanto que ya es muy complicado añadir nuevos botones o clases, entonces decidí (después de aprender a cargar un formulario en un panel de otro formulario) crear un formulario nuevo y así resolver el problema de espacio.

con la vista video ya lo hice era la mas fácil, ahora toca la vista capitulo algo mas difícil,(una cirujia complicada, despues viene la cirujia de la vista busqueda eso si que sera un dolor de cabeza posiblemente varias semanas de trabajo ) y me tope que tengo que sacar un menú contextual del fmain principal y ponerlo en el nuevo formulario, la historia es que gambas que yo sepa no tiene como mover de un formulario a otro un menú o un submenu, en mi caso es un submenu y me daba mucha fiaca hacerlo todo manual.... y pensando como ahorarme trabajo hice algo peligroso, copie el submenu del fmain principal y lo inserte en el archivo Fcapitulo.form que es donde esta la estructura del nuevo formulario, para mi sorpresa quedo impecable. pero lo hice con un poquito de miedito jajjaja



# gambas Form File 3.0

{ Form Form
MoveScaled(0,0,60,27)
Expand = True
Arrangement = Arrange.Vertical

de aqui
{ mnuOpcionesComentCap Menu
Text = ("OpcionesComentariosCaps")
{ mnuOpcComentCapsGuardar Menu comentarioCap
Name = "mnuOpcComentCapsGuardar"
Action = "guardar"
Text = ("Guardar")
Picture = Picture["MiIcon/22/guardar22.png"]
}
{ Menu41 Menu
}
{ mnuOpcComentCapsBorrarGuardar Menu comentarioCap
Name = "mnuOpcComentCapsBorrarGuardar"
Action = "borrarGuardar"
Text = ("Borrar y guardar")
Picture = Picture["MiIcon/22/borrar22.png"]
}
{ Menu42 Menu
}
{ mnuOpcComentCapsBorrar Menu comentarioCap
Name = "mnuOpcComentCapsBorrar"
Action = "borrarTexto"
Text = ("Borrar")
Picture = Picture["MiIcon/22/borrar22.png"]
}
{ Menu10 Menu
}
{ mnuOpcComentCapsExplorador Menu comentarioCap
Name = "mnuOpcComentCapsExplorador"
Action = "explorar"
Text = ("Explorar comentarios de capítulos")
Picture = Picture["icon:/16/find"]
}
{ mnuInsertarEtqLargaComentCap Menu
Text = ("Insertar etiqueta larga")
Picture = Picture["MiIcon/24/etqLarga.png"]
}
}

hasta aqui


{ !txtEcapitulo1 TextEdit
MoveScaled(10,2,26,9)
#Public = True
Background = &HD2DFC3&
Expand = True
Wrap = True
}
{ !txtAComentarioCap TextArea
MoveScaled(10,12,26,9)
#Public = True
Visible = False
Background = &H606060&
Foreground = &HFFFFFF&
Expand = True
Wrap = True
}
{ PanOpcComentCap Panel
MoveScaled(43,2,12,4)
Background = &HE0000000&
Ignore = True
Arrangement = Arrange.Horizontal
AutoResize = True
{ btnOptCap2 Button
MoveScaled(1,0,3.625,3.625)
Visible = False
Picture = Picture["MiIcon/opcion.png"]
Border = False
}
{ btnAcciones Button
MoveScaled(5,0,3.625,3.625)
Visible = False
ToolTip = ("Acciones")
PopupMenu = "mnuOpcionesComentCap"
Picture = Picture["MiIcon/22/selecion22.png"]
Border = False
}
{ !tBtnVerComentarioCap ToggleButton
MoveScaled(8,0,3.625,3.625)
#Public = True
Picture = Picture["MiIcon/32/solnull.png"]
Border = False
}
}
}
{ Actions
{ Action borrarGuardar
Text = "Borrar y guardar"
Shortcut = ""
Picture = "MiIcon/22/borrar22.png"
}
{ Action borrarTexto
Text = "Borrar"
Shortcut = ""
Picture = "MiIcon/22/borrar22.png"
}
{ Action explorar
Text = "Explorar comentarios de capítulos"
Shortcut = ""
Picture = "icon:/16/find"
}
{ Action guardar
Text = "Guardar"
Shortcut = ""
Picture = "MiIcon/22/guardar22.png"
}
}

saludos, y que piensan de esta locura?

v3ctor:

Citar:

saludos, y que piensan de esta locura?

Pues es que nunca he pensado en esta situación.
Aun no he probado a mostrar un formulario dentro de un panel. Tendría que ver el motivo, situación, su uso.

¿ Y no será cuestión de que representes lo que quieres de otra forma ?.

Al principio creía que la aplicación se te había "amotinado" y se había creado una función recursiva llenado el formulario con menuses y botones
por aquí y por allá.

Saludos