Lexikos wrote:
pajenn wrote:
1. I need to press right-click longer on tray icons to get the menu
I'm not sure what to suggest. Does it happen only with specific applications?
Actually, it's that sometimes the system misses a right-click when gestures is running. Probably not app specific, may involve my previous rbutton hotkeys that are still running...
Firefox works well now.
Quote:
Without this behaviour, you could not use gestures over any window on which the gesture button usually has an effect.
I modified a
draw-on-screen script by Metaxal, and stripped it down to where it just draws temporary trails when right mouse button is down (and erases them on up), F1 to exit:
edit: I updated the code after first posting (now it's closer to Shimanov version of screen draw) because the previous only worked when gestures was running too.
Code:
/*
- F1 quits program, Rbutton to draw
*/
#SingleInstance force
CoordMode, Mouse, Screen
Process, Exist
pid_this := ErrorLevel
hdc_screen := DllCall( "GetDC", "uint", 0 )
hdc_buffer := DllCall( "CreateCompatibleDC", "uint", hdc_screen )
hbm_buffer := DllCall( "CreateCompatibleBitmap", "uint", hdc_screen, "int", A_ScreenWidth, "int", A_ScreenHeight )
DllCall( "SelectObject", "uint", hdc_buffer, "uint", hbm_buffer )
DllCall( "BitBlt", "uint", hdc_buffer, "int", 0, "int", 0, "int", A_ScreenWidth, "int", A_ScreenHeight, "uint", hdc_screen, "int", 0, "int", 0, "uint", 0x00CC0020 )
Gui, +AlwaysOnTop -Caption
Gui, Show, x0 y0 w%A_ScreenWidth% h%A_ScreenHeight%
WinGet, hw_canvas, ID, ahk_class AutoHotkeyGUI ahk_pid %pid_this%
hdc_canvas := DllCall( "GetDC", "uint", hw_canvas )
DllCall( "BitBlt", "uint", hdc_canvas, "int", 0, "int", 0, "int", A_ScreenWidth, "int", A_ScreenHeight, "uint", hdc_buffer, "int", 0, "int", 0, "uint", 0x00CC0020 )
color := 0xFF0000 ;blue
width := 6
MouseGetPos, x_last, y_last
mode_draw:= False
WM_MOUSEMOVE = 0x0200
OnMessage( WM_MOUSEMOVE, "HandleMessage" )
return
HandleMessage( p_w, p_l )
{
global mode_draw, hdc_canvas, hdc_buffer, x_last, y_last, width, color
x := p_l & 0xFFFF
y := p_l >> 16
if ( mode_draw )
color = 0xFF0000
else
color := DllCall( "GetPixel", "uint", hdc_buffer, "int", x, "int", y )
drawLine(x_last, y_last, x, y, color, width)
x_last := x
y_last := y
}
/*
Bresenham algorithm
From:
http://www.cs.unc.edu/~mcmillan/comp136/Lecture6/Lines.html
*/
drawLine(x0, y0, x1, y1, color_ini=0, width=1)
{
global hdc_canvas, hdc_buffer
color := color_ini
dx := x1 - x0
dy := y1 - y0
stepx := 0
stepy := 0
if (dx < 0) {
dx := -dx
stepx := -1
} else
stepx := 1
if (dy < 0) {
dy := -dy
stepy := -1
} else
stepy := 1
Loop %width%
{
x := x0+A_Index-1
y := y0
DllCall( "SetPixel", "uint", hdc_canvas, "int", x, "int", y, "uint", color )
}
if (dx > dy) {
fraction := dy - (dx >> 1)
Loop
{
if (x0 = x1)
break
if (fraction >= 0) {
y0 += stepy
fraction -= dx
}
x0 += stepx
fraction += dy
Loop %width%
{
x := x0+A_Index-1
y := y0
DllCall( "SetPixel", "uint", hdc_canvas, "int", x, "int", y, "uint", color )
}
}
} else {
fraction = dx - (dy >> 1)
Loop
{
if (y0 = y1)
break
if (fraction >= 0) {
x0 += stepx
fraction -= dy
}
y0 += stepy
fraction += dx
Loop %width%
{
x := x0+A_Index-1
y := y0
DllCall( "SetPixel", "uint", hdc_canvas, "int", x, "int", y, "uint", color )
}
}
}
}
F1::ExitApp
RButton::
Gui, Restore
DllCall( "BitBlt", "uint", hdc_canvas, "int", 0, "int", 0, "int", A_ScreenWidth, "int", A_ScreenHeight, "uint", hdc_buffer, "int", 0, "int", 0, "uint", 0x00CC0020 )
MouseGetPos, x_last, y_last
mode_draw:= True
Return
RButton Up::
mode_draw:= False
Gui, Cancel
Return
Would it be feasible to integrate that script with Gestures? Each right-click click restores a transparent GUI on which the mouse path is drawn. The GUI is canceled upon release of the button.
Login
Register
FAQ
Search
