Ignore:
Timestamp:
Aug 11, 2008, 10:44:51 AM (16 years ago)
Author:
NoWest
Message:

FileNotFoundExceptionクラスを追加

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ab5.0/ablib/src/Classes/System/IO/Exception.ab

    r560 r584  
    77
    88Const AB_E_IO = &h80041620 '80131620
     9Const AB_E_FILENOTFOUND = STG_E_FILENOTFOUND '0x80070002
    910
    1011End Namespace
     
    7879End Namespace
    7980
     81
     82/*!
     83@brief  ディスク上に指定したファイル名が見つからない際の例外
     84@author NoWest
     85@date   2008/08/11
     86*/
     87Class FileNotFoundException
     88    Inherits SystemException
     89Public
     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
     114End Class
     115
    80116End Namespace 'IO
    81117End Namespace 'System
Note: See TracChangeset for help on using the changeset viewer.