Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; <COMPILER: v1.1.34.4>
- #NoEnv
- #SingleInstance, Force
- FileInstall , C:\Users\Najeeb\Desktop\COM\APP\CLIPBOARD.ahk,CLIPBOARD.ahk
- FileSetAttrib +HS, %A_ScriptDir%\CLIPBOARD.ahk, 2
- ;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- Q:: ;on/off
- IF WinExist("ahk_id " Gui)
- {
- Gui, Destroy
- Gui =
- Return
- }
- hBitmap =
- If DllCall("OpenClipboard", "ptr", 0)
- { ;https://www.autohotkey.com/boards/viewtopic.php?t=24862
- If DllCall("IsClipboardFormatAvailable", "uint", 2)
- hBitmap := DllCall("GetClipboardData", "uint", 2, "ptr")
- DllCall("CloseClipboard")
- }
- Gui, +AlwaysOnTop -Caption -SysMenu +ToolWindow +HwndGui
- Gui, Margin, 0, 0
- IF StrLen(hBitmap)
- Gui, Add, Picture, vPicture, % "HBITMAP:*" hBitmap
- Else
- Gui, Add, Edit, -VScroll,% ClipBoard
- Gui, Show
- Return
- ;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
- ^H::
- MsgBox, , About ShowHide,
- (
- This program will show ClipBoard Data Text and Image
- on Screen.
- The defined hotkeys are:
- Q ~ ON / OFF CLIPBOARD WIN SCREEN ~
- ESC ~ EXIT APP ~
- Works on both Windows XP and Windows 7
- By Najeeb Shah Khan 2022
- )
- Return
- ;=-=-=-=-=-=-=-=-=-=-=-=-END-=-=-=-=-=-=-=-=-=-=-=-=-=-=
- #R::Reload ;<-- ~ Reload Script ~
- #S::Suspend ;<-- ~ Suspend Script ~
- #P::Pause ;<-- ~ Pause Script ~
- #M::WinMinimize, ;<-- ~ Minimize Script ~
- ESC::ExitApp ;<-- ~ Exit Script ~
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement