回 帖 发 新 帖 刷新版面

主题:大家来看看这样能行吗???

var
  s:shortint;
 t:boolean;

case s of
1:begin
    ....
  end;
2:begin
    ....
  end;
3:begin
    if t then
      调用1
    else
      调用2
  end;

如何写这样的代码;;;能调用吗///

常量3调用1或2...如何调用呢..

帮帮忙啊,高手..

回复列表 (共2个回复)

沙发

做为分支结构,互相都不存在调用问题,如果想调用,就要将要调用的分支结构1和2设计成函数或过程的形式。虽然用Goto能达到在3中调用1或2的目的,但不符合过程化的设计思想,不建议这样做。

板凳

当然能这样写啊,为什么不能这样写呢?那跟写成下面这样有什么区别呢?
if number=1 then
else
if number=2 then
else 
if number=3 then
begin
  if t then
    call proc1
  else
    call proc2
end

我来回复

您尚未登录,请登录后再回复。点此登录或注册