Windows XP Desktop Icon coordinates

[Excalibur]

Would anyone happen to know how to get and set icon coordinates on the desktop?

[smashly]

Hi, here's the get position part

#Include <GuiListView.au3>
#include <Array.au3>

$aDeskIcon = GetIconPos()
_ArrayDisplay($aDeskIcon, "Desktop shortcut names and icon positions")


;GetIconPos() Returns an array:
;Array[0][0] = How many desktop items found
;Array[n][0] = Name of shortcut
;Array[n][1] = X position of Icon
;Array[n][2] = Y position of Icon

Func GetIconPos()
    Local $hWnd = ControlGetHandle("Program Manager", "", "[CLASS:SysListView32; INSTANCE:1]")
    If @error Then Return 0
    Dim $GIP[_GUICtrlListView_GetItemCount($hWnd)+1][3]
    If Not IsArray($GIP) Then Return 0 
    $GIP[0][0] = UBound($GIP) -1
    For $i = 1 To $GIP[0][0]
        $GIP[$i][0] = _GUICtrlListView_GetItemText($hWnd, $i -1)
        $GIP[$i][1] = _GUICtrlListView_GetItemPositionX($hWnd, $i -1)
        $GIP[$i][2] = _GUICtrlListView_GetItemPositionY($hWnd, $i -1)
    Next
    Return $GIP
EndFunc

Cheers

Edited January 24, 2008 by smashly

[MrCreatoR]

Check my app (from the signature) «Desktop Icons Restorator»

[rasim]

smashly

Hey! Nice solution! I like it! Thank you!

[Excalibur]

Awesome, I am certainly having a lot of fun with this. Can anyone say raining desktop icons? :-P. However, sometimes the application can't get the window handle to the desktop. Why is this? It can get it again if I alt+ctrl+del and kill explorer, then restart explorer.

Edit: I've found a correlation, It seems to do that when I do a "Show Desktop".

Edited January 25, 2008 by Excalibur

[Excalibur]

I found something interesting, when you [show Desktop], the title and class change for the desktop object. Please see the attached screenshot.