书上是这么写的,但我感觉缺少currentitem的声明,不知道怎么搞,因为缺少光盘 begin Bookbasket.items.clear; for i=0 to booklib.Items.Count-1 do begin currentitem:=booklib.item[i];//currentitem指向第i本书 if currentitem.checked then //若第i本书被选择 begin newitem:=bookbasket.items.add; //选进购书篮 newitem.caption:=currentitems.subitems[1]; //显示书名 newitem.imagindex:=currentitem.imageindex; //设置图标索引 newitem.subtems.add(currentitem.subtems[3]); //显示价格 newitem.subtems.add(currentitem.subtems[0]); //设置作者 newitem.subtems.add(currentitem.subtems[2]); //设置出版社 end; end;
var currentitem, newitem: TListItem;你提的问题有点问题,这应该不叫“指针”吧?
listview.itemindex;就这两个够了...
begin
Bookbasket.items.clear;
for i=0 to booklib.Items.Count-1 do
begin
currentitem:=booklib.item[i];//currentitem指向第i本书
if currentitem.checked then //若第i本书被选择
begin
newitem:=bookbasket.items.add; //选进购书篮
newitem.caption:=currentitems.subitems[1]; //显示书名
newitem.imagindex:=currentitem.imageindex; //设置图标索引
newitem.subtems.add(currentitem.subtems[3]); //显示价格
newitem.subtems.add(currentitem.subtems[0]); //设置作者
newitem.subtems.add(currentitem.subtems[2]); //设置出版社
end;
end;
currentitem, newitem: TListItem;你提的问题有点问题,这应该不叫“指针”吧?