SysListView32 - bei dem Prog TweakUI

pixo

Hallo!

Ich habe folgende Herausfordergung:

In möchte das Programm TweakUI automatisch konfigurieren. Beim Auswählen bzw. UnChecken der Checkboxen habe ich meine Probleme.

Nach dem Starten von TweakUI sollen unter Desktop alle Items (Arbeitsplatz, Eigene Dateien, Internet Explorer...) deaktiviert werden.

[Blockierte Grafik: http://i33.tinypic.com/2612omt.jpg]

Ich habe bereits mit ControlCommand und ControlListView versucht das zu realisieren, leider ohne Erfolg...es passiert einfach nichts, auch keine Fehlermeldung.

[autoit]

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
WinWaitActive("Tweak UI", "")
ControlTreeView( "Tweak UI", "", "SysTreeView321", "Select", "Desktop")
ControlListView( "Tweak UI", "", "SysListView321", "DeSelect", 1, 4)
ControlListView("Tweak UI", "", "SysListView321", "DeSelect", 0, 0)
ControlListView("Tweak UI", "", "SysListView321", "SelectClear")
MsgBox(0, "", ControlListView("Tweak UI", "", "SysListView321", "GetText", 1, 0))

[/autoit]

Auslesen mit ControlListView fuktioniert siehe MsgBox, nur deaktivieren schaffe ich nicht.

Hatt das schonmal jemand versucht, oder einen Tipp für mich?

Gruß Pixo

**Schnitzel**

Also ich würde nicht den Umweg über Tweak UI gehen.
Das sind ganz einfache Registry-Keys die geändert werden müssen.
Siehe hier:
http://www.winfaq.de/faq_html/Conte…p?h=tip1393.htm

Bitboy

Die Funktionen von AutoIt arbeiten nicht mit den Steuerlementen SysTreeView und SysListView zusammen.

Gibt auch schon einen Bug-Report/Feature Request dazu: http://www.autoitscript.com/trac/autoit/ticket/1607

In dem Beitrag ist auch ein Link. Vielleicht funktioniert die Lösung ja auch bei dem Control.

**funkey**

Hab mal die Änderung der Registrywerte umgesetzt.

Spoiler anzeigen

[autoit]

Local $Papierkorb = "{645FF040-5081-101B-9F08-00AA002F954E}"
Local $InternetExplorer = "{871C5380-42A0-1069-A2EA-08002B30309D}"
Local $Netzwerkumgebung = "{208D2C60-3AEA-1069-A2D7-08002B30309D}"
Local $EigeneDateien = "{450D8FBA-AD25-11D0-98A8-0800361B1103}"
Local $Arbeitsplatz = "{20D04FE0-3AEA-1069-A2D8-08002B30309D}"

[/autoit] [autoit][/autoit] [autoit]

Local $RegKeyName = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu"
Local $Hide = 1

[/autoit] [autoit][/autoit] [autoit]

RegWrite($RegKeyName, $Papierkorb, "REG_DWORD", $Hide)
RegWrite($RegKeyName, $InternetExplorer, "REG_DWORD", $Hide)
RegWrite($RegKeyName, $Netzwerkumgebung, "REG_DWORD", $Hide)
RegWrite($RegKeyName, $EigeneDateien, "REG_DWORD", $Hide)
RegWrite($RegKeyName, $Arbeitsplatz, "REG_DWORD", $Hide)

[/autoit]