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

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

не могу справиться с ListView [D7, XP]


Perf2k2 ©   (2006-06-08 10:29:00) 

Всем привет. Опять я :)
Имеется LisView. Заполненный из базы (vsReport). Нужно сделать так, чтобы при выборе определенной записи, ее данные появлялись в 4-х лейблах. Пытаюсь так:
procedure TfrmBidEdit.LVContactsSelectItem(Sender: TObject;
 Item: TListItem; Selected: Boolean);
begin

lblContDate.Caption := Item.SubItems[1].Text;

end;

Но не получается :( То есть значения больше никак и не достать оттуда? Ка-же тогда к определенному SubItem'у обращаться? Почитал хелп, ничего не нашел...


Perf2k2   (2006-06-08 11:28:00) [1]

Спасибо!


ЮЮ   (2006-06-08 11:11:00) [2]

>выдает ошибку "record, object or class type required".

Издеваешься? Ошибки компиляции уж самому надо научиться искать:

TListItem.SubItems: TStrings;

Следовательно
 blContDate.Caption := Item. SubItems[0];


Perf2k2   (2006-06-08 11:04:00) [3]

Все-равно не канает - на строке lblContDate.Caption := Item.SubItems[0].Text;выдает ошибку "record, object or class type required".


ЮЮ   (2006-06-08 10:54:00) [4]

type TLVSelectItemEvent = procedure(Sender: TObject; Item: TListItem; Selected: Boolean) of object;

Sender is the list view object in which an item has been selected or unselected.

Item is the item that has been selected or unselected.

Selected is True if the item has been selected; selected is False if the item has been unselected.


If Selected theb
 blContDate.Caption := Item.SubItems[1].Text
else
 blContDate.Caption := '';


Наверх

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