[轉貼]DEVEXPRESS組件XtraEditor的本地化(漢化)

XtraEditors的漢化,
VB.NET
Imports DevExpress.XtraEditors.Controls.Localizer
Imports DevExpress.XtraEditors.ViewInfo
Imports DevExpress.XtraEditors.Controls
Public Class XtraImagesEdit_CN
    Inherits DevExpress.XtraEditors.Controls.Localizer
    Public Overrides ReadOnly Property Language() As String
        Get
            Return "簡體中文"
        End Get
    End Property

    Public Overrides GetLocalizedString(ByVal id As DevExpress.XtraEditors.Controls.StringId) As String
        Select Case id
            Case StringId.None
                Return ""
            Case StringId.Capti
                Return "錯誤"
            Case StringId.InvalidText
                Return "非法值"
            Case StringId.CheckChecked
                Return "選中"
            Case StringId.CheckUnchecked
                Return "未選中"
            Case StringId.CheckIndeterminate
                Return "Indeterminate"
            Case StringId.DateEditToday
                Return "今天"
            Case StringId.DateEditClear
                Return "清除"
            Case StringId.OK
                Return "&OK"
            Case StringId.Cancel
                Return "&Cancel"
            Case StringId.NavigatorFirstButtonHint
                Return "首個"
            Case StringId.NavigatorPreviousButtonHint
                Return "上一個"
            Case StringId.NavigatorPreviousPageButtonHint
                Return "上一頁"
            Case StringId.NavigatorNextButtonHint
                Return "下一個"
            Case StringId.NavigatorNextPageButtonHint
                Return "下一頁"
            Case StringId.NavigatorLastButtonHint
                Return "最後"
            Case StringId.NavigatorAppendButtonHint
                Return "增加"
            Case StringId.NavigatorRemoveButtonHint
                Return "刪除"
            Case StringId.NavigatorEditButtonHint
                Return "編輯"
            Case StringId.NavigatorEndEditButtonHint
                Return "結束編輯"
            Case StringId.NavigatorCancelEditButtonHint
                Return "中斷編輯"
            Case StringId.NavigatorTextStringFormat
                Return "記錄 {0} 至 {1}"

            Case DevExpress.XtraEditors.Controls.StringId.PictureEditMenuCopy
                Return "複製"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditMenuCut
                Return "剪下"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditMenuDelete
                Return "刪除"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditMenuLoad
                Return "開啟"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditMenuPaste
                Return "粘貼"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditMenuSave
                Return "儲存"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditOpenFileError
                Return "開啟錯誤!"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditOpenFileErrorCaption
                Return "開啟錯誤!"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditOpenFileFilter
                Return "圖形檔案(*.jpg)|*.jpg|所有圖形檔案(*.*)|*.*"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditOpenFileTitle
                Return ""
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditSaveFileFilter
                Return "PNG檔案(*.png)|*.png|GIF檔案(*.gif)|*.gif|JPEG檔案(*.jpg)|*.jpg"
            Case DevExpress.XtraEditors.Controls.StringId.PictureEditSaveFileTitle
                Return ""
            Case DevExpress.XtraEditors.Controls.StringId.OK
                Return "確定"
            Case DevExpress.XtraEditors.Controls.StringId.Cancel
                Return "取消"
            Case DevExpress.XtraEditors.Controls.StringId.XtraMessageBoxOkButtonText
                Return "確定"
            Case DevExpress.XtraEditors.Controls.StringId.XtraMessageBoxCancelButtonText
                Return "取消"
            Case DevExpress.XtraEditors.Controls.StringId.XtraMessageBoxNoButtonText
                Return "否"
            Case DevExpress.XtraEditors.Controls.StringId.TextEditMenuCopy
                Return "複製"
            Case DevExpress.XtraEditors.Controls.StringId.TextEditMenuCut
                Return "剪下"
            Case DevExpress.XtraEditors.Controls.StringId.TextEditMenuDelete
                Return "刪除"
            Case DevExpress.XtraEditors.Controls.StringId.TextEditMenuPaste
                Return "粘貼"
            Case DevExpress.XtraEditors.Controls.StringId.TextEditMenuSelectAll
                Return "全選"
            Case DevExpress.XtraEditors.Controls.StringId.TextEditMenuUndo
                Return "取消"
            Case StringId.LookUpEditIsNull
                Return "[無資料]"
            Case StringId.LookUpInvalidEditType
                Return "非法資料類型."
            Case StringId.MaskBoxValidateError
                Return "The entered is incomplete. Do you want to correct it?" & Microsoft.VisualBasic.Chr(13) & "" & Microsoft.VisualBasic.Chr(10) & "" & Microsoft.VisualBasic.Chr(13) & "" & Microsoft.VisualBasic.Chr(10) & "Yes - return to the editor and correct the ." & Microsoft.VisualBasic.Chr(13) & "" & Microsoft.VisualBasic.Chr(10) & "No - leave the as is." & Microsoft.VisualBasic.Chr(13) & "" & Microsoft.VisualBasic.Chr(10) & "Cancel - reset to the previous ." & Microsoft.VisualBasic.Chr(13) & "" & Microsoft.VisualBasic.Chr(10) & ""
            Case StringId.UnknownPictureFormat
                Return "未知映像格式!!"
            Case StringId.DataEmpty
                Return "無映像"
            Case StringId.NotValidArrayLength
                Return "Not valid array length."
            Case StringId.ImagePopupEmpty
                Return "(空)"
            Case StringId.ImagePopupPicture
                Return "(映像)"
            Case StringId.ColorTabCustom
                Return "Custom"
            Case StringId.ColorTabWeb
                Return "Web"
            Case StringId.ColorTabSystem
                Return "System"
            Case StringId.CalcButtonMC
                Return "MC"
            Case StringId.CalcButtonMR
                Return "MR"
            Case StringId.CalcButtonMS
                Return "MS"
            Case StringId.CalcButtonMx
                Return "M+"
            Case StringId.CalcButtonSqrt
                Return "sqrt"
            Case StringId.CalcButtonBack
                Return "Back"
            Case StringId.CalcButtonCE
                Return "CE"
            Case StringId.CalcButtonC
                Return "C"
            Case StringId.CalcError
                Return "Calculation Error"
        End Select

        Return ""
    End

End Class