Jump to content

Welcome to MSFN Forum
Register now to gain access to all of our features. Once registered and logged in, you will be able to create topics, post replies to existing threads, give reputation to your fellow members, get your own private messenger, post status updates, manage your profile and so much more. This message will be removed once you have signed in.
Login to Account Create an Account



Photo

Quick Launch Classic 7 Tool 1.0.5


  • Please log in to reply
200 replies to this topic

#51
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag

7QuickLaunch-INT Works fine for me myselfidem en-US :thumbup

in fact I run a 2nd script to pin something else right after this and no problems.


Nice! :rolleyes:
Thanks maxXPsoft

I've just made one editing and file is updated:

;Case $Lang = French
   Case $Lang = "fr-FR"
   $title = "Nouvelle barre d’outils - Choisir un dossier"
   $programs = "[CLASS:MSTaskListWClass; TEXT:Applications en cours d’exécution]"


Maybe it would be interresting to add this file 7QuickLaunch.exe inside your nice software Se7en_UA - with SP1 Injection

But, of course it's needed more tests for Italian, etc... or others languages!

Regards
For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).


How to remove advertisement from MSFN

#52
wazer

wazer

    You gotta risk it to get the biscuits

  • Member
  • PipPip
  • 234 posts
  • Joined 24-May 05
  • OS:Windows 8.1 x64
  • Country: Country Flag

Hi all!

I've tested a new file for 7QuickLaunch-INT!

Works really fine with French language, but it's needed to test for others languages if it's OK!
Include: en-US;fr-FR;nl-NL;da-DK;se-SE;nb-NO

The TaskbarPinnedList will disappear after the reboot!

7QuickLaunch-INT.au3

[code=auto:0]



Thanks to report if it's works for others languages!


I know that :)?

I made the taskbarpinnedlist disapear after reboot with my script :).

You modification does not work if taskbar is unlocked before you run it. You need to lock it first, we will have to implent a taskbar lock check to the script.
if ( $life( $me ) == $null ) { getLife( $me ) | halt }


Quick Launch Classic 7 Tool

#53
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag

I know that :)?

I made the taskbarpinnedlist disapear after reboot with my script :).

You modification does not work if taskbar is unlocked before you run it. You need to lock it first, we will have to implent a taskbar lock check to the script.


Hello wazer! :rolleyes:

Also with mine!
I think it's made with the first value inside the script (Lock Taskbar):



Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced]
"TaskbarSizeMove"=dword:00000000


RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ Advanced", "TaskbarSizeMove", "REG_DWORD", "0")


Lock Taskbar

In fact, I've corrected your mistake!
I've made also ql_win7_FRENCH_NO_REBOOT.au3 without reboot and TaskbarPinnedList disappear!

Have you tested 7QuickLaunch-INT.exe?
Works fine for me.

Edited by myselfidem, 23 January 2011 - 11:05 AM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#54
wazer

wazer

    You gotta risk it to get the biscuits

  • Member
  • PipPip
  • 234 posts
  • Joined 24-May 05
  • OS:Windows 8.1 x64
  • Country: Country Flag

I know that :)?

I made the taskbarpinnedlist disapear after reboot with my script :).

You modification does not work if taskbar is unlocked before you run it. You need to lock it first, we will have to implent a taskbar lock check to the script.


Hello wazer! :rolleyes:

Also with mine!
I think it's made with the first value inside the script (Lock Taskbar):



Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced]
"TaskbarSizeMove"=dword:00000000


RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ Advanced", "TaskbarSizeMove", "REG_DWORD", "0")


Lock Taskbar

In fact, I've corrected your mistake!
I've made also ql_win7_FRENCH_NO_REBOOT.au3 without reboot and TaskbarPinnedList disappear!

Have you tested 7QuickLaunch-INT.exe?
Works fine for me.



No what your linking to is for XP, that aint for windows 7.

No the lock taskbar is just a toggle nothing else.

Just because you regwrite the taskbarsizemove, it dosnt magical shows as locked in windows 7 :). Therefor for the future we need to implent taskbar lock check. So everybody can run it whenever they are doing unattended or just have a normal os and want old quicklaunch back :)

Sorry not yet, but will check your file :).

Keep up the good activty and i think soon we will have a final version for all pleasures :).

Edited by wazer, 23 January 2011 - 12:07 PM.

if ( $life( $me ) == $null ) { getLife( $me ) | halt }


Quick Launch Classic 7 Tool

#55
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
The value works also with Windows 7!
The value is set to Lock Taskbar inside the script, even if it's not the case (because a reboot is needed to see the changes for TaskbarPinnedList).
I need to check the file with the Taskbar Unlocked!!
My file works on my desktop and with unattended installation (7QuickLaunch-INT.exe)!

What it's really needed. Add a value to check. I think it's not usefull! But I can try to look for that.
I've spend many time to have the file working fine. Believe me!
The real problem is the Langbar. If the Langbar isn't closed, Quick Launch can't install with my Windows 7 French version!
Is it the case for English version?
Thanks for your support! ;)

*Edit: Tested now on my computer (not silent install)=> If the Taskbar is Unlocked the file doesn't works! The Taskbar need to be Locked first and the file works fine!

New challenge :rolleyes:

*Edit 2: Maybe we can use Select and case with AutoIT to check if the Taskbar is set to Lock and lock this one if it's needed?

Edited by myselfidem, 23 January 2011 - 12:52 PM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#56
MAVERICKS CHOICE

MAVERICKS CHOICE

    The Guy from Aus

  • Member
  • PipPipPipPipPipPipPip
  • 1,799 posts
  • Joined 14-November 03
  • OS:Windows 7 x64
  • Country: Country Flag

The value works also with Windows 7!
The value is set to Lock Taskbar inside the script, even if it's not the case (because a reboot is needed to see the changes for TaskbarPinnedList).
I need to check the file with the Taskbar Unlocked!!
My file works on my desktop and with unattended installation (7QuickLaunch-INT.exe)!

What it's really needed. Add a value to check. I think it's not usefull! But I can try to look for that.
I've spend many time to have the file working fine. Believe me!
The real problem is the Langbar. If the Langbar isn't closed, Quick Launch can't install with my Windows 7 French version!
Is it the case for English version?
Thanks for your support! ;)

*Edit: Tested now on my computer (not silent install)=> If the Taskbar is Unlocked the file doesn't works! The Taskbar need to be Locked first and the file works fine!

New challenge :rolleyes:


The script appears to work here, only title & text needs to be manually unticked.
Great progress :thumbup

#57
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag

The script appears to work here, only title & text needs to be manually unticked.
Great progress :thumbup


Thanks for your report!
Have you given a new name to the file 7QuickLaunch-INT.exe like 7QuickLaunch.exe?
Have you an Windows 7 English version?
Maybe a program is running on background when you try to install the 7Quick Launch?

Edited by myselfidem, 23 January 2011 - 01:06 PM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#58
wazer

wazer

    You gotta risk it to get the biscuits

  • Member
  • PipPip
  • 234 posts
  • Joined 24-May 05
  • OS:Windows 8.1 x64
  • Country: Country Flag

The script appears to work here, only title & text needs to be manually unticked.
Great progress :thumbup


Thanks for your report!
Have you given a new name to the file 7QuickLaunch-INT.exe like 7QuickLaunch.exe?
Have you an Windows 7 English version?
Maybe a program is running on background when you try to install the 7Quick Launch?


as he mention with the title and text you forgot to add it, i already added it.

You left it out?.

$toolbartext = "{down}{down}{down}{ENTER}"
$toolbartitle = "{down}{down}{down}{down}{ENTER}"

News is that im working on vb.net that will check if its locked or not. And then apply all changes without the need for reboot at all.

Edited by wazer, 23 January 2011 - 03:52 PM.

if ( $life( $me ) == $null ) { getLife( $me ) | halt }


Quick Launch Classic 7 Tool

#59
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag

The script appears to work here, only title & text needs to be manually unticked.
Great progress :thumbup


Thanks for your report!
Have you given a new name to the file 7QuickLaunch-INT.exe like 7QuickLaunch.exe?
Have you an Windows 7 English version?
Maybe a program is running on background when you try to install the 7Quick Launch?


as he mention with the title and text you forgot to add it, i already added it.

You left it out?.

$toolbartext = "{down}{down}{down}{ENTER}"
$toolbartitle = "{down}{down}{down}{down}{ENTER}"

News is that im working on vb.net that will check if its locked or not. And then apply all changes without the need for reboot at all.


No!

These values are set at first like variables for much languages (same values)!
I keep only Danish because the values aren't the same!
Check my file please!

*Edit: Good news (your working on vb.net)! Thanks. ;)

*Edit 2: Maybe the problem will appear with Danish and it will be necessary to add another variable?

Edited by myselfidem, 23 January 2011 - 05:00 PM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#60
MAVERICKS CHOICE

MAVERICKS CHOICE

    The Guy from Aus

  • Member
  • PipPipPipPipPipPipPip
  • 1,799 posts
  • Joined 14-November 03
  • OS:Windows 7 x64
  • Country: Country Flag

The script appears to work here, only title & text needs to be manually unticked.
Great progress :thumbup


Thanks for your report!
Have you given a new name to the file 7QuickLaunch-INT.exe like 7QuickLaunch.exe?
Have you an Windows 7 English version?
Maybe a program is running on background when you try to install the 7Quick Launch?


No file name change, running 64bit eng ver. Nothing special running when started the exe.

Good to see you fellas working together on such a project MS thinks little of.

#61
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag

No file name change, running 64bit eng ver. Nothing special running when started the exe.

Good to see you fellas working together on such a project MS thinks little of.

Thanks!
Have you first close the Langbar (right click on the Langbar and close, not Disable with the option Toolbar) and check if the Taskbar is Locked?
For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#62
wazer

wazer

    You gotta risk it to get the biscuits

  • Member
  • PipPip
  • 234 posts
  • Joined 24-May 05
  • OS:Windows 8.1 x64
  • Country: Country Flag
Okay here it is. Finally working!.


This does not care if locked or unlocked. Tested with danish and english version. and ofc theres support for all the oher languages i posted before in this thread.


More to come !.


Note this is VB and autoit cooked together. No ui, restarts explorer the good way. sit back let the app work for about 10-15 seconds and look the beautyness !. Remember if you already had attached quick launch remember to remove it !!!...


After you have removed it lock taskbar, unlock taskbar again. Then it saves the taskbar information and the app will not give 2 quick launch folders. Note this is only for already classic quick launch users. For new users there shudnt be any problems !.

Forgot to mention this version removes langs bar aswell !. There shudnt be any need to remove it manual first ! test it out !

Edited by wazer, 24 January 2011 - 01:26 AM.

if ( $life( $me ) == $null ) { getLife( $me ) | halt }


Quick Launch Classic 7 Tool

#63
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
Many thanks wazer, but it's needded to install NET Framework 4 befor!
Regards

Link to download Net Farmework 4 Standalone:

Microsoft .NET Framework 4 (Standalone Installer)

I will install and I give you a report.

Edited by myselfidem, 24 January 2011 - 01:34 AM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#64
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
I've tested now after installing NET Framework 4!

The Langbar isn't closed if this one is on the taskbar.
Unable to install the path for the Quick Launch!

Doesn't work even if I close first the Langbar.
Tested on my Windows 7 Ultimate French version x86.

Error.txt:

script.exe is denied

See the end of this message for details on invoking
just-in-time (JIT) debugging instead of this dialog box.

************** Exception Text **************
System.UnauthorizedAccessException: Access to the path 'C:\Users\Antoine\Desktop\script.exe' is denied.
at System.IO.__Error.WinIOError(Int32 errorCode, String maybeFullPath)
at System.IO.File.Delete(String path)
at QuickLaunchByWazor.Form1.ExitProgram()
at QuickLaunchByWazor.Form1.Form1_Load(Object sender, EventArgs e)
at System.EventHandler.Invoke(Object sender, EventArgs e)
at System.Windows.Forms.Form.OnLoad(EventArgs e)
at System.Windows.Forms.Form.OnCreateControl()
at System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
at System.Windows.Forms.Control.CreateControl()
at System.Windows.Forms.Control.WmShowWindow(Message& m)
at System.Windows.Forms.Control.WndProc(Message& m)
at System.Windows.Forms.ScrollableControl.WndProc(Message& m)
at System.Windows.Forms.Form.WmShowWindow(Message& m)
at System.Windows.Forms.Form.WndProc(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)


************** Loaded Assemblies **************
mscorlib
Assembly Version: 4.0.0.0
Win32 Version: 4.0.30319.1 (RTMRel.030319-0100)
CodeBase: file:///C:/Windows/Microsoft.NET/Framework/v4.0.30319/mscorlib.dll
----------------------------------------
QuickLaunchByWazer
Assembly Version: 1.0.0.0
Win32 Version: 1.0.0.0
CodeBase: file:///C:/Users/Antoine/Desktop/QuickLaunchByWazer.exe
----------------------------------------
Microsoft.VisualBasic
Assembly Version: 10.0.0.0
Win32 Version: 10.0.30319.1 built by: RTMRel
CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/Microsoft.VisualBasic/v4.0_10.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll
----------------------------------------
System.Windows.Forms
Assembly Version: 4.0.0.0
Win32 Version: 4.0.30319.1 built by: RTMRel
CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Windows.Forms/v4.0_4.0.0.0__b77a5c561934e089/System.Windows.Forms.dll
----------------------------------------
System.Drawing
Assembly Version: 4.0.0.0
Win32 Version: 4.0.30319.1 built by: RTMRel
CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Drawing/v4.0_4.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll
----------------------------------------
System
Assembly Version: 4.0.0.0
Win32 Version: 4.0.30319.1 built by: RTMRel
CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System/v4.0_4.0.0.0__b77a5c561934e089/System.dll
----------------------------------------
System.Runtime.Remoting
Assembly Version: 4.0.0.0
Win32 Version: 4.0.30319.1 (RTMRel.030319-0100)
CodeBase: file:///C:/Windows/Microsoft.Net/assembly/GAC_MSIL/System.Runtime.Remoting/v4.0_4.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll
----------------------------------------

************** JIT Debugging **************
To enable just-in-time (JIT) debugging, the .config file for this
application or computer (machine.config) must have the
jitDebugging value set in the system.windows.forms section.
The application must also be compiled with debugging
enabled.

For example:

<configuration>
<system.windows.forms jitDebugging="true" />
</configuration>

When JIT debugging is enabled, any unhandled exception
will be sent to the JIT debugger registered on the computer
rather than be handled by this dialog box.




The program stucks on the window to write the path for the Quick Launch (the path can't be write [Send]).

Edited by myselfidem, 24 January 2011 - 02:22 AM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#65
coucou

coucou

    Friend of MSFN

  • Member
  • PipPipPipPipPip
  • 864 posts
  • Joined 01-January 04
Hi all,

I'm using Windows 7 English with added LangPacks, one of them is French. Until now, I tested the QuckLaunch script during Windows 7 French unattended installation.

Recently I tested the QuckLaunch script with Windows 7 English unattended installation and was surprised to get the following error
AutoIt Error QuickLaunch AutoIt Error in line xx
 variable used without being declared
It behave like a Single Windows Language.

After inverstigation, I find that although the Windows 7 is MultiLangual integrated, If I install the base Language (English in my case), the registry ValueName ("HKCU\Control Panel\Desktop", "PreferredUILanguages") is simply NOT Exist.

Then, I was looking on how to check that registry ValueName if exist. And if NOT exist, swap to another without making the script heavier.
First, Instead of reading the Registry vlaueData of

RegRead("HKEY_CURRENT_USER\Control Panel\International", "sLanguage") = ENU or FRA...

We may read

RegRead("HKEY_CURRENT_USER\Control Panel\International", "LocaleName") = en,US or fr-FR ...


Therefore, the script improve will be

$Lang = RegRead("HKCU\Control Panel\Desktop", "PreferredUILanguages")
    If @error = 0 Then ; registry ValueName exist
    Else ; registry ValueName NOT exist
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\International", "LocaleName")
   EndIf
that's it

and we can suppress all the unused lines
; $Lang = RegRead("HKEY_CURRENT_USER\Control Panel\International", "sLanguage") 
   ; Case $Lang = "FRA";French 
   ; Case $Lang = "ENU"; English 
   ;...

Enjoy

Edited by coucou, 24 January 2011 - 03:36 AM.


#66
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
Hello coucou!

The values for the reg files aren't the same for French language inside the registry:

[HKCU\Control Panel\International] and [HKCU\Control Panel\Desktop\MuiCached]

Because for French we can have: FRS (French-Switzerland) or others values for French-Belgium; French-French!
Same thing for others languages!

Example, I can install my Windows7 French with UserLocale value with French: "fr-FR" or "fr-CH"

For this reason it's better to read the value with AutoIT inside:

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached]
"MachinePreferredUILanguages"=hex(7):66,00,72,00,2d,00,46,00,52,00,00,00 (fr-FR) for me



Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Control Panel\International]
"Locale"="00000407"
"LocaleName"="fr-CH"
"s1159"=""
"s2359"=""
"sCountry"="Suisse"
"sCurrency"="fr."
"sDate"="."
"sDecimal"="."
"sGrouping"="3;0"
"sLanguage"="FRS" (French-Switzerland)


It's not needed to rename the file Quick Launch as Lancement rapide for French Windows 7 locale version!

Works fine for me with the value Quick Launch!
Of course I think it works for you because you have renammed the folder Quick Launch => Lancement rapide and set this one on your DVD!!

I'm guessing that if your installation is with English the value en-US read inside the registry will install Quick Launch with the values for English with 7QuickLaunch-INT.exe!

Edited by myselfidem, 24 January 2011 - 04:08 AM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#67
coucou

coucou

    Friend of MSFN

  • Member
  • PipPipPipPipPip
  • 864 posts
  • Joined 01-January 04
Hello myselfidem ,

It's not needed to rename the file Quick Launch as Lancement rapide for French Windows 7 locale version!
Works fine for me with the value Quick Launch!
Of course I think it works for you because you have renammed the folder Quick Launch => Lancement rapide and set this one on your DVD!!

For myself I do NOT use Lancement rapide. All the more so, as i wrote above, I'm using Windows 7 English with added LangPacks.

Regarding HKEY_CURRENT_USER\Control Panel\International", "LocaleName"I forgot that it different country depend.

However, the problem still there if you unattended install a single language or a MultiLangue Windows 7 in the language base, "HKCU\Control Panel\Desktop", "PreferredUILanguages") is NOT there. Test it and you'll see.
Therefore, the improve will be
$Lang = RegRead("HKCU\Control Panel\Desktop", "PreferredUILanguages") 
    If @error = 0 Then ; registry ValueName exist 
    Else ; registry ValueName NOT exist 
$Lang = RegRead("HKCU\Control Panel\Desktop", "MachinePreferredUILanguages") 
   EndIf

Regards

Edited by coucou, 24 January 2011 - 04:47 AM.


#68
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
@coucou
You don't rememeber your post, about Lancement rapide?
http://www.msfn.org/...04/page__st__20

7QuickLaunch-INT.exe works like a charm for me, on my desktop or with unattended installation with Windows 7 French locale version ( with fr-CH or fr-FR)

I don't really need to have others languages inside my Windows 7!

If you want you can choose to integrate another language with also UI interface and install also the language inside boot.wim 1 and boot.wim 2

If I've time I will test to add English inside Windows 7 French version to try to give you some help, if I can!

*Edit: It would be interresting to tell me what is writed inside your registry after your installation with Windows 7 Multilangues!

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached]
"MachinePreferredUILanguages"=?????????????



7QuickLaunch-INT.zip

Edited by myselfidem, 24 January 2011 - 05:48 AM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#69
coucou

coucou

    Friend of MSFN

  • Member
  • PipPipPipPipPip
  • 864 posts
  • Joined 01-January 04

@coucou
You don't rememeber your post, about Lancement rapide?
http://www.msfn.org/...04/page__st__20



Just click on my here bellow signature and you'll be directed on a post speaking about Quick Launch and Lancement rapide

*Edit: It would be interresting to tell me what is writed inside your registry after your installation with Windows 7 Multilangues!

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached]
"MachinePreferredUILanguages"=?????????????

"en-US"

So, I tested an unattended install MultiLangue Windows 7 in the language base (English), "HKCU\Control Panel\Desktop", "PreferredUILanguages") is NOT there. Test it and you'll see. You can test it too.
ANYWAY if you install an unattended single language "HKCU\Control Panel\Desktop", "PreferredUILanguages" will be missed too
Therefore, the improve will be
$Lang = RegRead("HKCU\Control Panel\Desktop", "PreferredUILanguages")  
    If @error = 0 Then ; registry ValueName exist  
    Else ; registry ValueName NOT exist  
$Lang = RegRead("HKCU\Control Panel\Desktop", "MachinePreferredUILanguages")  
   EndIf
So, it's yr script and it up to you to moify it or not, I just gave you the info.

Regards

#70
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
Have you tested 7QuickLaunch-INT.exe?


For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#71
coucou

coucou

    Friend of MSFN

  • Member
  • PipPipPipPipPip
  • 864 posts
  • Joined 01-January 04

Have you tested 7QuickLaunch-INT.exe?

Right now YES

English: The Quick Launch bar is created, doesn't move to the left
French: freeze in line 86 WinWaitActive($title)

Again I'm using Windows 7 English with added LangPacks therefore $Lang = RegRead("HKCU\Control Panel\Desktop", "MachinePreferredUILanguages") it's allways en-US. Never change

I modified yr script frpom

Opt('TrayIconDebug', 1)
sleep(10)

;Adding Reg Entries.
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSizeMove", "REG_DWORD", "0")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSmallIcons", "REG_DWORD", "1")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarGlomLevel", "REG_DWORD", "2")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer", "EnableAutoTray", "REG_DWORD", "0")
RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Explorer", "TaskbarNoPinnedList", "REG_DWORD", "1")
RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2','Settings',"REG_BINARY","28000000ffffffff02000000030000003e0000004e000000feffffffce030000920600001c040000")

;$Lang = RegRead("HKCU\Control Panel\Desktop", "MachinePreferredUILanguages")  
$Lang = RegRead("HKCU\Control Panel\Desktop", "MachinePreferredUILanguages")  

$text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]"
$path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\"
$toolbartext = "{down}{down}{down}{ENTER}"
$toolbartitle = "{down}{down}{down}{down}{ENTER}"
...
to
Opt('TrayIconDebug', 1)
sleep(10)

;Adding Reg Entries.
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSizeMove", "REG_DWORD", "0")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSmallIcons", "REG_DWORD", "1")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarGlomLevel", "REG_DWORD", "2")
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer", "EnableAutoTray", "REG_DWORD", "0")
RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Explorer", "TaskbarNoPinnedList", "REG_DWORD", "1")
RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2','Settings',"REG_BINARY","28000000ffffffff02000000030000003e0000004e000000feffffffce030000920600001c040000")

$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "PreferredUILanguages")
    If @error = 0 Then ; registry ValueName exist
    Else ; registry ValueName NOT exist
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
   EndIf

$text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]"
$path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\"
$toolbartext = "{down}{down}{down}{ENTER}"
$toolbartitle = "{down}{down}{down}{down}{ENTER}"
...

English: The Quick Launch bar is created, doesn't move to the left
French: The Quick Launch bar is created (twice), doesn't move to the left,

Regards

Edited by coucou, 24 January 2011 - 11:28 AM.


#72
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
During an silent install the Langbar needs to be closed! It is your case?
Have you tried on your computer?
Check if the Langbar is closed and let me know!

*Edit: Please download the last file 7QuickLaunch-INT.exe and you will see inside that the reg file is:


;$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
$text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]"
$path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\"
$toolbartext = "{down}{down}{down}{ENTER}"
$toolbartitle = "{down}{down}{down}{down}{ENTER}"



*Edit: I've made a new 7QuickLaunch-INT.exe and set first the value for English language!

Tested for French version and works fine for me:
For testing:
New QL.zip

Edited by myselfidem, 24 January 2011 - 08:50 AM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#73
coucou

coucou

    Friend of MSFN

  • Member
  • PipPipPipPipPip
  • 864 posts
  • Joined 01-January 04
@myselfidem

I tested yr New QL.zip.
English: The Quick Launch bar is created, doesn't move to the left
French: freeze in line 60 Sleep(100)

Again, Again and Again I'm using Windows 7 English with added LangPacks therefore $Lang = RegRead("HKCU\Control Panel\Desktop", "MachinePreferredUILanguages") it's allways en-US. Never change. It is not MultiLanguage depend, it is base language depend. Therefore you may check 2 registry. "MachinePreferredUILanguages" and "PreferredUILanguages"

I modified yr script from
;$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
$text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]"
$path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\"
$toolbartext = "{DOWN}{DOWN}{DOWN}{ENTER}"
$toolbartitle = "{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}"
to
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "PreferredUILanguages")
    If @error = 0 Then ; registry ValueName exist
    Else ; registry ValueName NOT exist
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
   EndIf
$text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]"
$path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\"
$toolbartext = "{DOWN}{DOWN}{DOWN}{ENTER}"
$toolbartitle = "{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}"

English: The Quick Launch bar is created, doesn't move to the left
French: The Quick Launch bar is created (one not twice... you're progressing) , doesn't move to the left

Why you do NOT check it yourself?

Regards

Edited by coucou, 24 January 2011 - 11:27 AM.


#74
myselfidem

myselfidem

    Member

  • Member
  • PipPipPipPipPipPipPipPip
  • 2,515 posts
  • Joined 06-January 10
  • OS:Windows 7 x64
  • Country: Country Flag
OK coucou!

I've made the changes you ask me!

Here is the new file working for me with French version (tested from my desktop):

For testing:
Quick_Launch.zip

Regards

*Edit: I've also made a new one: QuickLaunch.exe with some changes! Works fine for me (from my Desktop=languages include)


$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "PreferredUILanguages")
If @error = 0 Then ; registry ValueName exist
Else ; registry ValueName NOT exist
$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages")
EndIf
$text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]"
$path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\"
$toolbartext = "{DOWN}{DOWN}{DOWN}{ENTER}"
$toolbartitle = "{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}"


Func _TaskToolbarWin7($path)
MouseClick("right", 0, @DesktopHeight)
Send("{DOWN}{RIGHT}{UP}{ENTER}")
WinActive($title)
sleep(1000)
ControlSetText($title, "", "Edit1", $path)
sleep(1000)
ControlClick($title, "", "Button1")
EndFunc ;==>_TaskToolbarWin7



*Edit 2: Tested with silent install QuickLaunch.exe. Works really fine for me (languages include).

Edited by myselfidem, 24 January 2011 - 12:17 PM.

For Windows 7 OS: SetProductKey.rar (fr-FR/en-US. Integrate keys).

#75
coucou

coucou

    Friend of MSFN

  • Member
  • PipPipPipPipPip
  • 864 posts
  • Joined 01-January 04
OK myselfidem,

Tested both QuickLaunch.au3 and QuickLaunch_INT.au3
English: The Quick Launch bar is created, doesn't move to the left
French: The Quick Launch bar is created , doesn't move to the left

It certainly not move to the left because my LangBar is set.

Anyway, i still use mine unless I update the registry
Regards




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users