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?