Theres a file and edit button up the top of my notepad page. Then theres a list of options in that. When you highlight your mouse over the side menu button a side menu will come up. For example go into Paint, Click view then theres a link called Zoom. This is the side menu. Does anyone know how to make this for my notepad? My notepad script is:
; Create the sub-menus for the menu bar: Menu, FileMenu, Add, &New, FileNew, Menu, FileMenu, Add, &Open... Ctrl+O, FileOpen Menu, FileMenu, Add, &Save Ctrl+S, FileSave Menu, FileMenu, Add, &Save As..., FileSaveAs Menu, FileMenu, Add ; Separator line. Menu, FileMenu, Add, &Print, FilePrint Menu, FileMenu, Add ; Separator line. Menu, FileMenu, Add, &Exit, FileExit Menu, EditMenu, Add, &Undo Ctrl+Z, EditUndo Menu, EditMenu, Add ; Separator line. Menu, EditMenu, Add, &Cut Ctrl+X, EditCut Menu, EditMenu, Add, &Copy Ctrl+Z, EditCopy Menu, EditMenu, Add, &Paste Ctrl+V, EditPaste Menu, EditMenu, Add ; Separator line. Menu, EditMenu, Add, &SelectAll Ctrl+A, EditSelectAll Menu, HelpMenu, Add, &About Orangi, HelpAbout ; Create the menu bar by attaching the sub-menus to it: Menu, MyMenuBar, Add, &File, :FileMenu Menu, MyMenuBar, Add, &Edit, :EditMenu Menu, MyMenuBar, Add, &Help, :HelpMenu ; Attach the menu bar to the window: Gui, Menu, MyMenuBar ; Create the main Edit control and display the window: Gui, +Resize ; Make the window resizable. Gui, Add, Edit, vMainEdit WantTab W600 R20 Gui, Show,, Orangi Document CurrentFileName = ; Indicate that there is no current file. return FileNew: GuiControl,, MainEdit ; Clear the Edit control. return FileOpen: Gui +OwnDialogs ; Force the user to dismiss the FileSelectFile dialog before returning to the main window. FileSelectFile, SelectedFileName, 3,, Open File, Text Documents (*.txt) if SelectedFileName = ; No file selected. return Gosub FileRead return FileRead: ; Caller has set the variable SelectedFileName for us. FileRead, MainEdit, %SelectedFileName% ; Read the file's contents into the variable. if ErrorLevel { MsgBox Could not open "%SelectedFileName%". return } GuiControl,, MainEdit, %MainEdit% ; Put the text into the control. CurrentFileName = %SelectedFileName% Gui, Show,, %CurrentFileName% ; Show file name in title bar. return FileSave: if CurrentFileName = ; No filename selected yet, so do Save-As instead. Goto FileSaveAs Gosub SaveCurrentFile return FileSaveAs: Gui +OwnDialogs ; Force the user to dismiss the FileSelectFile dialog before returning to the main window. FileSelectFile, SelectedFileName, S16,, Save File, Text Documents (*.txt) if SelectedFileName = ; No file selected. return CurrentFileName = %SelectedFileName% Gosub SaveCurrentFile return FilePrint: filename := A_ScriptFullPath Run Notepad.exe %filename% WinWaitActive ahk_class Notepad ; Name varies with localization of Windows WinHide ; use the window found above Send ^p Return EditUndo: Send ^z EditCut: Send ^x EditCopy: Send ^c EditPaste: send ^v EditSelectAll: send ^a SaveCurrentFile: ; Caller has ensured that CurrentFileName is not blank. IfExist %CurrentFileName% { FileDelete %CurrentFileName% if ErrorLevel { MsgBox The attempt to overwrite "%CurrentFileName%" failed. return } } GuiControlGet, MainEdit ; Retrieve the contents of the Edit control. FileAppend, %MainEdit%, %CurrentFileName% ; Save the contents to the file. ; Upon success, Show file name in title bar (in case we were called by FileSaveAs): Gui, Show,, %CurrentFileName% return HelpAbout: MsgBox, 32, About %GUI_TITLE% %GUI_VERSION% %GUI_BUILDDATE%, ( LTrim, Orangi was designed for educational purposes only. It started back in early November 2007. I started studying a program called AutoHotKey from there I have designed this short program for everyone to try out. If anyone has any complaints of suggestions please email me. Orangi works on Windows 2000/XP/NT and above only. Author: ` ` Happytodd <[email protected]> Special Thanks: ` ` Paulo-nli, engunneer. ) Return Gui, 2:Add, Button, Default, OK Gui, 2:Show return 2ButtonOK: ; This section is used by the "about box" above. 2GuiClose: 2GuiEscape: Gui, 1:-Disabled ; Re-enable the main window (must be done prior to the next step). Gui Destroy ; Destroy the about box. return GuiDropFiles: ; Support drag & drop. Loop, parse, A_GuiEvent, `n { SelectedFileName = %A_LoopField% ; Get the first file only (in case there's more than one). break } Gosub FileRead return GuiSize: if ErrorLevel = 1 ; The window has been minimized. No action needed. return ; Otherwise, the window has been resized or maximized. Resize the Edit control to match. NewWidth := A_GuiWidth - 20 NewHeight := A_GuiHeight - 20 GuiControl, Move, MainEdit, W%NewWidth% H%NewHeight% return FileExit: ; User chose "Exit" from the File menu. GuiClose: ; User closed the window. ExitApp
Please help as I want to use this side menu for templates by clicking a button like html and a html template will load on the page by using macros.
Thanks for your time happytodd