Jump to content

Recommended Posts

Posted

If you want to enable the quicklauch and resize it for your purpose, use this.

You have alter it for your language. Use AU3Info.exe to get the related info.

I wrote it for an unattended installation.

Dim $h, $b, $dt, $i, $cur, $pos
$h = @DesktopHeight - 10
$b = @DesktopWidth - @DesktopWidth / 1.8

;wait for the desktop to be loaded
;hint: this is the taskbar
$dt = WinWait ( "","Ausgeführte Anwendungen", 300 )
If $dt = 1 then
   ControlClick ( "", "Start", 40965, "right", 1 )
  ;Attention: 'y' and 'c' works only for the german version!
   Send ("y")
   Send ("c")
   MouseMove ( $b, $h)
   
 ;Not to close to the 2.ReBar
  For $i = $b to 90 Step -1
    $cur = MouseGetCursor()
    MouseMove ($i, $h, 0)
     If $cur = 13 then
      $pos = MouseGetPos ( )
      
     ;250 pixel is now the new width of the quicklaunch
      MouseClickDrag ( "", $pos[0], $pos[1], "250", $pos[1],0 )
      exitloop
     endif
  next
EndIf
This code will only work for the german version

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
×
×
  • Create New...