巧妙使用DownTo代替To

  • 主题发起人 主题发起人 import
  • 开始时间 开始时间
I

import

Unregistered / Unconfirmed
GUEST, unregistred user!
有的时候,例如:
for i:=0 to ListBox1.Items.Count-1 do
if ListBox1.Selected then
ListBox1.Items.Delete(i);
会出现错误!
用Downto 代替就行了。
for i:=listbox1.Items.Count-1 downto 0 do
if listbox1.Selected then
listbox1.Items.Delete(i);
 

Similar threads

S
回复
0
查看
896
SUNSTONE的Delphi笔记
S
S
回复
0
查看
873
SUNSTONE的Delphi笔记
S
I
回复
0
查看
895
import
I
后退
顶部