try.........
  
except
    on E: Exception do
    begin
      showmsgDlg(FrmMain.ssmmsg, [mbok], mtinformation, E.Message);
///怎么样捕获 Exception 的错误号 ,允许E.Message 为可以判断出显示预想的提示。
    end;
end;