怎么才能截取程序运行的错误，并加上自己写的提示信息。用try...except..可以吗？

Question

Try
  程序段；
except
  ShowMessage（‘不能连接到数据库，请检查网络状况’）；
end;

Answer 1

如zhouzm(泰兴的低能儿) 所示：
你也可以根据不同错误加上不同信息：
如：Try
  程序段；
except
  On ......//系统的异常类型标识, ShowMessage（‘你的信息’）；
end;

Answer 2

用try..except当然可以但是要在运行exe文件时才会出来你自己的提示，在程序中直接用F9运行时不行的

Answer 3

try
   .......
  except
     on E: Exception do
        begin
           ErrorMessage := string(E.Message);
           li_return := -1;
        end;
  end;

Answer 4

try
    程序；
except
  raise exception.create('不能连接到数据库，请检查网络状况!')；
//这样可以在弹出的对话框左侧部分看到一个显眼的标志：一个红叉叉！
end;

Answer 5

try
   .......
  except
     on E: Exception do  //这里Exception可以写具体的异常类型，不同的函数产生不同的异常，具体你参考函数的Ｆ１帮助。
        begin
           ErrorMessage := string(E.Message);
           li_return := -1;
        end;
  end;

Answer 6

wolfAone(¤一步一步网上爬¤) 能举个离子吗？