Hoy después de mucho tiempo inactivo voy a postear una entrada que si bien la tenia pensada no me daba tiempo hacerla.
En la entrada anterior (Usando Botones Invisibles) mostraba como ejecutar acciones de distintos botones con la misma tecla de acceso directo. Pues bien esto es algo parecido, pero utilizando 1 solo botón.
Para esto utilizo la variable [FocusedObject] que contiene el nombre del objeto que tiene foco en ese momento, luego en las acciones del botón con un If logro realizar las acciones que yo quiera para ese objeto al presionar el acceso directo a ese botón (que yo lo puse oculto).
Ejemplo código acciones del botón:
if "[accion]" "=" "ListBox1"
ListBoxGetItem "[FocusedObject]" "[ListBox1]" "[texto]"
AlertBox "Prueba" "[texto]"
endif
if "[accion]" "=" "ListBox2"
ListBoxGetItem "[FocusedObject]" "[ListBox2]" "[texto]"
MessageBox "Prueba" "[texto]" "Aceptar" "[resultado]"
endif
if "[accion]" "=" "TextEntry1"
StickyNote "-1" "-1" "[TextEntry1]" "0"
endif
Miren el ejemplo y cualquier cosa preguntan.
Saludos
Screenshot del ejemplo
Prueba el ejemplo: Da foco a los distintos objetos y presiona Enter para ver que pasa.
Descargar:
ejemplo_boton_varias_acciones.rar (656,8 KiB, 1.800 hits)
P/D: Tambien dejo disponible la descarga del ejemplo (con las correcciones) enviado por apoleo para la entrada anterior. Recomendable de ver.
formularios.rar (2,9 KiB, 1.522 hits)