не могу справиться с ListView

← →
Perf2k2 © (2006-06-08 10:29) [0]

Всем привет. Опять я :)
Имеется LisView. Заполненный из базы (vsReport). Нужно сделать так, чтобы при выборе определенной записи, ее данные появлялись в 4-х лейблах. Пытаюсь так:
procedure TfrmBidEdit.LVContactsSelectItem(Sender: TObject; Item: TListItem; Selected: Boolean); begin lblContDate.Caption := Item.SubItems[1].Text; end;
Но не получается :( То есть значения больше никак и не достать оттуда? Ка-же тогда к определенному SubItem"у обращаться? Почитал хелп, ничего не нашел...

← →
ЮЮ © (2006-06-08 10:54) [1]

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 := "";

← →
Perf2k2 © (2006-06-08 11:04) [2]

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

← →
ЮЮ © (2006-06-08 11:11) [3]

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

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

TListItem.SubItems: TStrings;

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

Спасибо!

не могу справиться с ListView Найти похожие ветки