Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не работает LVM_GETITEMTEXT


***_Diman_*** ©   (2005-08-02 07:50:00) 

сабж. уже третий день бьюсь и всё без толку. код такой (Цэ):

INT  i;
LVITEM lvi;

i = SendMessage(ListView1,LVM_GETITEMCOUNT,NULL,NULL);
while (i != 0)
{
SendMessage(ListView1,LVM_GETITEMTEXT,WPARAM(i),LPARAM(&lvi);
MessageBox(0,lvi.pszText,TEXT("text"),MB_OK);
i--;
}
плюс ко всему - как отловить WM_LBUTTONDBLCLICK на ListView?


***_Diman_***   (2005-08-02 10:28:00) [1]

Окей, спасибо!


begin...end   (2005-08-02 08:52:00) [2]

> ***_Diman_***   (02.08.05 7:50)

1. Структуру LVITEM нужно инициализировать. В частности, должна быть выделена память для буфера, который будет принимать текст. Обо всём этом можно узнать из справки или MSDN (см. описание сообщения LVM_GETITEMTEXT или макроса ListView_GetItemText).

2. LVM_GETITEMCOUNT возвращает число элементов. Однако индекс последнего элемента будет меньше количества элементов на единицу, потому что их индексация начинается с нуля. В Вашем коде это не учтено.

3. Си я уже основательно позабыл, поэтому написал и привожу рабочий (на первый взгляд) код на Delphi:

const
 MaxLength = 255; // Взято совершенно "с потолка"
var
 I: Integer;
 Item: LV_ITEM;
begin
 I := SendMessage(ListView.Handle, LVM_GETITEMCOUNT, 0, 0);
 if I > 0 then
 begin
   GetMem(Item.pszText, MaxLength);
   try
     Item.cchTextMax := MaxLength;
     Item.iSubItem := 0;
     repeat
       Dec(I);
       Item.iItem := I;
       SendMessage(ListView.Handle, LVM_GETITEMTEXT, I, Integer(@Item));
       MessageBox(0, Item.pszText, 'Text', MB_OK);
     until I = 0;
   finally
     FreeMem(Item.pszText)
   end
 end
end.


Наверх

Титульная страница Поиск, карта сайта Написать письмо