| Autor |
 Tema Buscar  Opciones del Tema
|
main 
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
 Tema: Imagenes Ribbon
Enviado: 08/Enero/2021 a las 12:23 |
Access_2010 vs Windows_10
En primer lugar, desearos a todos un Feliz año 2021 y siguientes..
La pregunta es porque, de vez en cuando, me desaparecen las imagenes que tengo en el Ribbon que utilizo como Menu.
Parece obra de meigas ya que a los dos o tres dias, cuando inicio windows, vuelven a aparecer-
En cambio los textos (Etiquetas) siempres se conservan.
Le ha sucedido a alguno
Saludos al Grupo
|
 |
emiliove
Administrador
Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5499
|
Enviado: 08/Enero/2021 a las 15:11 |
Hola Main
Platica más, son imágenes estáticas (de microsoft, o personalizada con loadimage) o son dinámicas con getimage.
Si son personalizadas las tienes en una tabla de access o en una carpeta.
Ya nos cuentas, saludos.
|
|
main
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
Enviado: 09/Enero/2021 a las 13:12 |
Hola, emilove La base es accdb y las imagenes son personalizadas dento de una carpeta
El Ribbon reside en una tabla "USysRibbons" y se carga automaticamente al iniciar la aplicación con GetImages
Saludos
|
|
emiliove
Administrador
Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5499
|
Enviado: 09/Enero/2021 a las 18:38 |
Hola main
Y las imágenes son dinámicas, las cambias cuando haces algún evento, por que no usas loadimage para ver si es el mismo comportamiento, todas las imágenes se van, o solo algunas, te marca algún error, dice que las imágenes no las encuentra. las imágenes están en la misma computadora.
Saludos.
|
|
main
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
Enviado: 11/Enero/2021 a las 13:19 |
Hola de nuevo Las imagenes no se modifican ni cambian en ingun momento. Es un menu fijo distribuido en pestañas Se van todas las imagenes, pero siempre se mantienen las etiquetas (textos) Las imagenes estan en una carpeta de la misma computadora y no,no informa de ningun error.
En cuanto a la funcion loadimage, no la he implementado nunca y no sabria usarla al desconocer sus parametros.
Saludos y gracias, Emilove
Editado por main - 11/Enero/2021 a las 13:24
|
|
emiliove
Administrador
Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5499
|
Enviado: 11/Enero/2021 a las 17:08 |
Hola main
Usar el loadimage es muy fácil primero lo agregas en el customUI
customUI onLoad="MyOnLoad" loadImage="MyloadImage" xmlns="http://schemas.microsoft.com/office/2009/07/customui">
Despues en cada control con imagen, en image pones el nombre con su extensión: <toggleButton id="tggBtnimagen51" label="imagen" enabled="true" size="large" onAction="MyTBonAction" image="img1.bmp" getPressed="MyGetPressed"></toggleButton>
Y en la función en este caso MyloadImage Sub MyloadImage(ImageName As String, ByRef Image)
Dim stPath As String stPath = CurrentProject.Path & "\imagenes\" & ImageName 'Ruta de la carpeta Set Image = LoadImage(strPath) End Sub
Ya nos dices, saldos.
|
|
main
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
Enviado: 15/Enero/2021 a las 13:46 |
Hola. Han vuelto a aparecer y todo funcionando de nuevo.
Pongo un simple ejemplo de como tengo el xml del Ribbon
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="OnRibbonLoad" >
<commands>
<command idMso="Help" enabled="false"/>
<command idMso="WindowClose" enabled="true"/>
<command idMso="WindowRestore" enabled="false"/>
<command idMso="WindowMinimize" enabled="false"/>
</commands>
<ribbon startFromScratch="false">
<tabs>
<tab id="tabComunidad" label="EMPRESA" keytip = "C">
<group id="grpArchivo" autoScale="false" centerVertically="false" label="Datos" >
<menu id="mnuArchivo" size="large" itemSize="large" label="Registrar" getImage="GetImages" tag="Libras.png" >
<button id="btnNewEmpre" label="NUEVA" screentip="Nueva Empresa" getImage="GetImages" tag="Nueva.png" onAction="OnActionButton" />
<menuSeparator id="sepMenuANew" />
<menu id="mnuComunidad" itemSize="large" label="Empresa" getImage="GetImages" tag="Libras.png" >
<button id="btnRegisComuni" label="DATOS" getImage="GetImages" tag="ok.png" onAction="OnActionButton" />
<menu id="mnuCuentas" itemSize="normal" label="Cuentas" getImage="GetImages" tag="Ctas_Gene.png" >
<button id="btnRegisCtasPropias" label="Registrar" getImage="GetImages" tag="Ctas_Generi.png" onAction="OnActionButton" />
<button id="btnConsuCtasPropias" label="Consultar" getImage="GetImages" tag="Ctas_Especi.png" onAction="OnActionButton" />
</menu>
</menu>
<menuSeparator id="sepMenuComuni" />
<!--Fin del menu (mnuComunidad) NO eliminar este comentario-->
<menu id="mnuClien" itemSize="large" label="Clientes" getImage="GetImages" tag="Propietario.png" >
<menuSeparator id="sepMenuClienGene" title="GENERICOS" />
<button id="btnRegisPropie" label="Regsitrar" getImage="GetImages" tag="Propietarios.png" onAction="OnActionButton" />
<button id="btnConsuPropie" label="Consultar" getImage="GetImages" tag="PropieConsu.png" onAction="OnActionButton" />
<menuSeparator id="sepMenuClienPropio" title="PROPIOS" />
<button id="btnRegisClien" label="Regsitrar" getImage="GetImages" tag="Propietarios.png" onAction="OnActionButton" />
<button id="btnConsuClien" label="Consultar" getImage="GetImages" tag="PropieConsu.png" onAction="OnActionButton" />
</menu>
<!--Fin del menu (mnuClientes) NO eliminar este comentario-->
<menu id="mnuProv" itemSize="large" label="Proveedores" getImage="GetImages" tag="Proveedor.ico" >
<menuSeparator id="sepMenuProvGene" title="GENERICOS" />
<button id="btnRegisProv" label="Registrar" getImage="GetImages" tag="Ctas_Generi.png" onAction="OnActionButton" />
<button id="btnProvTodos" label="Consultar" getImage="GetImages" tag="Interroga.png" onAction="OnActionButton" />
<menuSeparator id="sepMenuProvPropio" title="PROPIOS" />
<button id="btnTraspasaProv" label="Registrar" getImage="GetImages" tag="Ctas_Especi.png" onAction="OnActionButton" />
<button id="btnProvComuni" label="Consultar" getImage="GetImages" tag="Interroga.png" onAction="OnActionButton" />
<button id="btnInmArren" label="Inmuebles" getImage="GetImages" tag="PredioRegis.png" onAction="OnActionButton" />
<button id="btnProvRefer" label="Referencias" getImage="GetImages" tag="OK.png" onAction="OnActionButton" />
</menu>
<menuSeparator id="sepMenuSalir" title="Cerrar el Programa y Salir" />
<button id="btnSalir" label="Salir" getImage="GetImages" tag="Salida.png" onAction="OnActionButton" />
<!--Fin del menu (mnuProveedores) NO eliminar este comentario-->
</menu>
</group>
</tab>
</tabs>
</ribbon>
<backstage>
<button idMso="FileCloseDatabase" visible="true"/>
<button idMso="SaveObjectAs" visible="false"/>
<button idMso="FileSaveAsCurrentFileFormat" visible="false"/>
<button idMso="FileOpen" visible="false"/>
<button idMso="FileSave" visible="false"/>
<tab idMso="TabInfo" visible="false"/>
<tab idMso="TabRecent" visible="true"/>
<tab idMso="TabNew" visible="false"/>
<tab idMso="TabPrint" visible="true"/>
<tab idMso="TabShare" visible="false"/>
<tab idMso="TabHelp" visible="false"/>
<button idMso="ApplicationOptionsDialog" visible="true"/>
<button idMso="FileExit" visible="true"/>
</backstage>
</customUI>
Ahora, me pondre el fin de semana a intentar cambiarlo por loadImage Me planteo una duda y es que hace la instruccion getPressed="MyGetPressed" y en que se diferencia de onAction="MyTBonAction"
Saludos
|
|
emiliove
Administrador
Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5499
|
Enviado: 15/Enero/2021 a las 15:36 |
Hola Main
Es que el ejemplo que te puse es un botón de activación (toggleButton) y al ser de activación tiene dos estados que lo determinamos con (getPressed) y mi función =MyGetPressed es el que me dice si esta activado o no, y el onAction es al hacer click, dependiendo su estado hace una cosa u otra.
Pero los tuyos son botones normales solo usas onAction.
Saludos.
|
|
main
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
Enviado: 17/Enero/2021 a las 13:55 |
Buenos Dias Gracia emiliove, me quedó claro la diferencia. Ahora necesito conocer la funcion LoadImage() que utilizas porque al ejecutarlo me pide varios parametos, sin duda debido a que la funcion que yo tengo con ese nombre utiliza parametros diferentes. Gracias de nuevo
Saludos a l grupo
|
|
emiliove
Administrador
Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5499
|
Enviado: 18/Enero/2021 a las 15:38 |
Hola Main
Es tal como te la puse arriba, mira un ejemplo https://www.dropbox.com/s/56c6wj7ecob2mph/Main.7z?dl=0
Edito: Recuerda que el archivo de las imágenes van en el mismo directorio que la base.
Saludos.
Editado por emiliove - 18/Enero/2021 a las 19:39
|
|
main
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
Enviado: 19/Enero/2021 a las 11:28 |
Buenos dias El error estaba en el procedimiento MyloadImage(ImageName As String, ByRef Image) donde dice Set Image = LoadImage(strPath) debe decir Set image = LoadPictureGDIP(stPath) Y asi si funciona perfectamente. Gracias por todo emiliove Saludos al grupo Se puede cerrar el hilo
|
|
emiliove
Administrador
Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5499
|
Enviado: 19/Enero/2021 a las 15:26 |
Hola Main
Pues si, debería de ser LoadPicture(stPath) se me fué.
Yo uso LoadPictureGDIP para poder ver imagenes con mas extenciones, las extensiones normales que te permite poner el ribbon son solo ico, bmp y jpg pero con el modulo LoadPictureGDIP puedes aumentarlas a bmp, gif, jpg, tif, png, wmf, emf, ico y aparte LoadPictureGDIP lo tengo para access de 32 y 64 bits. para no tener problemas.
Aunque todavía es pronto para saber si resuelve tu problema, por cierto para poder ver si existe algo mal en tu xml y te muestre el error, debes de tener activo la casilla Opciones de access=>Configuración del Cliente=>General=>Mostrar errores de la interfaz de usuario en el complemento.
Saludos.
|
|
main
Colaborador
Unido: 31/Agosto/2009
Localización: OVIEDO
Estado: Sin conexión
Puntos: 1230
|
Enviado: 18/Febrero/2021 a las 12:09 |
Hola de nuevo Gracias por la informacion que desconocia, relativa a Opciones de access=>Configuración del Cliente=>General=>Mostrar errores de la interfaz de usuario en el complemento. Por el momento y transcurrido practicamente un mes todo sigue funcionando.
Gracias por todo emiliove
Saludos al grupo
|
|
Tweet
Imagenes Ribbon