3 Commits

Author SHA1 Message Date
Jonathan Jenne
1a308afc21 Common: Version 1.4.0 2021-02-10 11:49:28 +01:00
Jonathan Jenne
0bce1b82de Common/DocumentResultList: Add Dragdrop from Window to outside, check for rights on doubleclick 2021-02-10 11:48:18 +01:00
Jonathan Jenne
4f9f226bb2 EDMIBenchmark: udpate 2021-02-10 11:47:12 +01:00
6 changed files with 157 additions and 75 deletions

View File

@@ -86,7 +86,7 @@ Partial Class frmDocumentResultList
Me.RibbonControl.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide Me.RibbonControl.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl.ShowToolbarCustomizeItem = False Me.RibbonControl.ShowToolbarCustomizeItem = False
Me.RibbonControl.Size = New System.Drawing.Size(1189, 132) Me.RibbonControl.Size = New System.Drawing.Size(1189, 131)
Me.RibbonControl.StatusBar = Me.RibbonStatusBar Me.RibbonControl.StatusBar = Me.RibbonStatusBar
Me.RibbonControl.Toolbar.ShowCustomizeItem = False Me.RibbonControl.Toolbar.ShowCustomizeItem = False
' '
@@ -192,6 +192,7 @@ Partial Class frmDocumentResultList
' '
'labelCriticalError 'labelCriticalError
' '
Me.labelCriticalError.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Right
Me.labelCriticalError.Caption = "Critical Error" Me.labelCriticalError.Caption = "Critical Error"
Me.labelCriticalError.Id = 14 Me.labelCriticalError.Id = 14
Me.labelCriticalError.ImageOptions.SvgImage = CType(resources.GetObject("labelCriticalError.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.labelCriticalError.ImageOptions.SvgImage = CType(resources.GetObject("labelCriticalError.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
@@ -205,13 +206,13 @@ Partial Class frmDocumentResultList
' '
'labelWarning 'labelWarning
' '
Me.labelWarning.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Right
Me.labelWarning.Caption = "Warning" Me.labelWarning.Caption = "Warning"
Me.labelWarning.Id = 15 Me.labelWarning.Id = 15
Me.labelWarning.ImageOptions.SvgImage = CType(resources.GetObject("labelWarning.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.labelWarning.ImageOptions.SvgImage = CType(resources.GetObject("labelWarning.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.labelWarning.ItemAppearance.Normal.BackColor = System.Drawing.Color.White Me.labelWarning.ItemAppearance.Normal.BackColor = System.Drawing.Color.White
Me.labelWarning.ItemAppearance.Normal.Options.UseBackColor = True Me.labelWarning.ItemAppearance.Normal.Options.UseBackColor = True
Me.labelWarning.Name = "labelWarning" Me.labelWarning.Name = "labelWarning"
Me.labelWarning.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
Me.labelWarning.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing Me.labelWarning.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
' '
'RibbonPage1 'RibbonPage1
@@ -248,10 +249,10 @@ Partial Class frmDocumentResultList
Me.RibbonStatusBar.ItemLinks.Add(Me.labelResultCount) Me.RibbonStatusBar.ItemLinks.Add(Me.labelResultCount)
Me.RibbonStatusBar.ItemLinks.Add(Me.labelCriticalError) Me.RibbonStatusBar.ItemLinks.Add(Me.labelCriticalError)
Me.RibbonStatusBar.ItemLinks.Add(Me.labelWarning) Me.RibbonStatusBar.ItemLinks.Add(Me.labelWarning)
Me.RibbonStatusBar.Location = New System.Drawing.Point(0, 647) Me.RibbonStatusBar.Location = New System.Drawing.Point(0, 649)
Me.RibbonStatusBar.Name = "RibbonStatusBar" Me.RibbonStatusBar.Name = "RibbonStatusBar"
Me.RibbonStatusBar.Ribbon = Me.RibbonControl Me.RibbonStatusBar.Ribbon = Me.RibbonControl
Me.RibbonStatusBar.Size = New System.Drawing.Size(1189, 24) Me.RibbonStatusBar.Size = New System.Drawing.Size(1189, 22)
' '
'SplitContainerControl1 'SplitContainerControl1
' '
@@ -263,7 +264,7 @@ Partial Class frmDocumentResultList
Me.SplitContainerControl1.Panel1.Text = "Panel1" Me.SplitContainerControl1.Panel1.Text = "Panel1"
Me.SplitContainerControl1.Panel2.Controls.Add(Me.SplitContainerControl2) Me.SplitContainerControl1.Panel2.Controls.Add(Me.SplitContainerControl2)
Me.SplitContainerControl1.Panel2.Text = "Panel2" Me.SplitContainerControl1.Panel2.Text = "Panel2"
Me.SplitContainerControl1.Size = New System.Drawing.Size(762, 515) Me.SplitContainerControl1.Size = New System.Drawing.Size(762, 518)
Me.SplitContainerControl1.SplitterPosition = 382 Me.SplitContainerControl1.SplitterPosition = 382
Me.SplitContainerControl1.TabIndex = 2 Me.SplitContainerControl1.TabIndex = 2
Me.SplitContainerControl1.Text = "SplitContainerControl1" Me.SplitContainerControl1.Text = "SplitContainerControl1"
@@ -275,7 +276,7 @@ Partial Class frmDocumentResultList
Me.GridControl1.MainView = Me.GridView1 Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.MenuManager = Me.RibbonControl Me.GridControl1.MenuManager = Me.RibbonControl
Me.GridControl1.Name = "GridControl1" Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(382, 515) Me.GridControl1.Size = New System.Drawing.Size(382, 518)
Me.GridControl1.TabIndex = 0 Me.GridControl1.TabIndex = 0
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1}) Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
' '
@@ -316,7 +317,7 @@ Partial Class frmDocumentResultList
Me.SplitContainerControl2.Panel1.Text = "Panel1" Me.SplitContainerControl2.Panel1.Text = "Panel1"
Me.SplitContainerControl2.Panel2.Controls.Add(Me.GridControl3) Me.SplitContainerControl2.Panel2.Controls.Add(Me.GridControl3)
Me.SplitContainerControl2.Panel2.Text = "Panel2" Me.SplitContainerControl2.Panel2.Text = "Panel2"
Me.SplitContainerControl2.Size = New System.Drawing.Size(370, 515) Me.SplitContainerControl2.Size = New System.Drawing.Size(370, 518)
Me.SplitContainerControl2.SplitterPosition = 223 Me.SplitContainerControl2.SplitterPosition = 223
Me.SplitContainerControl2.TabIndex = 0 Me.SplitContainerControl2.TabIndex = 0
Me.SplitContainerControl2.Text = "SplitContainerControl2" Me.SplitContainerControl2.Text = "SplitContainerControl2"
@@ -361,7 +362,7 @@ Partial Class frmDocumentResultList
Me.GridControl3.MainView = Me.GridView3 Me.GridControl3.MainView = Me.GridView3
Me.GridControl3.MenuManager = Me.RibbonControl Me.GridControl3.MenuManager = Me.RibbonControl
Me.GridControl3.Name = "GridControl3" Me.GridControl3.Name = "GridControl3"
Me.GridControl3.Size = New System.Drawing.Size(370, 282) Me.GridControl3.Size = New System.Drawing.Size(370, 285)
Me.GridControl3.TabIndex = 0 Me.GridControl3.TabIndex = 0
Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3}) Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3})
' '
@@ -390,13 +391,13 @@ Partial Class frmDocumentResultList
'SplitContainerControl3 'SplitContainerControl3
' '
Me.SplitContainerControl3.Dock = System.Windows.Forms.DockStyle.Fill Me.SplitContainerControl3.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainerControl3.Location = New System.Drawing.Point(0, 132) Me.SplitContainerControl3.Location = New System.Drawing.Point(0, 131)
Me.SplitContainerControl3.Name = "SplitContainerControl3" Me.SplitContainerControl3.Name = "SplitContainerControl3"
Me.SplitContainerControl3.Panel1.Controls.Add(Me.SplitContainerControl1) Me.SplitContainerControl3.Panel1.Controls.Add(Me.SplitContainerControl1)
Me.SplitContainerControl3.Panel1.Text = "Panel1" Me.SplitContainerControl3.Panel1.Text = "Panel1"
Me.SplitContainerControl3.Panel2.Controls.Add(Me.DocumentViewer1) Me.SplitContainerControl3.Panel2.Controls.Add(Me.DocumentViewer1)
Me.SplitContainerControl3.Panel2.Text = "Panel2" Me.SplitContainerControl3.Panel2.Text = "Panel2"
Me.SplitContainerControl3.Size = New System.Drawing.Size(1189, 515) Me.SplitContainerControl3.Size = New System.Drawing.Size(1189, 518)
Me.SplitContainerControl3.SplitterPosition = 762 Me.SplitContainerControl3.SplitterPosition = 762
Me.SplitContainerControl3.TabIndex = 5 Me.SplitContainerControl3.TabIndex = 5
Me.SplitContainerControl3.Text = "SplitContainerControl3" Me.SplitContainerControl3.Text = "SplitContainerControl3"
@@ -407,7 +408,7 @@ Partial Class frmDocumentResultList
Me.DocumentViewer1.FileLoaded = False Me.DocumentViewer1.FileLoaded = False
Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0) Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0)
Me.DocumentViewer1.Name = "DocumentViewer1" Me.DocumentViewer1.Name = "DocumentViewer1"
Me.DocumentViewer1.Size = New System.Drawing.Size(417, 515) Me.DocumentViewer1.Size = New System.Drawing.Size(417, 518)
Me.DocumentViewer1.TabIndex = 0 Me.DocumentViewer1.TabIndex = 0
' '
'XtraSaveFileDialog 'XtraSaveFileDialog

View File

@@ -1,4 +1,5 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports System.Drawing
Imports System.IO Imports System.IO
Imports System.Windows.Forms Imports System.Windows.Forms
Imports DevExpress.Utils Imports DevExpress.Utils
@@ -575,7 +576,7 @@ Public Class frmDocumentResultList
Dim oRow = GetActiveRow() Dim oRow = GetActiveRow()
If oRow IsNot Nothing Then If oRow IsNot Nothing Then
Dim oFilename = oRow.Item(COLUMN_FILEPATH) Dim oFilename = _DocumentInfo.FullPath
Dim oDirectory = IO.Path.GetDirectoryName(oFilename) Dim oDirectory = IO.Path.GetDirectoryName(oFilename)
Process.Start(oDirectory) Process.Start(oDirectory)
End If End If
@@ -602,7 +603,7 @@ Public Class frmDocumentResultList
Dim oRow = GetActiveRow() Dim oRow = GetActiveRow()
If oRow IsNot Nothing Then If oRow IsNot Nothing Then
Dim oFilename = oRow.Item(COLUMN_FILEPATH) Dim oFilename = _DocumentInfo.FullPath
Clipboard.SetText(oFilename) Clipboard.SetText(oFilename)
End If End If
Catch ex As Exception Catch ex As Exception
@@ -657,7 +658,9 @@ Public Class frmDocumentResultList
End Sub End Sub
Private Sub GridControl_DoubleClick(sender As Object, e As EventArgs) Handles GridControl1.DoubleClick, GridControl2.DoubleClick, GridControl3.DoubleClick Private Sub GridControl_DoubleClick(sender As Object, e As EventArgs) Handles GridControl1.DoubleClick, GridControl2.DoubleClick, GridControl3.DoubleClick
If _DocumentInfo IsNot Nothing And _DocumentInfo.AccessRight > Rights.AccessRight.VIEW_ONLY Then
OpenFile() OpenFile()
End If
End Sub End Sub
Private Sub GridView_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs) _ Private Sub GridView_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs) _
@@ -668,7 +671,7 @@ Public Class frmDocumentResultList
If e.MenuType = GridMenuType.Row Then If e.MenuType = GridMenuType.Row Then
Dim oRowHandle = e.HitInfo.RowHandle Dim oRowHandle = e.HitInfo.RowHandle
Dim oRow As DataRow = oView.GetDataRow(oRowHandle) Dim oRow As DataRow = oView.GetDataRow(oRowHandle)
Dim oFilepath As String = oRow.Item(COLUMN_FILEPATH) Dim oFilepath As String = _DocumentInfo.FullPath
Dim oObjectId As Long = oRow.Item(COLUMN_DOCID) Dim oObjectId As Long = oRow.Item(COLUMN_DOCID)
Dim oMenu As New DocumentPropertyMenu(_LogConfig, _Environment, _IDBClient, oFilepath, oObjectId) Dim oMenu As New DocumentPropertyMenu(_LogConfig, _Environment, _IDBClient, oFilepath, oObjectId)
@@ -749,8 +752,8 @@ Public Class frmDocumentResultList
If Not IsNothing(_ActiveGrid) Then If Not IsNothing(_ActiveGrid) Then
Try Try
Dim oFile = GetDevexpressGrid_LayoutName(_ActiveGrid.MainView) Dim oFile = GetDevexpressGrid_LayoutName(_ActiveGrid.MainView)
If IO.File.Exists(oFile) Then If File.Exists(oFile) Then
IO.File.Delete(oFile) File.Delete(oFile)
End If End If
UpdateGridData() UpdateGridData()
Catch ex As Exception Catch ex As Exception
@@ -762,4 +765,39 @@ Public Class frmDocumentResultList
Private Sub frmDocumentResultList_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing Private Sub frmDocumentResultList_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
GridViewSave_Layout(_ActiveGrid.MainView) GridViewSave_Layout(_ActiveGrid.MainView)
End Sub End Sub
Private _DragBoxFromMouseDown As Rectangle
Private _ScreenOffset As Point
Private Sub GridView1_MouseDown(sender As GridView, e As MouseEventArgs) Handles GridView1.MouseDown
If sender.FocusedRowHandle >= 0 Then
Dim oDragSize As Size = SystemInformation.DragSize
_DragBoxFromMouseDown = New Rectangle(New Point(e.X - (oDragSize.Width / 2),
e.Y - (oDragSize.Height / 2)), oDragSize)
Else
_DragBoxFromMouseDown = Rectangle.Empty
End If
End Sub
Private Sub GridView1_MouseUp(sender As GridView, e As MouseEventArgs) Handles GridView1.MouseUp
_DragBoxFromMouseDown = Rectangle.Empty
End Sub
Private Sub GridView1_MouseMove(sender As GridView, e As MouseEventArgs) Handles GridView1.MouseMove
If e.Button AndAlso e.Button = MouseButtons.Left Then
If _DragBoxFromMouseDown <> Rectangle.Empty And Not _DragBoxFromMouseDown.Contains(e.X, e.Y) Then
If _DocumentInfo IsNot Nothing AndAlso _DocumentInfo.AccessRight > Rights.AccessRight.VIEW_ONLY Then
_ScreenOffset = SystemInformation.WorkingArea.Location
Dim oFullPath As String = _DocumentInfo.FullPath
Dim oFiles As String() = {oFullPath}
Dim oData As New DataObject(DataFormats.FileDrop, oFiles)
sender.GridControl.DoDragDrop(oData, DragDropEffects.All)
End If
End If
End If
End Sub
End Class End Class

View File

@@ -12,7 +12,7 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyDescription("")> <Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")> <Assembly: AssemblyCompany("")>
<Assembly: AssemblyProduct("Common")> <Assembly: AssemblyProduct("Common")>
<Assembly: AssemblyCopyright("Copyright © 2020")> <Assembly: AssemblyCopyright("Copyright © 2021")>
<Assembly: AssemblyTrademark("")> <Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)> <Assembly: ComVisible(False)>
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.3.1.0")> <Assembly: AssemblyVersion("1.4.0.0")>
<Assembly: AssemblyFileVersion("1.3.1.0")> <Assembly: AssemblyFileVersion("1.4.0.0")>

View File

@@ -1,5 +1,50 @@
<?xml version="1.0" encoding="utf-8" ?> <?xml version="1.0" encoding="utf-8"?>
<configuration> <configuration>
<configSections>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
<section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
</sectionGroup>
</configSections>
<applicationSettings>
<DevExpress.LookAndFeel.Design.AppSettings>
<setting name="DefaultAppSkin" serializeAs="String">
<value>Skin/Office 2019 Colorful</value>
</setting>
<setting name="DefaultPalette" serializeAs="String">
<value>Fire Brick</value>
</setting>
<setting name="TouchUI" serializeAs="String">
<value></value>
</setting>
<setting name="CompactUI" serializeAs="String">
<value></value>
</setting>
<setting name="TouchScaleFactor" serializeAs="String">
<value></value>
</setting>
<setting name="DirectX" serializeAs="String">
<value></value>
</setting>
<setting name="RegisterUserSkins" serializeAs="String">
<value></value>
</setting>
<setting name="RegisterBonusSkins" serializeAs="String">
<value></value>
</setting>
<setting name="FontBehavior" serializeAs="String">
<value></value>
</setting>
<setting name="DefaultAppFont" serializeAs="String">
<value></value>
</setting>
<setting name="DPIAwarenessMode" serializeAs="String">
<value></value>
</setting>
<setting name="CustomPaletteCollection" serializeAs="Xml">
<value />
</setting>
</DevExpress.LookAndFeel.Design.AppSettings>
</applicationSettings>
<startup> <startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7.2" /> <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7.2" />
</startup> </startup>

View File

@@ -24,7 +24,9 @@ Partial Class Form1
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
Dim DockingContainer2 As DevExpress.XtraBars.Docking2010.Views.Tabbed.DockingContainer = New DevExpress.XtraBars.Docking2010.Views.Tabbed.DockingContainer() Dim DockingContainer1 As DevExpress.XtraBars.Docking2010.Views.Tabbed.DockingContainer = New DevExpress.XtraBars.Docking2010.Views.Tabbed.DockingContainer()
Me.DocumentGroup1 = New DevExpress.XtraBars.Docking2010.Views.Tabbed.DocumentGroup(Me.components)
Me.Document1 = New DevExpress.XtraBars.Docking2010.Views.Tabbed.Document(Me.components)
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.ButtonSelectFiles = New DevExpress.XtraBars.BarButtonItem() Me.ButtonSelectFiles = New DevExpress.XtraBars.BarButtonItem()
Me.ButtonImportFiles = New DevExpress.XtraBars.BarButtonItem() Me.ButtonImportFiles = New DevExpress.XtraBars.BarButtonItem()
@@ -63,6 +65,7 @@ Partial Class Form1
Me.DockPanel1 = New DevExpress.XtraBars.Docking.DockPanel() Me.DockPanel1 = New DevExpress.XtraBars.Docking.DockPanel()
Me.DockPanel1_Container = New DevExpress.XtraBars.Docking.ControlContainer() Me.DockPanel1_Container = New DevExpress.XtraBars.Docking.ControlContainer()
Me.listboxFiles = New DevExpress.XtraEditors.ListBoxControl() Me.listboxFiles = New DevExpress.XtraEditors.ListBoxControl()
Me.BindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
Me.DockPanel2 = New DevExpress.XtraBars.Docking.DockPanel() Me.DockPanel2 = New DevExpress.XtraBars.Docking.DockPanel()
Me.DockPanel2_Container = New DevExpress.XtraBars.Docking.ControlContainer() Me.DockPanel2_Container = New DevExpress.XtraBars.Docking.ControlContainer()
Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer() Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
@@ -70,12 +73,11 @@ Partial Class Form1
Me.DockPanel4_Container = New DevExpress.XtraBars.Docking.ControlContainer() Me.DockPanel4_Container = New DevExpress.XtraBars.Docking.ControlContainer()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl() Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.BindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
Me.Timer1 = New System.Windows.Forms.Timer(Me.components) Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.BarEditItem1 = New DevExpress.XtraBars.BarEditItem() Me.BarEditItem1 = New DevExpress.XtraBars.BarEditItem()
Me.panelContainer1 = New DevExpress.XtraBars.Docking.DockPanel() Me.panelContainer1 = New DevExpress.XtraBars.Docking.DockPanel()
Me.Document1 = New DevExpress.XtraBars.Docking2010.Views.Tabbed.Document(Me.components) CType(Me.DocumentGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DocumentGroup1 = New DevExpress.XtraBars.Docking2010.Views.Tabbed.DocumentGroup(Me.components) CType(Me.Document1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -91,17 +93,29 @@ Partial Class Form1
Me.DockPanel1.SuspendLayout() Me.DockPanel1.SuspendLayout()
Me.DockPanel1_Container.SuspendLayout() Me.DockPanel1_Container.SuspendLayout()
CType(Me.listboxFiles, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.listboxFiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DockPanel2.SuspendLayout() Me.DockPanel2.SuspendLayout()
Me.DockPanel2_Container.SuspendLayout() Me.DockPanel2_Container.SuspendLayout()
Me.DockPanel4.SuspendLayout() Me.DockPanel4.SuspendLayout()
Me.DockPanel4_Container.SuspendLayout() Me.DockPanel4_Container.SuspendLayout()
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Document1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DocumentGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
' '
'DocumentGroup1
'
Me.DocumentGroup1.Items.AddRange(New DevExpress.XtraBars.Docking2010.Views.Tabbed.Document() {Me.Document1})
'
'Document1
'
Me.Document1.Caption = "DockPanelGrid"
Me.Document1.ControlName = "DockPanel4"
Me.Document1.FloatLocation = New System.Drawing.Point(354, 490)
Me.Document1.FloatSize = New System.Drawing.Size(538, 200)
Me.Document1.Properties.AllowClose = DevExpress.Utils.DefaultBoolean.[True]
Me.Document1.Properties.AllowFloat = DevExpress.Utils.DefaultBoolean.[True]
Me.Document1.Properties.AllowFloatOnDoubleClick = DevExpress.Utils.DefaultBoolean.[True]
'
'RibbonControl1 'RibbonControl1
' '
Me.RibbonControl1.ExpandCollapseItem.Id = 0 Me.RibbonControl1.ExpandCollapseItem.Id = 0
@@ -113,7 +127,7 @@ Partial Class Form1
Me.RibbonControl1.PageHeaderItemLinks.Add(Me.BarMdiChildrenListItem1) Me.RibbonControl1.PageHeaderItemLinks.Add(Me.BarMdiChildrenListItem1)
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2, Me.RepositoryItemTextEdit3, Me.RepositoryItemTextEdit4}) Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2, Me.RepositoryItemTextEdit3, Me.RepositoryItemTextEdit4})
Me.RibbonControl1.Size = New System.Drawing.Size(1093, 159) Me.RibbonControl1.Size = New System.Drawing.Size(1093, 157)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
' '
'ButtonSelectFiles 'ButtonSelectFiles
@@ -313,8 +327,8 @@ Partial Class Form1
' '
Me.TabbedView1.DocumentGroups.AddRange(New DevExpress.XtraBars.Docking2010.Views.Tabbed.DocumentGroup() {Me.DocumentGroup1}) Me.TabbedView1.DocumentGroups.AddRange(New DevExpress.XtraBars.Docking2010.Views.Tabbed.DocumentGroup() {Me.DocumentGroup1})
Me.TabbedView1.Documents.AddRange(New DevExpress.XtraBars.Docking2010.Views.BaseDocument() {Me.Document1}) Me.TabbedView1.Documents.AddRange(New DevExpress.XtraBars.Docking2010.Views.BaseDocument() {Me.Document1})
DockingContainer2.Element = Me.DocumentGroup1 DockingContainer1.Element = Me.DocumentGroup1
Me.TabbedView1.RootContainer.Nodes.AddRange(New DevExpress.XtraBars.Docking2010.Views.Tabbed.DockingContainer() {DockingContainer2}) Me.TabbedView1.RootContainer.Nodes.AddRange(New DevExpress.XtraBars.Docking2010.Views.Tabbed.DockingContainer() {DockingContainer1})
' '
'DockManager1 'DockManager1
' '
@@ -338,22 +352,22 @@ Partial Class Form1
Me.DockPanel3.Dock = DevExpress.XtraBars.Docking.DockingStyle.Bottom Me.DockPanel3.Dock = DevExpress.XtraBars.Docking.DockingStyle.Bottom
Me.DockPanel3.FloatVertical = True Me.DockPanel3.FloatVertical = True
Me.DockPanel3.ID = New System.Guid("b0b62b80-3cf3-4f78-a50d-4a79b9cabc39") Me.DockPanel3.ID = New System.Guid("b0b62b80-3cf3-4f78-a50d-4a79b9cabc39")
Me.DockPanel3.Location = New System.Drawing.Point(0, 0) Me.DockPanel3.Location = New System.Drawing.Point(0, 496)
Me.DockPanel3.Name = "DockPanel3" Me.DockPanel3.Name = "DockPanel3"
Me.DockPanel3.Options.ShowCloseButton = False Me.DockPanel3.Options.ShowCloseButton = False
Me.DockPanel3.OriginalSize = New System.Drawing.Size(200, 119) Me.DockPanel3.OriginalSize = New System.Drawing.Size(200, 119)
Me.DockPanel3.SavedDock = DevExpress.XtraBars.Docking.DockingStyle.Bottom Me.DockPanel3.SavedDock = DevExpress.XtraBars.Docking.DockingStyle.Bottom
Me.DockPanel3.SavedIndex = 0 Me.DockPanel3.SavedIndex = 0
Me.DockPanel3.Size = New System.Drawing.Size(1310, 119) Me.DockPanel3.Size = New System.Drawing.Size(1093, 119)
Me.DockPanel3.Text = "Log" Me.DockPanel3.Text = "Log"
Me.DockPanel3.Visibility = DevExpress.XtraBars.Docking.DockVisibility.AutoHide Me.DockPanel3.Visibility = DevExpress.XtraBars.Docking.DockVisibility.AutoHide
' '
'DockPanel3_Container 'DockPanel3_Container
' '
Me.DockPanel3_Container.Controls.Add(Me.listboxLog) Me.DockPanel3_Container.Controls.Add(Me.listboxLog)
Me.DockPanel3_Container.Location = New System.Drawing.Point(3, 27) Me.DockPanel3_Container.Location = New System.Drawing.Point(3, 47)
Me.DockPanel3_Container.Name = "DockPanel3_Container" Me.DockPanel3_Container.Name = "DockPanel3_Container"
Me.DockPanel3_Container.Size = New System.Drawing.Size(1304, 89) Me.DockPanel3_Container.Size = New System.Drawing.Size(1087, 69)
Me.DockPanel3_Container.TabIndex = 0 Me.DockPanel3_Container.TabIndex = 0
' '
'listboxLog 'listboxLog
@@ -361,7 +375,7 @@ Partial Class Form1
Me.listboxLog.Dock = System.Windows.Forms.DockStyle.Fill Me.listboxLog.Dock = System.Windows.Forms.DockStyle.Fill
Me.listboxLog.Location = New System.Drawing.Point(0, 0) Me.listboxLog.Location = New System.Drawing.Point(0, 0)
Me.listboxLog.Name = "listboxLog" Me.listboxLog.Name = "listboxLog"
Me.listboxLog.Size = New System.Drawing.Size(1304, 89) Me.listboxLog.Size = New System.Drawing.Size(1087, 69)
Me.listboxLog.TabIndex = 0 Me.listboxLog.TabIndex = 0
' '
'DockPanel1 'DockPanel1
@@ -369,11 +383,11 @@ Partial Class Form1
Me.DockPanel1.Controls.Add(Me.DockPanel1_Container) Me.DockPanel1.Controls.Add(Me.DockPanel1_Container)
Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left
Me.DockPanel1.ID = New System.Guid("12b5eead-07cc-48c6-93a4-85cd0b4b82ce") Me.DockPanel1.ID = New System.Guid("12b5eead-07cc-48c6-93a4-85cd0b4b82ce")
Me.DockPanel1.Location = New System.Drawing.Point(0, 159) Me.DockPanel1.Location = New System.Drawing.Point(0, 157)
Me.DockPanel1.Name = "DockPanel1" Me.DockPanel1.Name = "DockPanel1"
Me.DockPanel1.Options.ShowCloseButton = False Me.DockPanel1.Options.ShowCloseButton = False
Me.DockPanel1.OriginalSize = New System.Drawing.Size(297, 200) Me.DockPanel1.OriginalSize = New System.Drawing.Size(297, 200)
Me.DockPanel1.Size = New System.Drawing.Size(297, 456) Me.DockPanel1.Size = New System.Drawing.Size(297, 458)
Me.DockPanel1.Text = "Files to Upload" Me.DockPanel1.Text = "Files to Upload"
' '
'DockPanel1_Container 'DockPanel1_Container
@@ -381,7 +395,7 @@ Partial Class Form1
Me.DockPanel1_Container.Controls.Add(Me.listboxFiles) Me.DockPanel1_Container.Controls.Add(Me.listboxFiles)
Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 46) Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 46)
Me.DockPanel1_Container.Name = "DockPanel1_Container" Me.DockPanel1_Container.Name = "DockPanel1_Container"
Me.DockPanel1_Container.Size = New System.Drawing.Size(290, 407) Me.DockPanel1_Container.Size = New System.Drawing.Size(290, 409)
Me.DockPanel1_Container.TabIndex = 0 Me.DockPanel1_Container.TabIndex = 0
' '
'listboxFiles 'listboxFiles
@@ -390,19 +404,22 @@ Partial Class Form1
Me.listboxFiles.Dock = System.Windows.Forms.DockStyle.Fill Me.listboxFiles.Dock = System.Windows.Forms.DockStyle.Fill
Me.listboxFiles.Location = New System.Drawing.Point(0, 0) Me.listboxFiles.Location = New System.Drawing.Point(0, 0)
Me.listboxFiles.Name = "listboxFiles" Me.listboxFiles.Name = "listboxFiles"
Me.listboxFiles.Size = New System.Drawing.Size(290, 407) Me.listboxFiles.Size = New System.Drawing.Size(290, 409)
Me.listboxFiles.TabIndex = 1 Me.listboxFiles.TabIndex = 1
' '
'BindingSource1
'
'
'DockPanel2 'DockPanel2
' '
Me.DockPanel2.Controls.Add(Me.DockPanel2_Container) Me.DockPanel2.Controls.Add(Me.DockPanel2_Container)
Me.DockPanel2.Dock = DevExpress.XtraBars.Docking.DockingStyle.Right Me.DockPanel2.Dock = DevExpress.XtraBars.Docking.DockingStyle.Right
Me.DockPanel2.ID = New System.Guid("e82850af-b594-49e9-ae83-36d4bf007da5") Me.DockPanel2.ID = New System.Guid("e82850af-b594-49e9-ae83-36d4bf007da5")
Me.DockPanel2.Location = New System.Drawing.Point(893, 159) Me.DockPanel2.Location = New System.Drawing.Point(893, 157)
Me.DockPanel2.Name = "DockPanel2" Me.DockPanel2.Name = "DockPanel2"
Me.DockPanel2.Options.ShowCloseButton = False Me.DockPanel2.Options.ShowCloseButton = False
Me.DockPanel2.OriginalSize = New System.Drawing.Size(200, 200) Me.DockPanel2.OriginalSize = New System.Drawing.Size(200, 200)
Me.DockPanel2.Size = New System.Drawing.Size(200, 456) Me.DockPanel2.Size = New System.Drawing.Size(200, 458)
Me.DockPanel2.Text = "Document Viewer" Me.DockPanel2.Text = "Document Viewer"
' '
'DockPanel2_Container 'DockPanel2_Container
@@ -410,15 +427,16 @@ Partial Class Form1
Me.DockPanel2_Container.Controls.Add(Me.DocumentViewer1) Me.DockPanel2_Container.Controls.Add(Me.DocumentViewer1)
Me.DockPanel2_Container.Location = New System.Drawing.Point(4, 46) Me.DockPanel2_Container.Location = New System.Drawing.Point(4, 46)
Me.DockPanel2_Container.Name = "DockPanel2_Container" Me.DockPanel2_Container.Name = "DockPanel2_Container"
Me.DockPanel2_Container.Size = New System.Drawing.Size(193, 407) Me.DockPanel2_Container.Size = New System.Drawing.Size(193, 409)
Me.DockPanel2_Container.TabIndex = 0 Me.DockPanel2_Container.TabIndex = 0
' '
'DocumentViewer1 'DocumentViewer1
' '
Me.DocumentViewer1.Dock = System.Windows.Forms.DockStyle.Fill Me.DocumentViewer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.DocumentViewer1.FileLoaded = False
Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0) Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0)
Me.DocumentViewer1.Name = "DocumentViewer1" Me.DocumentViewer1.Name = "DocumentViewer1"
Me.DocumentViewer1.Size = New System.Drawing.Size(193, 407) Me.DocumentViewer1.Size = New System.Drawing.Size(193, 409)
Me.DocumentViewer1.TabIndex = 0 Me.DocumentViewer1.TabIndex = 0
' '
'DockPanel4 'DockPanel4
@@ -440,7 +458,7 @@ Partial Class Form1
Me.DockPanel4_Container.Controls.Add(Me.GridControl1) Me.DockPanel4_Container.Controls.Add(Me.GridControl1)
Me.DockPanel4_Container.Location = New System.Drawing.Point(0, 0) Me.DockPanel4_Container.Location = New System.Drawing.Point(0, 0)
Me.DockPanel4_Container.Name = "DockPanel4_Container" Me.DockPanel4_Container.Name = "DockPanel4_Container"
Me.DockPanel4_Container.Size = New System.Drawing.Size(590, 424) Me.DockPanel4_Container.Size = New System.Drawing.Size(590, 426)
Me.DockPanel4_Container.TabIndex = 0 Me.DockPanel4_Container.TabIndex = 0
' '
'GridControl1 'GridControl1
@@ -451,7 +469,7 @@ Partial Class Form1
Me.GridControl1.MainView = Me.GridView1 Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.MenuManager = Me.RibbonControl1 Me.GridControl1.MenuManager = Me.RibbonControl1
Me.GridControl1.Name = "GridControl1" Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(590, 424) Me.GridControl1.Size = New System.Drawing.Size(590, 426)
Me.GridControl1.TabIndex = 5 Me.GridControl1.TabIndex = 5
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1}) Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
' '
@@ -460,9 +478,6 @@ Partial Class Form1
Me.GridView1.GridControl = Me.GridControl1 Me.GridView1.GridControl = Me.GridControl1
Me.GridView1.Name = "GridView1" Me.GridView1.Name = "GridView1"
' '
'BindingSource1
'
'
'Timer1 'Timer1
' '
Me.Timer1.Interval = 3000 Me.Timer1.Interval = 3000
@@ -487,20 +502,6 @@ Partial Class Form1
Me.panelContainer1.Size = New System.Drawing.Size(192, 145) Me.panelContainer1.Size = New System.Drawing.Size(192, 145)
Me.panelContainer1.Text = "panelContainer1" Me.panelContainer1.Text = "panelContainer1"
' '
'Document1
'
Me.Document1.Caption = "DockPanelGrid"
Me.Document1.ControlName = "DockPanel4"
Me.Document1.FloatLocation = New System.Drawing.Point(354, 490)
Me.Document1.FloatSize = New System.Drawing.Size(538, 200)
Me.Document1.Properties.AllowClose = DevExpress.Utils.DefaultBoolean.[True]
Me.Document1.Properties.AllowFloat = DevExpress.Utils.DefaultBoolean.[True]
Me.Document1.Properties.AllowFloatOnDoubleClick = DevExpress.Utils.DefaultBoolean.[True]
'
'DocumentGroup1
'
Me.DocumentGroup1.Items.AddRange(New DevExpress.XtraBars.Docking2010.Views.Tabbed.Document() {Me.Document1})
'
'Form1 'Form1
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -515,6 +516,8 @@ Partial Class Form1
Me.Ribbon = Me.RibbonControl1 Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1 Me.StatusBar = Me.RibbonStatusBar1
Me.Text = "Form1" Me.Text = "Form1"
CType(Me.DocumentGroup1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Document1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RepositoryItemTextEdit2, System.ComponentModel.ISupportInitialize).EndInit()
@@ -530,15 +533,13 @@ Partial Class Form1
Me.DockPanel1.ResumeLayout(False) Me.DockPanel1.ResumeLayout(False)
Me.DockPanel1_Container.ResumeLayout(False) Me.DockPanel1_Container.ResumeLayout(False)
CType(Me.listboxFiles, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.listboxFiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
Me.DockPanel2.ResumeLayout(False) Me.DockPanel2.ResumeLayout(False)
Me.DockPanel2_Container.ResumeLayout(False) Me.DockPanel2_Container.ResumeLayout(False)
Me.DockPanel4.ResumeLayout(False) Me.DockPanel4.ResumeLayout(False)
Me.DockPanel4_Container.ResumeLayout(False) Me.DockPanel4_Container.ResumeLayout(False)
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Document1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DocumentGroup1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()

View File

@@ -335,15 +335,12 @@
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>159</value> <value>159</value>
</metadata> </metadata>
<metadata name="BindingSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>316, 17</value>
</metadata>
<metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>176, 18</value> <value>176, 18</value>
</metadata> </metadata>
<metadata name="BindingSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>316, 17</value>
</metadata>
<metadata name="BindingSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>316, 17</value>
</metadata>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>453, 17</value> <value>453, 17</value>
</metadata> </metadata>