如何把动态数组中的数据转到表中 (200分)

请教高手：
如何把动态数组中的数据转到表中
举个例子好不好！

ListView1.Checkboxes := True;
if ListView1.Items[0].Checked then
...

give you up! that's ok

什么意思，清楚些

我是想做成类似windows资源管理器那样的风格，左边是个TreeView 右边是个ListView ！
而在ListView中可以实现任意选择，在任意选择后，可以得到被选择项的唯一的ItemIndex
或者Index属性值，从而可以对所选择项进行操作！
当选择单项或着连续的多项时，我可以取得其ItemIndex或着Index值，但是当选择
不规则的多项时，我没有办法取得其ItemIndex的值!
大致代码如下 ：
(其中 (Sender as TListView).Items[SelIndex].SubItems.Strings[3] 对应数据库中一个
唯一的ID号)


procedure TMainForm.ListViewSelectItem(Sender: TObject; Item: TListItem;
Selected: Boolean);
var i,SelCount,SelIndex : integer;
ArrayI: Array of Integer;
begin
Selcount:=(Sender as TListView).SelCount;
setLength(ArrayI,Selcount);
SelIndex := (Sender as TListView).ItemIndex;
for i:=0 to Selcount-1 do
begin
ArrayI:=strtointdef((Sender as TListView).Items[SelIndex].SubItems.Strings[3],0);
SelIndex:=SelIndex+1;
end;
end;
高手在哪里急救~~~~~~~~~~~~~~~~~~~~~[red][/red]

代码:

[][][?][?][]

用ListView的GetNextItem方法

多人接受答案了。