Beiträge von Tweaky

  • Einfaches Skript - läuft als 32bit nicht auf 64bit

    nuts
    ne zwangsläufig muß es nicht funktionieren.
    Aber bis jetzt liefen alle (komplexere) Tools die ich mit AutoIt erstellt habe
    Warum läuft dieses simple Skript nicht :?:

    GerhardSchr
    doch es funktioniert dann immernoch

    Spoiler anzeigen
    [autoit]

    #include <GuiListView.au3>

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

    $inifile = "IconFreezer.ini"
    WinActivate("Program Manager")
    WinWaitActive("Program Manager")
    $hWnd_LV = ControlGetHandle("[CLASS:Progman]", "", "SysListView321")
    WinMinimizeAll()

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

    If Not FileExists($inifile) Then
    _SaveIcons()
    Else
    _RestoreIcons()
    EndIf

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

    Func _SaveIcons()
    FileClose(FileOpen($inifile, 2))
    For $i = 0 To _GUICtrlListView_GetItemCount($hWnd_LV) - 1
    $iconposx = _GUICtrlListView_GetItemPositionX($hWnd_LV, $i)
    $iconposy = _GUICtrlListView_GetItemPositionY($hWnd_LV, $i)
    $iconname = _GUICtrlListView_GetItemText($hWnd_LV, $i)
    IniWriteSection($inifile, $iconname, "X=" & $iconposx & @LF & "Y=" & $iconposy)
    Next
    EndFunc ;==>_SaveIcons

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

    Func _RestoreIcons()
    For $i = 0 To _GUICtrlListView_GetItemCount($hWnd_LV) - 1
    $iconpos = IniReadSection($inifile, _GUICtrlListView_GetItemText($hWnd_LV, $i))
    If IsArray($iconpos) Then
    $iconposx = _GUICtrlListView_GetItemPositionX($hWnd_LV, $i)
    $iconposy = _GUICtrlListView_GetItemPositionY($hWnd_LV, $i)
    If $iconposx <> $iconpos[1][1] Or $iconposy <> $iconpos[2][1] Then _GUICtrlListView_SetItemPosition($hWnd_LV, $i, $iconpos[1][1], $iconpos[2][1])
    EndIf
    $iconpos = 0
    Next
    EndFunc ;==>_RestoreIcons

    [/autoit]

  • Einfaches Skript - läuft als 32bit nicht auf 64bit

    Hi,
    ich bin momentan am testen von Win 7 Ultimate RC 64bit.

    Da habe ich dieses kleine Skript, welches die Desktopicons speichert und wiederherstellt.

    Spoiler anzeigen
    [autoit]

    #include <GuiListView.au3>

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

    $inifile = "IconFreezer.ini"
    WinActivate("Program Manager")
    WinWaitActive("Program Manager")
    $hWnd_LV = ControlGetHandle("[CLASS:Progman]", "", "SysListView321")

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

    If Not FileExists($inifile) Then
    _SaveIcons()
    Else
    _RestoreIcons()
    EndIf

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

    Func _SaveIcons()
    FileClose(FileOpen($inifile, 2))
    For $i = 0 To _GUICtrlListView_GetItemCount($hWnd_LV) - 1
    $iconposx = _GUICtrlListView_GetItemPositionX($hWnd_LV, $i)
    $iconposy = _GUICtrlListView_GetItemPositionY($hWnd_LV, $i)
    $iconname = _GUICtrlListView_GetItemText($hWnd_LV, $i)
    IniWriteSection($inifile, $iconname, "X=" & $iconposx & @LF & "Y=" & $iconposy)
    Next
    EndFunc ;==>_SaveIcons

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

    Func _RestoreIcons()
    For $i = 0 To _GUICtrlListView_GetItemCount($hWnd_LV) - 1
    $iconpos = IniReadSection($inifile, _GUICtrlListView_GetItemText($hWnd_LV, $i))
    If IsArray($iconpos) Then
    $iconposx = _GUICtrlListView_GetItemPositionX($hWnd_LV, $i)
    $iconposy = _GUICtrlListView_GetItemPositionY($hWnd_LV, $i)
    If $iconposx <> $iconpos[1][1] Or $iconposy <> $iconpos[2][1] Then _GUICtrlListView_SetItemPosition($hWnd_LV, $i, $iconpos[1][1], $iconpos[2][1])
    EndIf
    $iconpos = 0
    Next
    EndFunc ;==>_RestoreIcons

    [/autoit]

    Funktion:
    Wird das Skript ausgeführt und die Datei "IconFreezer.ini" existiert noch nicht, so werden die Positionen der Desktopicons in der Datei gespeichert.
    Wird das Skript nochmal ausgeführt und die "IconFreezer.ini" besteht bereits, so werden die Desktopicons an ihren ursprünglichen (gespeicherten) Ort wiederhergestellt.

    Wenn ich das Skript in 64bit kompiliere und starte wird folgende "IconFreezer.ini" erstellt. (korrekt)

    Wenn ich das Skript in 32bit kompiliere und starte wird folgende "IconFreezer.ini" erstellt. (falsch)

    Code
    []
X=44
Y=2

    So wie es aussieht erkennt AutoIt den Namen der Desktopicons nicht.
    Aber warum ?(
    Warum geht es mit 64bit und nicht mit 32bit ?(

  • AutoIt und 64bit

    So, nochmal den alten Thread rauskramen :thumbup:
    Was ist nun beim installieren auf einem 64bit besser - beim installieren "natives x64 nutzen" oder nicht ?(

    Falls es mal ein Problem mit einem x64 Programm geben sollte, kann ich es dann so kompilieren, dass es sicher unter 32bit und 64bit läuft oder brauche ich dann 2x exe ?(

  • Automatisch Hotkeys betätigen.

    Hoffe ich verstehe dich richtig.
    Meinst du vielleicht sowas?

    [autoit]

    HotKeySet("{ESC}", "Terminate")

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

    Func Terminate()
    MsgBox(0, 0, "esc wurde betätigt")
    EndFunc ;==>Terminate

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

    While 1
    Sleep(10)
    WEnd

    [/autoit]

  • 1 Button x-Löschungen

    Hier mir Hilfe eines Dummy-Controls.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    $gui = GUICreate("Dummy-Control", 100, 300)
    $Start = GUICtrlCreateDummy() ; ==> Merkt sich den Start
    $a = GUICtrlCreateButton("vorher", 10, 10)
    $b = GUICtrlCreateButton("vorher", 10, 110)
    $c = GUICtrlCreateButton("vorher", 10, 210)
    $Stop = GUICtrlCreateDummy() ; ==> Merkt sich den Stopp

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

    GUISetState()
    Sleep(2000)

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

    For $i = $Start To $Stop
    GUICtrlDelete($i)
    Next

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    EndSelect
    Sleep(10)
    WEnd

    [/autoit]

    Dadurch werden allerdings beim erstellen der Controls diese "zerrupft" und stehen nicht mehr schön untereinander

  • Fehler in der deutschen Hilfe bitte hier melden Basis: Hilfedatei 3.3.0.0 2009.12.19

    Hi,
    falls ihr beim benutzen der deutschen Hilfe Rechtschreibfehler, Formatfehler und inhaltliche Fehler solltet ihr diese dann gleich auf der Übersetzhomepage korrigieren.

    Falls ihr ihn nicht selbst ändern könnt/wollt, wäre es nett dass ihr diesen dann auch hier meldet.
    Dann können wir ihn korrigieren.

    PS: Falls ihr Ideen habt, wie man die Hilfe optimieren und vereinheitlichen kann, verwendet bitte diesen Thread