Fix saving and restoring form position, fix display format
This commit is contained in:
@@ -211,7 +211,7 @@ Public Module ModuleControlProperties
|
||||
<Editor(GetType(MultilineStringEditor), GetType(UITypeEditor))>
|
||||
Public Property RegexMessage As String
|
||||
|
||||
<DisplayName("Display Format String")>
|
||||
<DisplayName("Display Format")>
|
||||
<Category(ClassConstants.CAT_DISPLAY)>
|
||||
<TypeConverter(GetType(DisplayFormatConverter))>
|
||||
Public Property DisplayFormat As String
|
||||
@@ -226,10 +226,10 @@ Public Module ModuleControlProperties
|
||||
Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
|
||||
Dim displayFormatList = New List(Of String) From {
|
||||
ClassControlCreator.CONTROL_TYPE_TEXT,
|
||||
ClassControlCreator.CONTROL_TYPE_BOOLEAN,
|
||||
ClassControlCreator.CONTROL_TYPE_INTEGER,
|
||||
ClassControlCreator.CONTROL_TYPE_DOUBLE,
|
||||
ClassControlCreator.CONTROL_TYPE_CURRENCY
|
||||
ClassControlCreator.CONTROL_TYPE_CURRENCY,
|
||||
ClassControlCreator.CONTROL_TYPE_DATE,
|
||||
ClassControlCreator.CONTROL_TYPE_DATETIME
|
||||
}
|
||||
Dim values As New StandardValuesCollection(displayFormatList)
|
||||
Return values
|
||||
|
||||
Reference in New Issue
Block a user