[Gambas-user] Can I use the mousewheel to control system audio volume?
Marc Carson
marc at ...2086...
Sun Jul 12 03:55:12 CEST 2009
Stefano Palmeri wrote:
> Il domenica 12 luglio 2009 01:30:26 Stefano Palmeri ha scritto:
>
>> PUBLIC SUB Form_MouseWheel()
>>
>>
>> SELECT CASE Mouse.delta
>>
>> CASE 1
>> PRINT "mouse wheel up"
>> CASE -1
>> PRINT "mouse wheel down"
>>
>> END SELECT
>>
>> END
>>
>
> I forgot about SHIFT+CTRL:
>
> PUBLIC SUB Form_MouseWheel()
>
> IF Mouse.Control AND Mouse.Shift THEN
>
> SELECT CASE Mouse.delta
>
> CASE 1
> PRINT "mouse wheel up"
> CASE -1
> PRINT "mouse wheel down"
>
> END SELECT
>
> ENDIF
>
> END
>
>
Thanks, Stefano. That part works for me. It seems to require the form to
have focus, though. Is there a way to make it work globally, regardless
of which application has focus?
aumix doesn't work for me, unfortunately. Maybe it's because I use
pulseaudio? I can execute the command, but the volume doesn't change.
Marc
More information about the User
mailing list