Форум: "WinAPI";
Текущий архив: 2002.10.07;
Скачать: [xml.tar.bz2];
ВнизПроблема с LVM_GETITEM. Найти похожие ветки
← →
Renard (2002-08-21 21:46) [0]Для получения списка из ListView я использую следующий код:
ListBox1.Clear;
hMap := CreateFileMapping($FFFFFFFF,nil,PAGE_READWRITE,0,1024,"MyFile");
pMap := MapViewOfFile(hMap, FILE_MAP_ALL_ACCESS, 0, 0, 0);
pItem := pMap;
with pItem^ do
begin
mask := LVIF_STATE or LVIF_TEXT;
pItem^.iSubItem := 0;
stateMask := LVIS_SELECTED;
pszText := Ptr(Integer(pMap) + Sizeof(TLVItem));
cchTextMax := 255;
iImage := 0;
lParam := 0;
end;
hWnd := FindWindow(nil, "My Computer");
hWnd := FindWindowEx(hWnd, 0, "SHELLDLL_DefView", nil);
hWnd := FindWindowEx(hWnd, 0, "SysListView32", nil);
Cnt := SendMessage(hWnd, LVM_GETITEMCOUNT, 0, 0);
for K := 0 to Cnt - 1 do
begin
pItem^.iItem := K;
n:=SendMessage(hWnd, LVM_GETITEM, k, Integer(pItem));
ListBox1.Items.Add(pItem^.pszText);
end;
UnmapViewOfFile(pMap);
CloseHandle(hMap);
В win95 он работает отлично, а вот в win2k выдает ошибку типа: Memory can not be read".
Подскажите пожалуйста в чем моя ошибка и как ее исправить.
Заранее багодарен.
← →
Suntechnic (2002-08-22 08:06) [1]Вообще-то странно, что этот код по Win95 работает. По идеи он и там не должен работать... проблема в том, что данные находятся в контексте другого процесса. И адрес той структуры, которую ты передаешь последним параметром
SendMessage(hWnd, LVM_GETITEM...
неимеет никакого смысла в контексте того процесса. Это общепринятая ошибка и решается она путём внедрения в адресное пространство другого процесса. Хорошо об этом у Рихтера написано и даже, если мне не изменяет память с аналогичным примером.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.10.07;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c