Изменить положение элементов рабочего стола

void __fastcall TForm1::Button1Click(TObject *Sender)
{
HWND hwndRemoteSysListView;//=(HWND)0x0001008C;
// Ищем SysListView32 рабочего стола
hwndRemoteSysListView = GetWindow(GetWindow(FindWindow("ProgMan",NULL),GW_CHILD),GW_CHILD);
int nItemCount = ListView_GetItemCount(hwndRemoteSysListView);
ULONG dwProcessID;
GetWindowThreadProcessId(hwndRemoteSysListView, &dwProcessID);
if(dwProcessID == 0)
        {
        ShowMessage("Не удается найти процесс");
        return;
        }
HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, TRUE, dwProcessID);
if(hProcess == 0)
        {
        ShowMessage("Не удается открыть процесс");
        return;
        }
char*pszText = (char*)VirtualAllocEx(hProcess,NULL,255,MEM_COMMIT|MEM_TOP_DOWN,PAGE_READWRITE);
LV_ITEM lviRemoteLVItem;
PLVItem plviRemoteLVItem=NULL;
char svText[256];
// Выделяем в нем память под структуру LVITEM
plviRemoteLVItem = (PLVItem)VirtualAllocEx(hProcess, NULL, sizeof(LV_ITEM),MEM_COMMIT|MEM_TOP_DOWN,PAGE_READWRITE);
// Заполняем структуру
ZeroMemory(&lviRemoteLVItem, sizeof(LV_ITEM));
lviRemoteLVItem.mask = LVIF_TEXT;
lviRemoteLVItem.pszText = pszText;
lviRemoteLVItem.cchTextMax= 255;
ULONG dwBytesWriten;
WriteProcessMemory(hProcess, plviRemoteLVItem, &lviRemoteLVItem, sizeof(LV_ITEM),&dwBytesWriten);
 
for(int i=0;i<nItemCount;i++)
        {
        // Отправляем сообщение с указателем на выделенный буффер под LVITEM
        int nTextLength = SendMessage(hwndRemoteSysListView, LVM_GETITEMTEXT,i, (int)plviRemoteLVItem);
        // Читаем результат
        ZeroMemory(svText,255);
        ReadProcessMemory(hProcess, lviRemoteLVItem.pszText,svText, nTextLength, &dwBytesWriten);
        //ListBox1->AddItem(svText,NULL);
        String str=svText;
        str=str.LowerCase();
        if(str.Pos("документы"))
                {
                ListView_SetItemPosition(hwndRemoteSysListView,i,Screen->Width/2,Screen->Height/2);
                }
        }
 
}
//---------------------------------------------------------------------------