- Timestamp:
- Aug 11, 2008, 10:44:51 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/ablib/src/Classes/System/IO/Exception.ab
r560 r584 7 7 8 8 Const AB_E_IO = &h80041620 '80131620 9 Const AB_E_FILENOTFOUND = STG_E_FILENOTFOUND '0x80070002 9 10 10 11 End Namespace … … 78 79 End Namespace 79 80 81 82 /*! 83 @brief ディスク上に指定したファイル名が見つからない際の例外 84 @author NoWest 85 @date 2008/08/11 86 */ 87 Class FileNotFoundException 88 Inherits SystemException 89 Public 90 /*! 91 @biref コンストラクタ 92 */ 93 Sub FileNotFoundException() 94 SystemException(GetType().FullName) 95 HResult = ActiveBasic.AB_E_FILENOTFOUND 96 End Sub 97 /*! 98 @biref コンストラクタ 99 @param[in] message エラーメッセージ 100 */ 101 Sub FileNotFoundException(message As String) 102 SystemException(message) 103 HResult = ActiveBasic.AB_E_FILENOTFOUND 104 End Sub 105 /*! 106 @biref コンストラクタ 107 @param[in] message エラーメッセージ 108 @param[in] innerException 内部例外 109 */ 110 Sub FileNotFoundException(message As String, innerException As Exception) 111 SystemException(message, innerException) 112 HResult = ActiveBasic.AB_E_FILENOTFOUND 113 End Sub 114 End Class 115 80 116 End Namespace 'IO 81 117 End Namespace 'System
Note:
See TracChangeset
for help on using the changeset viewer.