VB中的跳出过程EXIT SUB,跳出函数EXIT FUNCTION ,
结束程序END,这些功能在DELPHI里面有没有,有的话请给出语句。
还有ON ERROR RESUME NEXT和ON ERROR GOTO 在DELPHI中有没有类似的语句?

解决方案 »

  1.   

    有EXIT。。直接跳出程序
    也有end。。但比较和BEGIN配对
    至于错误方面。DELPHI是面向对象的。。用的是TRYFINALLY
    procedure Tclientform.suiButton1Click(Sender: TObject);
    var   bmp1:TBitmap;
         jpg1:TJpegImage;
    begin
      clientdm.OpenPictureDialog1.DefaultExt:=GraphicExtension(TJpegimage);
      if clientdm.OpenPictureDialog1.Execute then
         begin
         bmp1:=TBitmap.Create;
         jpg1:=TJpegImage.Create;
         try
         jpg1.LoadFromFile(clientdm.OpenPictureDialog1.FileName);
         bmp1.Assign(jpg1);
         suidbImage1.Picture.Bitmap.Assign(bmp1);
         finally
         jpg1.Free;
         bmp1.Free;
         end;
        end;
    end;
      

  2.   

    有exit。。也有end但比较和begin配对
    至于错误处理方面DELPHI和JAVA、C#相似。。用的是TRYFINALLY
      

  3.   

    函数跳出Exit
    异常处理:try...except...end
    一般很少用goto
      

  4.   

    Exit不是只能跳出最近一级的结构吗?比如在WHILE里就跳出WHILE,不能直接跳出过程啊?
      

  5.   

    Exit是跳出当前过程或函数,如在循环中跳出,请用Break
      

  6.   

    Exit 跳出一个方法,过程,不是跳出while,for
      

  7.   

    还有一个问题:同一UNIT中A函数中调用B函数,那么B必须写在A的上面吗(否则的话编译不成功)?
    如果是这样的话,那么A和B相互调用该怎么办。
      

  8.   

    欢迎加入DELPHI 程序员群 1805366 参加技术讨论  !!
      

  9.   

    Break 跳出循环
    Exit 跳出过程或函数并返回到调用处
    Abort 终止过程或函数,不返回调用处
    try
    except
     出错后执行代码,还可以根据错误类型选择招待代码 On E: Exception do ....
    end;
      

  10.   

    var
      Form1: TForm1;
      function A(..):String  //声明一下就行了
      function B(..):String  //声明一下就行了implementation
      

  11.   

    TrouGer(超哥) ( ) 信誉:100  2005-07-07 12:18:00  得分: 0  
     
     
       还有一个问题:同一UNIT中A函数中调用B函数,那么B必须写在A的上面吗(否则的话编译不成功)?
    如果是这样的话,那么A和B相互调用该怎么办。
    ===========================================
    delphi与C不一样,在同一单元中不同函数没有先后顺序  
     
      

  12.   

    我用了TRY 。。FINALLY,为什么EXIT没有跳出过程,而去了FINALLY后面,有什么办法可以解决
      

  13.   

    TRY 
    FINALLY
     //无论有没有出错,都要执行
    ENDTRY
    EXCEPT
    //出错后才执行
    END
      

  14.   

    try
      ... ...
      a:=power(-1,0.5)
      ... ...
    except
      
    end;出错后说‘无效的浮点值指针操作’,然后中断。
    怎么样才能像ON ERROR RESUME NEXT一样的忽略错误呢?
      

  15.   

    try
      ... ...
      a:=power(-1,0.5)
      ... ...
    except
      
    end;
    就行了
    在IDE中运行会报错误,脱离后不会报错误的, on error resume next 只能用这种方式处理
      

  16.   

    try
      ... ...
      a:=power(-1,0.5)
      ... ...
    except
      
    end;
    就行了
    在IDE中运行会报错误,脱离后不会报错误的, on error resume next 只能用这种方式处理
    ==================================================================================
    我想要的是发生错误后忽略,继续执行下一句,而不是结束过程;
    而且上述代码发生错误并结束过程后,错误消息还在,当返回到调用该过程的过程后,还是出错。
    这怎么回事啊?
      

  17.   

    Exit
    try
    ......
    except
    end;