如何检测stringlist(50分)

八

八神庵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #1

比如listbox里有下列几个字符串
abc
bcd
ddd
在这三个字符串中检测没有123则执行程序
var
I:integer;
begin
for I:= 0 to listbox.count-1 do
。。。。这段代码
如果在这里没检测到123则
label1.caption:='没有检测到123';

 

H

hhjjhhjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #2

ListBox1.Items.IndexOf('123') = -1 Then
//没有

 

G

GameSprite

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #3

if listbox.items.indexof('123') = -1 then
label1.caption:='没有检测到123';

 

木

木桩

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #4

或者自己手动查找
var
i:Integer;
isFinded:boolean;
begin
for I:= 0 to listbox.count-1 do
if listbox.Strings='123' then
begin
isFinded:=true; break;
end;

if Not(isFinded) then
label1.caption:='没有检测到123';

 

八

八神庵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #5

谢谢两位大哥

 

八

八神庵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #6

啊！三位呀，呵呵

 

八

八神庵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-05

• #7

多人接受答案了。