我想把空的都删掉,不管那项在什么位置? for i:=0 to RadioGroup1.Items.Count-1 do
begin
if (Trim(RadioGroup1.Items[i])='')then
begin
RadioGroup1.Items.Delete(i);
//i:=i-1;
end;
RadioGroup1.ItemIndex:=0 ;
end;
请问上面这段代码该怎么改啊
begin
if (Trim(RadioGroup1.Items[i])='')then
begin
RadioGroup1.Items.Delete(i);
//i:=i-1;
end;
RadioGroup1.ItemIndex:=0 ;
end;
请问上面这段代码该怎么改啊
解决方案 »
- 简单问题(30分)
- 跨网段访问数据库,三层结构
- 大家好!请问怎样让DBGrid同时显示两个数据表的内容啊??
- 累死了!如何简单些将一paradox表内数据复制到另一张表里去(两个数据表结构、字段都一样,只是文件名不同)?
- 如何判断远程计算机是否连接在网上
- 请教高手: 截获消息
- 如何得知一个DLL文件所包括的属性及方法呢
- 帮帮忙啊----想请教类似这样的网管软件实现的方法^_^
- 请问如何用Delphi程序从Excel中搜索数据,得到其所在的行列值!
- 关于Delphi下的SNMP编程,各位有什么意见或建议吗?
- 请帮忙把一个VB的函数改成DELPHI的(我改后得到的结果不正确)
- delphi中使用自定义消息传送字符串的问题
begin
if (Trim(RadioGroup1.Items[i])='')then
begin
RadioGroup1.Items.Delete(i);
//i:=i-1;
end;
RadioGroup1.ItemIndex:=0 ;
end;