我有一个包含 3 列的 Tlistview,我需要来自 Tcollection 对象,如下所示
FListeDispoProduit := TListeDispoProduit.Create(TProduit);
with (FListeDispoProduit) do
begin
with TProduit(Add) do
begin
Name := 'Produit 01';
CIP := 'A001';
StockQty := 3;
end;
但是当我尝试将此对象放入 Tlistview 时,仅填充第一列(名称)我写了这个:
for i := 0 to FListeDispoProduit.Count -1 do
Tlistview1.Items.Insert(i).Caption := TProduit(FListeDispoProduit.Items[i]).Name;
我需要填写这 3 列(名称、cip、StockQty),我该怎么做?
谢谢你。
希望我清楚。