本地化XtraGrid。

来源:互联网 发布:acl mac过滤 编辑:程序博客网 时间:2024/05/16 14:15

1、添加一个类,类名:XtraGrid_CN。文件名自动为:XtraGrid_CN.vb

XtraGrid_CN.vb内容如下:

Imports DevExpress.Xtragrid.Localization
Public Class XtraGrid_CN
    Inherits GridLocalizer
    'public override string GetLocalizedString(GridStringId id)
    Public Overrides Function Getlocalizedstring(ByVal id As GridStringId) As String
        Select Case id
            Case GridStringId.CardViewNewCard
                Return ""
            Case GridStringId.CardViewQuickCustomizationButton

                Return ""
            Case GridStringId.CardViewQuickCustomizationButtonFilter
                Return ""
            Case GridStringId.CardViewQuickCustomizationButtonSort
                Return ""
            Case GridStringId.ColumnViewExceptionMessage
                Return "数据录入有误,请更正!"
            Case GridStringId.CustomFilterDialog2FieldCheck
                Return "Field"
            Case GridStringId.CustomFilterDialogCancelButton
                Return "取消"
            Case GridStringId.CustomFilterDialogCaption

                Return "条件为:"
            Case GridStringId.CustomFilterDialogConditionBlanks

                Return "空值"
            Case GridStringId.CustomFilterDialogConditionEQU

                Return "等于="
            Case GridStringId.CustomFilterDialogConditionGT

                Return "大于>"
            Case GridStringId.CustomFilterDialogConditionGTE

                Return "大于或等于>="
            Case GridStringId.CustomFilterDialogConditionLike

                Return "包含"
            Case GridStringId.CustomFilterDialogConditionLT

                Return "小于<"
            Case GridStringId.CustomFilterDialogConditionLTE

                Return "小于或等于>="
            Case GridStringId.CustomFilterDialogConditionNEQ

                Return "不等于<>"
            Case GridStringId.CustomFilterDialogConditionNonBlanks

                Return "非空值"
            Case GridStringId.CustomFilterDialogConditionNotLike

                Return "不包含"
            Case GridStringId.CustomFilterDialogFormCaption

                Return "自定义筛选条件"
            Case GridStringId.CustomFilterDialogOkButton

                Return "确定(&O)"
            Case GridStringId.CustomFilterDialogRadioAnd

                Return "和(&A)"
            Case GridStringId.CustomFilterDialogRadioOr

                Return "或者(&O)"
            Case GridStringId.CustomizationBands

                Return "Bands"
            Case GridStringId.CustomizationCaption

                Return "字段隐藏窗口"
            Case GridStringId.CustomizationColumns

                Return "Columns"
            Case GridStringId.FileIsNotFoundError

                Return "文件 {0} 没找到!"
            Case GridStringId.GridGroupPanelText

                Return ""
            Case GridStringId.GridNewRowText

                Return ""
            Case GridStringId.GridOutlookIntervals

                Return ""
            Case GridStringId.MenuColumnBestFit

                Return "自动宽度"
            Case GridStringId.MenuColumnBestFitAllColumns

                Return "自动宽度(全部)"
            Case GridStringId.MenuColumnClearFilter

                Return "清除筛选条件"
            Case GridStringId.MenuColumnColumnCustomization

                Return "显示/隐藏字段"
            Case GridStringId.MenuColumnFilter

                Return "筛选"
            Case GridStringId.MenuColumnGroup

                Return "进行分组"
            Case GridStringId.MenuColumnGroupBox

                Return "分组区"
            Case GridStringId.MenuColumnSortAscending

                Return "升序排序"
            Case GridStringId.MenuColumnSortDescending

                Return "降序排序"
            Case GridStringId.MenuColumnUnGroup

                Return "取消分组"
            Case GridStringId.MenuFooterAverage

                Return "平均值"
            Case GridStringId.MenuFooterAverageFormat

                Return "平均值={0:#.##}"
            Case GridStringId.MenuFooterCount

                Return "列数"
            Case GridStringId.MenuFooterCountFormat

                Return "{0}"
            Case GridStringId.MenuFooterMax

                Return "最大值"
            Case GridStringId.MenuFooterMaxFormat

                Return "最大值={0}"
            Case GridStringId.MenuFooterMin

                Return "最小"
            Case GridStringId.MenuFooterMinFormat

                Return "最小值={0}"
            Case GridStringId.MenuFooterNone

                Return "没有"
            Case GridStringId.MenuFooterSum

                Return "求和"
            Case GridStringId.MenuFooterSumFormat

                Return "求和={0:#.##}"
            Case GridStringId.MenuGroupPanelClearGrouping

                Return "取消所有分组"
            Case GridStringId.MenuGroupPanelFullCollapse

                Return "收缩全部分组"
            Case GridStringId.MenuGroupPanelFullExpand

                Return "展开全部分组"
            Case GridStringId.PopupFilterAll

                Return "(所有)"
            Case GridStringId.PopupFilterBlanks

                Return "(空值)"
            Case GridStringId.PopupFilterCustom

                Return "(自定义)"
            Case GridStringId.PopupFilterNonBlanks

                Return "(非空值)"
            Case GridStringId.PrintDesignerBandedView

                Return ""
            Case GridStringId.PrintDesignerBandHeader

                Return ""
            Case GridStringId.PrintDesignerCardView

                Return ""
            Case GridStringId.PrintDesignerDescription

                Return ""
            Case GridStringId.PrintDesignerGridView

                Return ""

            Case GridStringId.WindowErrorCaption

                Return "错误"
        End Select
        Return ""
    End Function


End Class

2、在form的load中添加如下代码:

  Dim MyGrid_CN As New XtraGrid_CN
  DevExpress.XtraGrid.Localization.GridLocalizer.Active = MyGrid_CN

接下来运行程序,你会发现XtraGrid中的对话框还是英文的。
这是我在使用中遇到的问题。
在CSDN上发表了问题。但是没有人回答。
后来发现关闭计算机重启后,再打工程文件,就变中文了,以前汉化XtraBar没遇到这种情况。

原创粉丝点击