Hey! Ahora escribo en just·leo, mi nuevo blog.
Seguimos con AutoHotkey, y en este caso con un script que encontré en el sitio del fabricante, el cuál nos permite tener a mano una lista de carpetas favoritas en los cuadros de diálogo de Guardar/Abrir , como también en el explorador de Windows. La única desventaja de este script es que necesita de un mouse con tres botones, debido a que utiliza el click del botón medio para desplegar el menú.
Cómo se ve:
Como dije en incontables ocasiones: si no puedo tener una Mac, al menos que Windows se vea como tal 
01|Funcionamiento
El concepto es muy sencillo pero no menos útil: supongamos que estamos trabajando en Word con varios documentos abiertos al mismo tiempo (por cierto: ¿alguien sabe de un programa para agregarle solapas a Word como en Firefox?) y queremos guardar cada uno en una carpeta distinta.
El proceso será más o menos éste:
a) Ir a Guardar/Abrir
b) Buscar en toda la estructura del disco una carpeta raíz desde la cuál acceder a la que querramos
c) Finalmente, elegir la carpeta en la que queremos guardar el archivo
Con el script que mostraré luego este tedioso proceso se resume a:
a) Ir a Guardar/Abrir
b) Click medio sobre la barra de título del cuadro de diálogo
c) Elegir la carpeta deseada del cuadro desplegable que se abrirá
Nótese que no estamos viendo qué método tiene menos ítems, sino qué solución es la más rápida y efectiva. Con este método tardamos segundos porque las carpetas del menú desplegable las definimos nosotros. Esto es: si nunca guardamos nada en Mis Documentos, simplemente no lo agregamos al listado de carpetas favoritas.
02|El script
Es un poco largo, pero lo voy a mostrar fraccionado para poder aclarar algunos aspectos. Hay que copiarlo y pegarlo todo junto en un archivo nuevo de AutoHotkey.
Parte 1: las notas del desarrollador.
Tenía la idea de no incluir esto, pero resulta ser que contiene algunas “contraindicaciones” bastante importantes. Recomiendo leerlo.
; Easy Access to Favorite Folders — by Savage
; http://www.autohotkey.com
; When you click the middle mouse button while certain types of
; windows are active, this script displays a menu of your favorite
; folders. Upon selecting a favorite, the script will instantly
; switch to that folder within the active window. The following
; window types are supported: 1) Standard file-open or file-save
; dialogs; 2) Explorer windows; 3) Console (command prompt) windows.
; The menu can also be optionally shown for unsupported window
; types, in which case the chosen favorite will be opened as a new
; Explorer window.
; Note: In Windows Explorer, if “View > Toolbars > Address Bar” is
; not enabled, the menu will not be shown if the hotkey chosen below
; has a tilde. If it does have a tilde, the menu will be shown
; but the favorite will be opened in a new Explorer window rather
; than switching the active Explorer window to that folder.
; CONFIG: CHOOSE YOUR HOTKEY
; If your mouse has more than 3 buttons, you could try using
; XButton1 (the 4th) or XButton2 (the 5th) instead of MButton.
; You could also use a modified mouse button (such as ^MButton) or
; a keyboard hotkey. In the case of MButton, the tilde (~) prefix
; is used so that MButton’s normal functionality is not lost when
; you click in other window types, such as a browser. The presence
; of a tilde tells the script to avoid showing the menu for
; unsupported window types. In other words, if there is no tilde,
; the hotkey will always display the menu; and upon selecting a
; favorite while an unsupported window type is active, a new
; Explorer window will be opened to display the contents of that
; folder.
f_Hotkey = ~MButton
Parte 2: Configuración.
Se nos explica cómo agregar nuestros favoritos.
; CONFIG: CHOOSE YOUR FAVORITES
; Update the special commented section below to list your favorite
; folders. Specify the name of the menu item first, followed by a
; semicolon, followed by the name of the actual path of the favorite.
; Use a blank line to create a separator line.
Parte 3: Lista de favoritos
Aquí debemos escribir el nombre de la carpeta que queramos agregar al menú, seguido de un “;” sucedido por la ruta o path de la carpeta en cuestión.
Entonces, si quisiéramos agregar la carpeta “Trabajo” que está en Mis Documentos, sería algo así:
Trabajo ; C:\ocuments and Settings\LEO\Mis documentos\Trabajo
/*
ITEMS IN FAVORITES MENU <– Do not change this string.
Escritorio ; %A_Desktop%
Mis Documentos ; %A_MyDocuments%
iPod ; I:\
Blog ; C:\Documents and Settings\LEO\Escritorio\Blog
Diseño ; C:\Documents and Settings\LEO\Mis documentos\Diseño
Mac OS X Leopard ;C:\Documents and Settings\LEO\Mis documentos\Varios\TI\Apple\Mac OS X\Mac OS X 10.5 Leopard
Imágenes PNG ;C:\Documents and Settings\LEO\Mis documentos\Varios\TI\Software\Backup PNG de Object dock
Program Files; %A_ProgramFiles%
*/
Parte 4: Programación final
Luego tenemos todo el código del script que hace posible esto. Como todos sabemos que no soy programador, ni siquiera voy a pretender que entiendo esto. Obviamente hay que agregarlo al script 
; END OF CONFIGURATION SECTION
; Do not make changes below this point unless you want to change
; the basic functionality of the script.
#SingleInstance ; Needed since the hotkey is dynamically created.
Hotkey, %f_Hotkey%, f_DisplayMenu
StringLeft, f_HotkeyFirstChar, f_Hotkey, 1
if f_HotkeyFirstChar = ~ ; Show menu only for certain window types.
f_AlwaysShowMenu = n
else
f_AlwaysShowMenu = y
; Used to reliably determine whether script is compiled:
SplitPath, A_ScriptName,,, f_FileExt
if f_FileExt = Exe ; Read the menu items from an external file.
f_FavoritesFile = %A_ScriptDir%\Favorites.ini
else ; Read the menu items directly from this script file.
f_FavoritesFile = %A_ScriptFullPath%
;—-Read the configuration file.
f_AtStartingPos = n
f_MenuItemCount = 0
Loop, Read, %f_FavoritesFile%
{
if f_FileExt Exe
{
; Since the menu items are being read directly from this
; script, skip over all lines until the starting line is
; arrived at.
if f_AtStartingPos = n
{
IfInString, A_LoopReadLine, ITEMS IN FAVORITES MENU
f_AtStartingPos = y
continue ; Start a new loop iteration.
}
; Otherwise, the closing comment symbol marks the end of the list.
if A_LoopReadLine = */
break ; terminate the loop
}
; Menu separator lines must also be counted to be compatible
; with A_ThisMenuItemPos:
f_MenuItemCount++
if A_LoopReadLine = ; Blank indicates a separator line.
Menu, Favorites, Add
else
{
StringSplit, f_line, A_LoopReadLine, `;
f_line1 = %f_line1% ; Trim leading and trailing spaces.
f_line2 = %f_line2% ; Trim leading and trailing spaces.
; Resolve any references to variables within either field, and
; create a new array element containing the path of this favorite:
Transform, f_path%f_MenuItemCount%, deref, %f_line2%
Transform, f_line1, deref, %f_line1%
Menu, Favorites, Add, %f_line1%, f_OpenFavorite
}
}
return ;—-End of auto-execute section.
;—-Open the selected favorite
f_OpenFavorite:
; Fetch the array element that corresponds to the selected menu item:
StringTrimLeft, f_path, f_path%A_ThisMenuItemPos%, 0
if f_path =
return
if f_class = #32770 ; It’s a dialog.
{
if f_Edit1Pos ; And it has an Edit1 control.
{
; Activate the window so that if the user is middle-clicking
; outside the dialog, subsequent clicks will also work:
WinActivate ahk_id %f_window_id%
; Retrieve any filename that might already be in the field so
; that it can be restored after the switch to the new folder:
ControlGetText, f_text, Edit1, ahk_id %f_window_id%
ControlSetText, Edit1, %f_path%, ahk_id %f_window_id%
ControlSend, Edit1, {Enter}, ahk_id %f_window_id%
Sleep, 100 ; It needs extra time on some dialogs or in some cases.
ControlSetText, Edit1, %f_text%, ahk_id %f_window_id%
return
}
; else fall through to the bottom of the subroutine to take standard action.
}
else if f_class in ExploreWClass,CabinetWClass ; In Explorer, switch folders.
{
if f_Edit1Pos ; And it has an Edit1 control.
{
ControlSetText, Edit1, %f_path%, ahk_id %f_window_id%
; Tekl reported the following: “If I want to change to Folder L:\folder
; then the addressbar shows http://www.L:\folder.com. To solve this,
; I added a {right} before {Enter}”:
ControlSend, Edit1, {Right}{Enter}, ahk_id %f_window_id%
return
}
; else fall through to the bottom of the subroutine to take standard action.
}
else if f_class = ConsoleWindowClass ; In a console window, CD to that directory
{
WinActivate, ahk_id %f_window_id% ; Because sometimes the mclick deactivates it.
SetKeyDelay, 0 ; This will be in effect only for the duration of this thread.
IfInString, f_path, : ; It contains a drive letter
{
StringLeft, f_path_drive, f_path, 1
Send %f_path_drive%:{enter}
}
Send, cd %f_path%{Enter}
return
}
; Since the above didn’t return, one of the following is true:
; 1) It’s an unsupported window type but f_AlwaysShowMenu is y (yes).
; 2) It’s a supported type but it lacks an Edit1 control to facilitate the custom
; action, so instead do the default action below.
Run, Explorer %f_path% ; Might work on more systems without double quotes.
return
;—-Display the menu
f_DisplayMenu:
; These first few variables are set here and used by f_OpenFavorite:
WinGet, f_window_id, ID, A
WinGetClass, f_class, ahk_id %f_window_id%
if f_class in #32770,ExploreWClass,CabinetWClass ; Dialog or Explorer.
ControlGetPos, f_Edit1Pos,,,, Edit1, ahk_id %f_window_id%
if f_AlwaysShowMenu = n ; The menu should be shown only selectively.
{
if f_class in #32770,ExploreWClass,CabinetWClass ; Dialog or Explorer.
{
if f_Edit1Pos = ; The control doesn’t exist, so don’t display the menu
return
}
else if f_class ConsoleWindowClass
return ; Since it’s some other window type, don’t display menu.
}
; Otherwise, the menu should be presented for this type of window:
Menu, Favorites, show
return
Reitero: para poder utilizar este script copiamos todo el código junto (que aparece aquí en gris y desglosado en partes) a un nuevo script en blanco de AutoHotkey. Para eso recordemos que en una carpeta cualquiera hacíamos click derecho y elegíamos “Nuevo >” del menú contextual, eligiendo por último “AutoHotkey Script”. Luego lo agregamos al arranque de Windows para que ni bien entremos en sesión el script se cargue.
Todas las entradas sobre AutoHotkey.
Cerrar aplicaciones con un botón del mouse o un atajo de teclado.
Ocultar ventanas en la bandeja del sistema.
Un atajo de teclado para crear una carpeta nueva.
Agregar un prefijo a muchos archivos automáticamente.
Cambiar la extensión de un archivo.
Mover cientos de archivos y carpetas con un atajo de teclado.
Menú de carpetas favoritas en el Explorador de Windows y los cuadros de diálogo Guardar/Abrir.
Corrector automático al escribir en todos los programas.
AutoHotkey Tutorial: Cómo automatizar Windows.
¿Comentarios? ¿Dudas? ¿Críticas?
