for I=1 to listview1.selcount -1 do
....
....
解决方案 »
- delphi 修改注册表的问题
- SQL数据表变量
- 问题有点弱!!!如何对DBGIRD中的某列数据进行求和运算
- 如何将剪切板中的bmp数据直接保存为bmp文件?(100f分问题)
- 在Delphi中如何调用C语言的Dll?
- 李维的《SOAP/WEB SERVICES》书中的第十章第一个例子,运行出现错误
- 如何将表1中所有产品代码为101的记录的价格值汇总求和然后赋值给表2的某一行的总金额?
- 在调用DLL的模块中,如果要在程序运行后才知道DLL的个数和文件名,那声明处的声明怎么处理?
- 如何对一个foxpro中的表进行排序?
- 我想找有关delphi4支持的SQL函数的有关资料。
- 各位男俠女俠,我現將九陽真經公布,以示切磋之意...
- 请教随机函数的用法
....
....
....
for I := ListView.Items.Count - 1 downto 0 do
begin
if Listview.Items[I].Selected then
begin ....
end;
end;
void __fastcall TCDForm::BitBtn2Click(TObject *Sender)
{
// ListView1->Items->Delete(ListView1->Selected->Index);
TItemStates selected = TItemStates() << isSelected;
TListItem *Item2;
TListItem *Item = ListView1->Selected;
while (Item){
Item2 = ListView1->GetNextItem(Item, sdAll, selected);
ListView1->Items->Delete(Item->Index);
Item = Item2;
}
}
begin
if listview1.Items.Item[i].Selected then listview1.Items.Item[i].Delete;
end;