51Testing软件测试论坛

标题: 关于Delphi6中的if语句 [打印本页]

作者: delphi爱好者    时间: 2010-4-12 10:58
标题: 关于Delphi6中的if语句
在Delphi6中定义一个数组ary中存放十个内容,为‘合格’或者‘不合格’,想实现的功能为:若数组中全部为合格则hege为true,若数组中有一项为不合格,则hege为false,然后退出。我下面的语句对吗,为什么if后面的语句不执行,程序直接跳出呢。
for i:=0 to 9 do
begin
  if ary='合格' then
    hege:=true;
  if ary='不合格' then
  begin
    hege:=false;
    exit;
  end;
end;
问题补充:在for语句上打上断点,按f8执行,如果我的ary数组中全部为‘合格’,则当执行到:if ary='合格' then
这一语句时,也不执行hege:=true;,而是直接执行else语句,也不执行hege:=false;语句,接着循环一遍,以此类推,一直执行九遍,但从未给hege赋值。想实现这一功能该怎样写,急需答案,谢谢各位。


[ 本帖最后由 delphi爱好者 于 2010-4-12 11:02 编辑 ]




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2