Selected row in a Tlistview

[torbente]

I have a tlistview with this properties:

viewstyle:= vsreport
rowselect := true
Multiselect := false

How i can get the the selected row?

Thanks in advance

[Mike.Cornflake]

Just tested.  ListView.ItemIndex works for me under Windows.

[mangakissa]

Isn't TListview.Selected the more proper way?

Code: [Select]

var Item : TListItem;
begin
  Item := Listview1.selected;
  showmessage(Item.text);
end;


[torbente]

Both worked, thanks.

Im very new to listviews, im playing with them just now, i used stringgrids in the past, but listviews looks more indicate for some tasks i need add.

How is the access to a specified string? stringgrids uses grid.cells , are there something like that in listviews?

Again, thanks a lot.

[wp]

Yes, that's more compliated than with a StringGrid. But the ListView is worth learning because it is very close to the TreeView which can be very, very important:

The rows that you see in a TListView are TListItems. The "caption" of a TListItem appears in the first column. Each ListItem can have SubItems which appear in the subsequent columns.

To create the strings you use

Code: [Select]

var
  item: TListItem;
...
  item := Listview1.Items.Add;  // this creates a ListItem and adds it
  item.Caption := 'Text of 1st column';
  item.SubItems.Add('Text of 2nd column');  // SubItems is a "stringList" --> use "Add"
  item.SubItems.Add('Text of 3rd column');

To modify the string in the n-th column of ListItem with Index I you use (not tested - no guarantee...)

Code: [Select]

var
  item: TListItem;
begin
  item := Listview1.Items[I];
  if n = 0 then
    item.Caption := 'New text'
  else
  if n < ListView1.Items.Count-1 then
    Item.SubItems[n-1] := 'New text'
  else
    raise Exception.Create('This column does not exist');


[torbente]

I got it! Learning fast! Thanks!