Reconfigure for GIT
This commit is contained in:
@@ -0,0 +1,69 @@
|
||||
Imports System
|
||||
Imports System.Collections.Generic
|
||||
Imports System.Web
|
||||
Imports System.Web.UI
|
||||
Imports System.Web.UI.WebControls
|
||||
Imports DevExpress.Web.ASPxHtmlEditor
|
||||
Imports DevExpress.Web
|
||||
Imports DevExpress.Web.ASPxHtmlEditor.Localization
|
||||
Imports DevExpress.Web.Internal
|
||||
|
||||
Partial Public Class SelectDocumentForm
|
||||
Inherits HtmlEditorUserControl
|
||||
Protected Overrides Sub PrepareChildControls()
|
||||
Localize()
|
||||
|
||||
MyBase.PrepareChildControls()
|
||||
|
||||
PrepareFileManager()
|
||||
End Sub
|
||||
Private Sub Localize()
|
||||
SelectButton.Text = ASPxHtmlEditorLocalizer.GetString(ASPxHtmlEditorStringId.ButtonSelect)
|
||||
CancelButton.Text = ASPxHtmlEditorLocalizer.GetString(ASPxHtmlEditorStringId.ButtonCancel)
|
||||
End Sub
|
||||
Protected Overrides Function GetChildDxEdits() As ASPxEditBase()
|
||||
Return New ASPxEditBase() { }
|
||||
End Function
|
||||
Protected Overrides Function GetChildDxButtons() As ASPxButton()
|
||||
Return New ASPxButton() { SelectButton, CancelButton }
|
||||
End Function
|
||||
Protected Overrides Function GetChildDxHtmlEditorRoundPanels() As ASPxHtmlEditorRoundPanel()
|
||||
Return New ASPxHtmlEditorRoundPanel() { }
|
||||
End Function
|
||||
|
||||
Protected Sub PrepareFileManager()
|
||||
FileManager.Styles.CopyFrom(HtmlEditor.StylesFileManager)
|
||||
FileManager.ControlStyle.CopyFrom(HtmlEditor.StylesFileManager.Control)
|
||||
FileManager.Images.CopyFrom(HtmlEditor.ImagesFileManager)
|
||||
FileManager.Settings.Assign(HtmlEditor.SettingsDocumentSelector.CommonSettings)
|
||||
FileManager.SettingsEditing.Assign(HtmlEditor.SettingsDocumentSelector.EditingSettings)
|
||||
FileManager.SettingsFolders.Assign(HtmlEditor.SettingsDocumentSelector.FoldersSettings)
|
||||
FileManager.SettingsToolbar.Assign(HtmlEditor.SettingsDocumentSelector.ToolbarSettings)
|
||||
FileManager.SettingsUpload.Assign(HtmlEditor.SettingsDocumentSelector.UploadSettings)
|
||||
FileManager.SettingsPermissions.Assign(HtmlEditor.SettingsDocumentSelector.PermissionSettings)
|
||||
|
||||
AddHandler FileManager.FolderCreating, AddressOf FileManager_FolderCreating
|
||||
AddHandler FileManager.ItemDeleting, AddressOf FileManager_ItemDeleting
|
||||
AddHandler FileManager.ItemMoving, AddressOf FileManager_ItemMoving
|
||||
AddHandler FileManager.ItemRenaming, AddressOf FileManager_ItemRenaming
|
||||
AddHandler FileManager.FileUploading, AddressOf FileManager_FileUploading
|
||||
End Sub
|
||||
Protected Sub FileManager_FolderCreating(ByVal sender As Object, ByVal e As FileManagerFolderCreateEventArgs)
|
||||
HtmlEditor.RaiseDocumentSelectorFolderCreating(e)
|
||||
End Sub
|
||||
Protected Sub FileManager_ItemDeleting(ByVal sender As Object, ByVal e As FileManagerItemDeleteEventArgs)
|
||||
HtmlEditor.RaiseDocumentSelectorItemDeleting(e)
|
||||
End Sub
|
||||
Protected Sub FileManager_ItemMoving(ByVal sender As Object, ByVal e As FileManagerItemMoveEventArgs)
|
||||
HtmlEditor.RaiseDocumentSelectorItemMoving(e)
|
||||
End Sub
|
||||
Protected Sub FileManager_ItemRenaming(ByVal sender As Object, ByVal e As FileManagerItemRenameEventArgs)
|
||||
HtmlEditor.RaiseDocumentSelectorItemRenaming(e)
|
||||
End Sub
|
||||
Protected Sub FileManager_FileUploading(ByVal sender As Object, ByVal e As FileManagerFileUploadEventArgs)
|
||||
HtmlEditor.RaiseDocumentSelectorFileUploading(e)
|
||||
End Sub
|
||||
Protected Sub FileManager_CustomJSProperties(ByVal sender As Object, ByVal e As DevExpress.Web.CustomJSPropertiesEventArgs)
|
||||
e.Properties("cp_RootFolderRelativePath") = FileManager.GetAppRelativeRootFolder()
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user