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

------------------------------------------------------------------------------
Enter the BlackBerry Developer Challenge  
This is your chance to win up to $100,000 in prizes! For a limited time, 
vendors submitting new applications to BlackBerry App World(TM) will have
the opportunity to enter the BlackBerry Developer Challenge. See full prize  
details at: http://p.sf.net/sfu/Challenge
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to