请教结构化异常处理方式有哪几种,是不是try-excepyt,try-except-finally,try-finally三种?delphi中调试用的快捷键有什么?

解决方案 »

  1.   

    try-except,try-finally
    没有try-except-finally
    支持嵌套F8, F7, F4, Ctrl+F2, ...
      

  2.   

    能不能举出嵌套的一个简单例子,另外F8,F7,F4,ctrl+F2是不是同一个作用??望解答,谢谢拉
      

  3.   

    Function xzhydmgc(var HYDM:String):TModalResult;
    begin
      With TfrmxzHydm.Create(Application) do
      begin
        try
          With Query1 do
          begin
            Close;
            SQL.Clear;
            SQL.Add('Select HYDM,HYMC from dbo.HYDMB ');
            SQL.Add(' Where DPYFLAG = '''+'是'+''' Order by HYDM');
            Open;
            FieldByName('HYDM').Visible:=False;
          end;
          AdjustFieldsTitle(Query1,'HYDMB');
          Result:=ShowModal;
          HYDM:=Query1.FieldByName('HYDM').AsString;
        finally
          free;
        end;
      end;
    end;
      

  4.   

    F7和F8都是单步执行,前者要跟踪进入函数体,后者不进入。Ctrl+F2就是关闭正在调试的程序,F4好像没有试验过
      

  5.   

    try ...finally 可以保证即使发出错误,仍然能执行finally 后的语句部分
      

  6.   

    try ...finally 可以保证正确或错误,仍然能执行finally 后的语句部分
    try-except发出错误后,执行except后的语句。
      

  7.   

    try-except-end
    try-finally-end
    F8, F7, F4, Ctrl+F2,Ctrl+F7(取SQL语句)
      

  8.   

    up
    try-except-end
    try-finally-end
    F8, F7, F4, Ctrl+F2,Ctrl+F7
      

  9.   

    1. try-excepyt,或嵌套
    2. try-finally,或嵌套
    3. try-except-finally,或嵌套
    4. try-finally-except,或嵌套
    5. 设置断点,按F8, 逐行调试
    6. 设置断点,按F7, 逐行调试并跟踪函数
    5. 设置断点,按F5,取得变量值