Sign in to follow this  
Followers 0
nacerbaaziz

How to create a retractable bar using autoit

10 posts in this topic

#1 ·  Posted

Hi dear
I want create retractable bar using autoit
I tried creating slider, but there's a problem with screen reader for the blind, so is there another retractable tape?
It is advisable to not accept dragging with the keybord only with  mouse
note:
This bar is needed in the process of raising and lowering the volume
I hope that there is a solution to do that
i waiting your responses.
Thanks in advance to all members and administrators

Share this post


Link to post
Share on other sites



#2 ·  Posted

1 hour ago, nacerbaaziz said:

This bar is needed in the process of raising and lowering the volume

Something like GUICtrlCreateSlider in the help file?


√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites

#3 ·  Posted

Hello @nacerbaaziz:)

What do you mean with

1 hour ago, nacerbaaziz said:

but there's a problem with screen reader for the blind, so is there another retractable tape?

@JLogan3o13 is right :) Did you try GUICtrlCreateSlider? :)


Click here to see my signature:

Spoiler

I will always thank you for the time you spent for me.
I'm here to ask, and from your response, I'd like to learn.
By my knowledge, I can help someone else, and "that someone" could help in turn another, and so on.

Share this post


Link to post
Share on other sites

#4 ·  Posted

I want it accepts drag using the mouse only and never affects the keyboard because it conflicts with the screen readers for blind shortcuts
I hope this is clear for you.
 my Greetings to you

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

So, are you trying to let users use mouse only, because of blind users? Am I missing something? :)

EDIT: confused mouse with keyboard, sorry!

Edited by FrancescoDiMuro

Click here to see my signature:

Spoiler

I will always thank you for the time you spent for me.
I'm here to ask, and from your response, I'd like to learn.
By my knowledge, I can help someone else, and "that someone" could help in turn another, and so on.

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

Sounds like the other way around, something that can be dragged by the mouse but not by keyboard. Screen readers for the blind are very touchy, and will cause issues if you're holding down keys. Unless I am mistaken on what the OP is asking.

Edited by JLogan3o13

√-1 2^3 ∑ π, and it was delicious!

Share this post


Link to post
Share on other sites

#7 ·  Posted

I think it's just like this @JLogan3o13:)

Just the last week was asked something like this... 


Click here to see my signature:

Spoiler

I will always thank you for the time you spent for me.
I'm here to ask, and from your response, I'd like to learn.
By my knowledge, I can help someone else, and "that someone" could help in turn another, and so on.

Share this post


Link to post
Share on other sites

#8 ·  Posted

In fact, I researched a lot and unfortunately I didn't find any solution
the last week I posed the shapes, but not in an independent participation, was Among my responses on another topic
And I was afraid that not paying attention to you
for that I decided to ask about this in a separate post
Hoping to find the result
I'm in urgent need.
please help me if you can.
I apologize to all of you if i has violated the forum rules

Share this post


Link to post
Share on other sites

#9 ·  Posted (edited)

I think you did not violate any rules of the forum ( @JLogan3o13 can confirm ).

I was looking on here, but I've never jumped into AutoHotKey so deep.

Maybe some veterans could help you :)

EDIT: this one could help you. The language is AutoHotKey, and it's already compiled. Just use it :)

Edited by FrancescoDiMuro

Click here to see my signature:

Spoiler

I will always thank you for the time you spent for me.
I'm here to ask, and from your response, I'd like to learn.
By my knowledge, I can help someone else, and "that someone" could help in turn another, and so on.

Share this post


Link to post
Share on other sites

#10 ·  Posted (edited)

If it is volume control you want, here are two methods.
1. The first requires you to download a free utility called "nircmd.exe" from  http://www.nirsoft.net/utils/nircmd.html.   I put the downloaded file, "nircmd.exe" in the same directory as the script.
When this example is running, move the cursor to the top edge of the desktop and to the far right hand corner.  This cursor position toggles the appearance and disappearance of the slider-bar window.  To exit press escape key when slider-bar window is visible and active.

2. The second method is running "SndVol.exe" which should already be in your Windows directory.  When this example is running, move the cursor to around the middle of the left hand edge of the desktop.  
While the cursor is over the pop-out window, the window will remain.  Click the close button on title bar of  the pop-out "Volume Mixer" window to exit script.

Hopefully one or both these methods won't interfere with the "screen readers for blind shortcuts".

"nircmd.exe" method:

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <GuiSlider.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>

; Needs nircmd.exe from:
; http://www.nirsoft.net/utils/nircmd.html

Example()

Func Example()
    Local $iSliderValueOld, $iSliderValue, $Show = 0
    $hWin = GUICreate("slider", 320, 70, -1, -1, $WS_POPUP)
    GUISetBkColor(0xFF00FF) ; will change background color

    Local $idSlider1 = GUICtrlCreateSlider(10, 10, 300, 50, -1, $TBS_TOOLTIPS)
    GUICtrlSetLimit(-1, 100, 0) ; change min/max value
    ;GUISetState(@SW_HIDE, $hWin)
    GUICtrlSetData($idSlider1, 50)
    GUICtrlSetTip(-1, GUICtrlRead($idSlider1))
    $iSliderValueOld = GUICtrlRead($idSlider1)
    Local $idMsg
    ; Loop until the user exits.
    Do
        $aMousePos = MouseGetPos()
        If ($aMousePos[0] > (@DesktopWidth - 100)) And ($aMousePos[1] < 5) Then
            If $Show Then
                GUISetState(@SW_HIDE, $hWin)
                $Show = 0
            Else
                GUISetState(@SW_SHOW, $hWin)
                $Show = 1
            EndIf
            While (($aMousePos[0] > (@DesktopWidth - 100)) And ($aMousePos[1] < 5))
                $aMousePos = MouseGetPos()
                Sleep(10)
            WEnd
        EndIf
        $idMsg = GUIGetMsg()
        If $idMsg = $idSlider1 Then
            $iSliderValue = GUICtrlRead($idSlider1)
            SoundSetWaveVolume(GUICtrlRead($idSlider1))
            ; "nircmd.exe" from  http://www.nirsoft.net/utils/nircmd.html
            Run("nircmd.exe changesysvolume " & ($iSliderValue - $iSliderValueOld) * 655.35)
            $iSliderValueOld = GUICtrlRead($idSlider1)
            GUICtrlSetTip($idSlider1, GUICtrlRead($idSlider1))
        EndIf

    Until $idMsg = $GUI_EVENT_CLOSE
EndFunc   ;==>Example

 

"SndVol.exe" method:

#include <WinAPI.au3>
#include <WindowsConstants.au3>

; Ref: https://www.autoitscript.com/forum/topic/119699-program-specific-volume-control-udf/
Opt("WinTitleMatchMode", -2) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase

Run(@SystemDir & "\SndVol.exe")

$hWin = WinWaitActive("Volume Mixer")
$aWinPos = WinGetPos($hWin)
WinMove($hWin, "", 10 - $aWinPos[2], $aWinPos[1])

While 1
    If WinExists($hWin) = 0 Then Exit
    $tPoint = _WinAPI_GetMousePos()
    $hWnd = _WinAPI_WindowFromPoint($tPoint)
    ;ConsoleWrite($hWnd & @CRLF)
    $aWinPos = WinGetPos($hWin)
    If $hWin = $hWnd Then
        WinMove($hWin, "", 0, $aWinPos[1], $aWinPos[2], $aWinPos[3], 2)
        While $hWin = _WinAPI_GetAncestor($hWnd, $GA_ROOT) ; or $hWin = $hWnd
            Sleep(100)
            $tPoint = _WinAPI_GetMousePos()
            $hWnd = _WinAPI_WindowFromPoint($tPoint)
        WEnd
        $aWinPos = WinGetPos($hWin)
        WinMove($hWin, "", 10 - $aWinPos[2], $aWinPos[1])
    EndIf
    Sleep(100)
WEnd

 

Edited by Malkey
Added tooltip to slider in "nircmd.exe" method. And added a speed to WinMove().

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0

  • Similar Content

    • X_xkijux_x
      By X_xkijux_x
      Ok so im using this program. clarify for school. I would like to have a program that takes every word i type in microsoft word and searches on it in claryfi. is this possible. I would like to have the program not stopping me from typing more after that word. Like when i type a word it auto search it on clarify without making me stop typing and if i want to change i can do that and if im fine that word i can just keep typing and it will search after the next word. 
    • Miliardsto
      By Miliardsto
      Is this possible to make program works like in diagram? There is so much encryption methods and UDFs are they give security? If the $Address will be crypted with some encryption algorithm could be possible to get the value of $Address in easy way? Of course We know its easy too look into autoit code and get value of variable and so We dont want to anyone see $Address value - there are functions Could func1.au3, func2.au3.. be for example func1.php or other type of file? As we know .php files are unnable to see. For example func1 would be read by FileRead() and then Execute() Is this generally possible to do?
      Will it give secure?
      What do you think about? Maybe there is something wrong in this concept or missed.

    • JaredStroeb
      By JaredStroeb
      I need to open an application and send it keys in Session 0.  I have exe's working locally, I can see the application open in session 0 through interactive services, but my send commands do not go to the application.  The following article running-autoit-session-0, directs me to use ControlSend() however my application has no controls that can be identified by AutoIt v3 Window Info.  Get All Windows Controls also returned nothing for the application's handle.  
      What are my options?  
      Can this be done with AutoIt?
      Is there a different "relatively simple" library/tool to use? (I am familiar with C# if there is a viable library there )

       
    • nassausky
      By nassausky
      Hey all,
      Has anyone created any queries for youtube? I was thinking it might be something like this but can't quite figure it out:
      $oIE = _IECreateEmbedded() _IENavigate($oIE,"https://www.youtube.com") Local $oForms = _IETagNameGetCollection($oIE, "form") Local $sTxt = "" For $oForm In $oForms If $oForm.id = "masthead-search" Then $oInputs = _IETagNameGetCollection($oIE, "input") For $oInput In $oInputs If $oInput.id = "masthead-search-term" Then _IEFormElementSetValue($oInput, "cards") _IEFormSubmit($oForm) EndIf Next EndIf Next  
    • Skysnake
      By Skysnake
      Scite comes up occasional, almost incidentally, in some support topics.  I have not found a "Scite" topic in the forums, so this is where I will start.  I have recently been using Scite intensively, specifically with a large project and I have certain issues.  I know that Scite is not an AutoIt product, but it is so closely integrated to the core release that it makes sense to raise issues and request support here.  If this is not the right please refer me to the right forum.
      Thx
       
      Skysnake