MS_30.05.2016
This commit is contained in:
SchreiberM
parent
6a20480e7c
commit
ecb4161e6a
@ -87,6 +87,21 @@ Public Class ClassControlBuilder
|
||||
onRecordChangedHandler.Invoke(sender, e)
|
||||
End If
|
||||
End Sub
|
||||
' GridControl hat andere Handler Signatur
|
||||
Public Sub RecordChanged(sender As Object, ByVal e As DevExpress.XtraGrid.Views.Base.CellValueChangedEventArgs)
|
||||
Dim onRecordChangedHandler As EventHandler = CType(Me.Events(_onRecordChangedName), EventHandler)
|
||||
Dim ctrl As DevExpress.XtraGrid.Views.Grid.GridView = sender
|
||||
|
||||
' Dim ctrl As Control = sender 'DirectCast(sender, Control)
|
||||
Dim controlId As Integer = DirectCast(ctrl.GridControl.Tag, ClassControlMetadata).Id
|
||||
If Not ControlsChanged.Contains(controlId) Then
|
||||
ControlsChanged.Add(controlId)
|
||||
End If
|
||||
|
||||
If (onRecordChangedHandler IsNot Nothing And WatchRecordChanges) Then
|
||||
onRecordChangedHandler.Invoke(sender, e)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub MouseHover(sender As Object, e As EventArgs)
|
||||
Dim onMouseHoverHandler As EventHandler = CType(Me.Events(_onMouseHoverName), EventHandler)
|
||||
@ -564,6 +579,61 @@ Public Class ClassControlBuilder
|
||||
End If
|
||||
End Try
|
||||
End Sub
|
||||
Public Sub OnCheckedChanged(sender As Object, ByVal e As EventArgs)
|
||||
If CURRENT_RECORD_ENABLED = False Then Exit Sub
|
||||
|
||||
Try
|
||||
Dim GridView As DevExpress.XtraGrid.Views.Grid.GridView = sender
|
||||
Dim control As Control = DirectCast(GridView.GridControl, Control)
|
||||
Dim controlId As Integer = DirectCast(GridView.GridControl.Tag, ClassControlMetadata).Id
|
||||
|
||||
CONTROL_ID = controlId
|
||||
control.Update()
|
||||
|
||||
'SQL für abhängige Auswahllisten
|
||||
Dim SQL As String = String.Format("SELECT GUID, SQL_COMMAND_1,CONTROL_TYPE_ID,FORMAT_TYPE FROM TBPMO_CONTROL WHERE SQL_COMMAND_1 LIKE '%@{0}@%'", controlId)
|
||||
'SQL für enable control
|
||||
Dim SQLenable As String = String.Format("SELECT GUID, SQL_COMMAND_2,CONTROL_TYPE_ID,FORMAT_TYPE FROM TBPMO_CONTROL WHERE SQL_COMMAND_2 LIKE '%@{0}@%'", controlId)
|
||||
'If CtrlCommandUI.IsInsert = True Then
|
||||
' CtrlCommandUI.SaveRecord(0, CURRENT_FORM_ID, CURRENT_PARENT_ID)
|
||||
'End If
|
||||
|
||||
Dim CONTROL_VALUE As String = ClassControlCommandsUI.GetControlValue(control)
|
||||
|
||||
If CURRENT_RECORD_ID = 0 Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
' Da wir beim Klick auf Hinzfügen einen Record anlegen,
|
||||
' muss UpdateMultipleValues auch aufgerufen werden, wenn wir IsInsert = True ist
|
||||
'If CtrlCommandUI.IsInsert = False Then
|
||||
ClassControlCommandsUI.UpdateMultipleValues(controlId, CURRENT_RECORD_ID, CONTROL_VALUE)
|
||||
'End If
|
||||
|
||||
Dim SQL1 As String = String.Format("SELECT * FROM VWPMO_VALUES WHERE RECORD_ID = {0}", CURRENT_RECORD_ID)
|
||||
Dim DT_ControlValues As DataTable = ClassDatabase.Return_Datatable(SQL1, "LoadControlValues")
|
||||
CURRENT_CONTROL_VALUES = DT_ControlValues
|
||||
|
||||
Dim datatable As DataTable = ClassDatabase.Return_Datatable(SQL)
|
||||
Dim datatable1 As DataTable = ClassDatabase.Return_Datatable(SQLenable)
|
||||
Depending_Controls(control, datatable, CONTROL_VALUE)
|
||||
If IsNothing(CONTROL_VALUE) Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Enable_Controls(control, datatable1, CONTROL_VALUE)
|
||||
Dim values = New List(Of Object)(CONTROL_VALUE.Split(";").ToArray())
|
||||
'Jetzt noch die checked Items setzen
|
||||
' ClassControlValues.LoadControlValue(CURRENT_RECORD_ID, CURRENT_PARENT_ID, controlId, control, values, 99)
|
||||
Catch ex As Exception
|
||||
If ex.Message.Contains("Objektverweis") Or ex.Message.Contains("reference not set") Then
|
||||
|
||||
Else
|
||||
MsgBox("Error in OnCheckedChanged - " & CONTROL_ID.ToString & ": " & ex.Message, MsgBoxStyle.Critical)
|
||||
End If
|
||||
End Try
|
||||
End Sub
|
||||
Public Sub CheckBoxChanged(sender As Object, ByVal e As EventArgs)
|
||||
If CURRENT_RECORD_ENABLED = False Then Exit Sub
|
||||
|
||||
@ -709,7 +779,11 @@ Public Class ClassControlBuilder
|
||||
AddHandler gridview.CellValueChanged, AddressOf RecordChanged
|
||||
AddHandler gridview.RowsRemoved, AddressOf RecordChanged
|
||||
AddHandler gridview.EnabledChanged, AddressOf OnEnabledChanged
|
||||
|
||||
Case "GridControl"
|
||||
Dim gridcontrol As DevExpress.XtraGrid.GridControl = CType(control, DevExpress.XtraGrid.GridControl)
|
||||
Dim gridview As DevExpress.XtraGrid.Views.Grid.GridView = gridcontrol.MainView
|
||||
AddHandler gridview.CellValueChanged, AddressOf RecordChanged
|
||||
AddHandler gridview.CellValueChanged, AddressOf OnCheckedChanged
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
|
||||
@ -752,6 +752,137 @@ Public Class ClassControlCommandsUI
|
||||
Return Nothing
|
||||
End If
|
||||
|
||||
Case "GridControl"
|
||||
Dim chk_grid As DevExpress.XtraGrid.GridControl
|
||||
chk_grid = DirectCast(ctrl, DevExpress.XtraGrid.GridControl)
|
||||
Dim gridview As DevExpress.XtraGrid.Views.Grid.GridView = chk_grid.MainView
|
||||
Dim SQL_COMAMND = ClassDatabase.Execute_Scalar("SELECT UPPER(SQL_COMMAND_1) FROM TBPMO_CONTROL WHERE GUID = " & CONTROL_ID)
|
||||
|
||||
''TODO: Wenn keine Datasource vorhanden, angecheckte einträge als string speichern
|
||||
If IsNothing(chk_grid.DataSource) Then
|
||||
Dim result As New List(Of String)
|
||||
Dim result_string As String
|
||||
|
||||
For i As Integer = 0 To gridview.DataRowCount
|
||||
Dim res = gridview.GetRowCellValue(i, 0)
|
||||
If CBool(gridview.GetRowCellValue(i, "CHECKED")) = True Then
|
||||
Dim value = gridview.GetRowCellValue(i, 1).ToString.Trim
|
||||
result.Add(value)
|
||||
End If
|
||||
Next
|
||||
' Hier wird ein String zurückgegeben, der als VALUE gespeichert werden soll
|
||||
' Überspringt den Rest der funktion
|
||||
result_string = String.Join(";", result)
|
||||
If Not IsNothing(result_string) Then
|
||||
Return result_string
|
||||
Else
|
||||
Return Nothing
|
||||
End If
|
||||
Else
|
||||
Dim result As New List(Of String)
|
||||
Dim result_string As String
|
||||
Dim DT As DataTable = chk_grid.DataSource
|
||||
For Each row As DataRow In DT.Rows
|
||||
If CBool(row.Item(0)) = True Then
|
||||
Dim value = row.Item(1).ToString.Trim
|
||||
result.Add(value)
|
||||
End If
|
||||
Next
|
||||
' Hier wird ein String zurückgegeben, der als VALUE gespeichert werden soll
|
||||
' Überspringt den Rest der funktion
|
||||
result_string = String.Join(";", result)
|
||||
If Not IsNothing(result_string) Then
|
||||
Return result_string
|
||||
Else
|
||||
Return Nothing
|
||||
End If
|
||||
End If
|
||||
|
||||
'If SQL_COMAMND.ToString.StartsWith("SELECT [RECORD_ID]") Or SQL_COMAMND.ToString.StartsWith("SELECT [RECORD-ID]") Then
|
||||
' 'Alle Recorddatensätze durchlaufen und überprüfen ob nicht angehakt
|
||||
' 'Wenn nicht angehakt dann Record löschen
|
||||
' Dim index As Integer = 0
|
||||
' For i As Integer = 0 To gridview.DataRowCount
|
||||
' ' Dim item = chklbx.GetItem(i)
|
||||
' ' Dim row As DataRowView = CType(item, DataRowView)
|
||||
' If CBool(gridview.GetRowCellValue(i, "CHECKED")) = False Then
|
||||
' ' If CInt(row(0)) > 0 Then
|
||||
' ' 'Überprüfen ob es den Record gibt
|
||||
' ' Dim SQL = "SELECT COUNT(*) FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID = " & CURRENT_RECORD_ID & " AND RECORD2_ID = " & CInt(row(0))
|
||||
' ' If ClassDatabase.Execute_Scalar(SQL) = 1 Then
|
||||
' ' SQL = "DELETE FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID = " & CURRENT_RECORD_ID & " AND RECORD2_ID = " & CInt(row(0))
|
||||
' ' If ClassDatabase.Execute_non_Query(SQL) = True Then
|
||||
' ' If LogErrorsOnly = False Then ClassLogger.Add(" >> TBPMO_RECORD_CONNECT-Entry after 'deselect CheckedListBox' deleted", False)
|
||||
' ' End If
|
||||
' ' End If
|
||||
' ' End If
|
||||
' End If
|
||||
' Next
|
||||
'End If
|
||||
|
||||
|
||||
''Für jeden gecheckten Eintrag den Record der Stammentität mit dem selektierten linken
|
||||
'Dim checked_result As New List(Of String)
|
||||
'Dim checked_result_string As String
|
||||
'If SQL_COMAMND.ToString.StartsWith("SELECT [RECORD_ID]") Or SQL_COMAMND.ToString.StartsWith("SELECT [RECORD-ID]") Then
|
||||
|
||||
' For Each item As Object In DirectCast(ctrl, DevExpress.XtraEditors.CheckedListBoxControl).CheckedItems
|
||||
' Dim row As DataRowView = CType(item, DataRowView)
|
||||
' Try
|
||||
' If CInt(row(0)) > 0 Then
|
||||
' Dim rid = CInt(row(0))
|
||||
' Dim checked_value = row(1)
|
||||
' checked_result.Add(checked_value)
|
||||
' checked_result_string = String.Join(";", checked_result)
|
||||
' Dim SQL = "SELECT COUNT(*) FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID = " & CURRENT_RECORD_ID & " AND RECORD2_ID = " & CInt(row(0))
|
||||
' If ClassDatabase.Execute_Scalar(SQL) = 0 Then
|
||||
' If CURRENT_RECORD_ID = 0 Then
|
||||
' MsgBox("Attention: no current record Selected!", MsgBoxStyle.Exclamation)
|
||||
' Else
|
||||
' If ConnectRecord(CURRENT_RECORD_ID, CInt(row(0)), "CheckedListBox;" & ctrl.Name) = True Then
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(" >> Checked ListBox record '" & rid.ToString & "' was linked successfully.", False)
|
||||
' End If
|
||||
' End If
|
||||
|
||||
' End If
|
||||
' End If
|
||||
' Catch ex As Exception
|
||||
' ClassLogger.Add("Error in CheckedListBoxGetControlValue: " & ex.Message, True)
|
||||
' End Try
|
||||
|
||||
' Next
|
||||
'Else
|
||||
|
||||
' For Each item As Object In DirectCast(ctrl, DevExpress.XtraEditors.CheckedListBoxControl).CheckedItems
|
||||
' Dim row As DataRowView = CType(item, DataRowView)
|
||||
' If row.DataView.Table.Columns.Count = 1 Then
|
||||
' Dim checked_value = row(0)
|
||||
' checked_result.Add(checked_value)
|
||||
' ElseIf row.DataView.Table.Columns.Count = 2 Then
|
||||
' Dim checked_value = row(1)
|
||||
' checked_result.Add(checked_value)
|
||||
' End If
|
||||
' checked_result_string = String.Join(";", checked_result)
|
||||
' Next
|
||||
|
||||
|
||||
|
||||
|
||||
'End If
|
||||
|
||||
'' Hier wird ein String zurückgegeben, der als VALUE gespeichert werden soll
|
||||
'' Überspringt den Rest der funktion
|
||||
'If Not IsNothing(checked_result_string) Then
|
||||
' 'Dim sql = String.Format("select count(*) from TBPMO_CONTROL_VALUE where CONTROL_ID = {0} and RECORD_ID = {1}", CONTROL_ID, CURRENT_RECORD_ID)
|
||||
' 'If ClassDatabase.Execute_Scalar(sql) = 0 Then
|
||||
' ' InsertControlValue(CONTROL_ID, CURRENT_RECORD_ID, "")
|
||||
' 'End If
|
||||
' Return checked_result_string
|
||||
'Else
|
||||
' 'In jedem Fall Nothing zurückgeben
|
||||
' Return Nothing
|
||||
'End If
|
||||
|
||||
|
||||
Case "ListBoxControl"
|
||||
Dim listbox As DevExpress.XtraEditors.ListBoxControl = DirectCast(ctrl, DevExpress.XtraEditors.ListBoxControl)
|
||||
|
||||
@ -81,88 +81,97 @@
|
||||
<Reference Include="CommandLine">
|
||||
<HintPath>..\..\3rdparty\lib\Commandline\CommandLine.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.BonusSkins.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.BonusSkins.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.BonusSkins.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.Data.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.Data.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.Data.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.Office.v15.1.Core, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.Office.v15.2.Core, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.Office.v15.2.Core.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.Pdf.v15.1.Core, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<Reference Include="DevExpress.Pdf.v15.1.Drawing, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<Reference Include="DevExpress.Printing.v15.1.Core, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.Pdf.v15.2.Core, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.Pdf.v15.2.Core.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.RichEdit.v15.1.Core, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.Pdf.v15.2.Drawing, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.Pdf.v15.2.Drawing.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.Printing.v15.2.Core, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.Printing.v15.2.Core.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.RichEdit.v15.2.Core, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.RichEdit.v15.2.Core.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.Utils.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraBars.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraBars.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraLayout.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraEditors.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraNavBar.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraGrid.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraPdfViewer.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DevExpress.XtraPrinting.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraLayout.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraLayout.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraRichEdit.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraNavBar.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraNavBar.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.1.Reporting.Extensions, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraPdfViewer.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraPdfViewer.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraPrinting.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraPrinting.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.1.Core, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraRichEdit.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraRichEdit.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.1.Extensions, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraScheduler.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraTreeList.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.2.Core, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraScheduler.v15.2.Core.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraVerticalGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.2.Extensions, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraScheduler.v15.2.Extensions.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraWizard.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<Reference Include="DevExpress.XtraScheduler.v15.2.Reporting.Extensions, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<Private>True</Private>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraScheduler.v15.2.Reporting.Extensions.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraTreeList.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraTreeList.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraVerticalGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraVerticalGrid.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraWizard.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\Programme\Sprachen\DevExpress 15.2\Components\Bin\Framework\DevExpress.XtraWizard.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DLLLicenseManager">
|
||||
<HintPath>..\..\lib\DLLLicenseManager.dll</HintPath>
|
||||
@ -214,6 +223,9 @@
|
||||
<Private>True</Private>
|
||||
</Reference>
|
||||
<Reference Include="PresentationCore" />
|
||||
<Reference Include="SnapPanelControl">
|
||||
<HintPath>..\SnapPanelControl\bin\Debug\SnapPanelControl.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
@ -639,6 +651,7 @@
|
||||
<EmbeddedResource Include="frmWD_Import_Doc_Record.resx">
|
||||
<DependentUpon>frmWD_Import_Doc_Record.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\licenses.licx" />
|
||||
<EmbeddedResource Include="Strings\ControlProperties.en.resx">
|
||||
<Generator>ResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>ControlProperties.en.Designer.vb</LastGenOutput>
|
||||
@ -891,7 +904,6 @@
|
||||
<EmbeddedResource Include="frmwindreamView_Config.resx">
|
||||
<DependentUpon>frmwindreamView_Config.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\licenses.licx" />
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
@ -1304,12 +1316,6 @@
|
||||
<None Include="Resources\138_PushPin_32x42_721.png" />
|
||||
<Content Include="Resources\138_PushPin_48x48_72.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ProjectReference Include="..\SnapPanelControl\SnapPanelControl.vbproj">
|
||||
<Project>{9B1BBAC7-F595-43BA-8B54-CF2B595847CD}</Project>
|
||||
<Name>SnapPanelControl</Name>
|
||||
</ProjectReference>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
|
||||
@ -1,11 +1,2 @@
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Navigation.TileNavPane, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraVerticalGrid.VGridControl, DevExpress.XtraVerticalGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.LookUpEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraPdfViewer.PdfViewer, DevExpress.XtraPdfViewer.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Navigation.TileNavPane, DevExpress.XtraBars.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
|
||||
@ -360,9 +360,9 @@ Partial Class frmConstructor_Main
|
||||
Me.grvwGrid.Name = "grvwGrid"
|
||||
Me.grvwGrid.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.grvwGrid.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.grvwGrid.OptionsBehavior.CopyToClipboardWithColumnHeaders = False
|
||||
Me.grvwGrid.OptionsBehavior.Editable = False
|
||||
Me.grvwGrid.OptionsBehavior.ReadOnly = True
|
||||
Me.grvwGrid.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.grvwGrid.OptionsSelection.EnableAppearanceFocusedCell = False
|
||||
Me.grvwGrid.OptionsSelection.EnableAppearanceFocusedRow = False
|
||||
Me.grvwGrid.OptionsSelection.EnableAppearanceHideSelection = False
|
||||
@ -370,7 +370,6 @@ Partial Class frmConstructor_Main
|
||||
Me.grvwGrid.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
|
||||
Me.grvwGrid.OptionsView.ColumnAutoWidth = False
|
||||
Me.grvwGrid.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.grvwGrid.OptionsView.EnableAppearanceOddRow = True
|
||||
Me.grvwGrid.OptionsView.ShowAutoFilterRow = True
|
||||
Me.grvwGrid.VertScrollVisibility = DevExpress.XtraGrid.Views.Base.ScrollVisibility.Always
|
||||
'
|
||||
@ -386,8 +385,6 @@ Partial Class frmConstructor_Main
|
||||
Me.grvwTiles.FocusBorderColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.grvwTiles.GridControl = Me.GridControlMain
|
||||
Me.grvwTiles.Name = "grvwTiles"
|
||||
Me.grvwTiles.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.grvwTiles.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.grvwTiles.OptionsBehavior.ReadOnly = True
|
||||
Me.grvwTiles.OptionsFind.AlwaysVisible = True
|
||||
Me.grvwTiles.OptionsTiles.HorizontalContentAlignment = DevExpress.Utils.HorzAlignment.Near
|
||||
|
||||
@ -307,7 +307,7 @@
|
||||
<value>GridControlMain</value>
|
||||
</data>
|
||||
<data name=">>GridControlMain.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControlMain.Parent" xml:space="preserve">
|
||||
<value>SplitContainerTop.Panel2</value>
|
||||
@ -331,7 +331,7 @@
|
||||
<value>SplitContainerTop</value>
|
||||
</data>
|
||||
<data name=">>SplitContainerTop.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>SplitContainerTop.Parent" xml:space="preserve">
|
||||
<value>SplitContainerMain.Panel1</value>
|
||||
@ -400,7 +400,7 @@
|
||||
<value>TabDetails</value>
|
||||
</data>
|
||||
<data name=">>TabDetails.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>TabDetails.Parent" xml:space="preserve">
|
||||
<value>TCDetails</value>
|
||||
@ -478,7 +478,7 @@
|
||||
<value>GridControlDocSearch</value>
|
||||
</data>
|
||||
<data name=">>GridControlDocSearch.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControlDocSearch.Parent" xml:space="preserve">
|
||||
<value>TabWindream</value>
|
||||
@ -560,7 +560,7 @@
|
||||
<value>TabWindream</value>
|
||||
</data>
|
||||
<data name=">>TabWindream.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>TabWindream.Parent" xml:space="preserve">
|
||||
<value>TCDetails</value>
|
||||
@ -991,7 +991,7 @@
|
||||
<value>TabFollowUp</value>
|
||||
</data>
|
||||
<data name=">>TabFollowUp.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>TabFollowUp.Parent" xml:space="preserve">
|
||||
<value>TCDetails</value>
|
||||
@ -1018,7 +1018,7 @@
|
||||
<value>GridControlPos</value>
|
||||
</data>
|
||||
<data name=">>GridControlPos.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControlPos.Parent" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
@ -1246,7 +1246,7 @@
|
||||
<value>TabPos</value>
|
||||
</data>
|
||||
<data name=">>TabPos.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>TabPos.Parent" xml:space="preserve">
|
||||
<value>TCDetails</value>
|
||||
@ -1258,7 +1258,7 @@
|
||||
<value>TCDetails</value>
|
||||
</data>
|
||||
<data name=">>TCDetails.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>TCDetails.Parent" xml:space="preserve">
|
||||
<value>SplitContainerBottom.Panel1</value>
|
||||
@ -1503,7 +1503,7 @@
|
||||
<value>GridControlParent</value>
|
||||
</data>
|
||||
<data name=">>GridControlParent.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControlParent.Parent" xml:space="preserve">
|
||||
<value>Panel2</value>
|
||||
@ -1578,7 +1578,7 @@
|
||||
<value>SplitContainerBottom</value>
|
||||
</data>
|
||||
<data name=">>SplitContainerBottom.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>SplitContainerBottom.Parent" xml:space="preserve">
|
||||
<value>SplitContainerMain.Panel2</value>
|
||||
@ -1602,7 +1602,7 @@
|
||||
<value>SplitContainerMain</value>
|
||||
</data>
|
||||
<data name=">>SplitContainerMain.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>SplitContainerMain.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
@ -1659,7 +1659,7 @@
|
||||
<value>NavPane</value>
|
||||
</data>
|
||||
<data name=">>NavPane.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.Navigation.TileNavPane, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraBars.Navigation.TileNavPane, DevExpress.XtraBars.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>NavPane.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
@ -1721,11 +1721,11 @@
|
||||
<metadata name="ImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>610, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="DevExpress.Utils.v15.1" name="DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<data name="ImageCollection1.ImageStream" type="DevExpress.Utils.ImageCollectionStreamer, DevExpress.Utils.v15.1" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<assembly alias="DevExpress.Utils.v15.2" name="DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<data name="ImageCollection1.ImageStream" type="DevExpress.Utils.ImageCollectionStreamer, DevExpress.Utils.v15.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxNS4xLCBWZXJzaW9uPTE1LjEu
|
||||
Ny4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEFAQAAAChE
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxNS4yLCBWZXJzaW9uPTE1LjIu
|
||||
OS4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEFAQAAAChE
|
||||
ZXZFeHByZXNzLlV0aWxzLkltYWdlQ29sbGVjdGlvblN0cmVhbWVyAAAAAAIAAAAL
|
||||
</value>
|
||||
</data>
|
||||
@ -2344,19 +2344,19 @@
|
||||
<value>grvwGrid</value>
|
||||
</data>
|
||||
<data name=">>grvwGrid.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>grvwCarousel.Name" xml:space="preserve">
|
||||
<value>grvwCarousel</value>
|
||||
</data>
|
||||
<data name=">>grvwCarousel.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Layout.LayoutView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.Views.Layout.LayoutView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>grvwTiles.Name" xml:space="preserve">
|
||||
<value>grvwTiles</value>
|
||||
</data>
|
||||
<data name=">>grvwTiles.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Tile.TileView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.Views.Tile.TileView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>DateiÖffnenToolStripMenuItem.Name" xml:space="preserve">
|
||||
<value>DateiÖffnenToolStripMenuItem</value>
|
||||
@ -2404,7 +2404,7 @@
|
||||
<value>GridViewDoc_Search</value>
|
||||
</data>
|
||||
<data name=">>GridViewDoc_Search.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>tslblWindreamView.Name" xml:space="preserve">
|
||||
<value>tslblWindreamView</value>
|
||||
@ -2440,7 +2440,7 @@
|
||||
<value>grvwGridPos</value>
|
||||
</data>
|
||||
<data name=">>grvwGridPos.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>BindingNavigatorAddNewItem.Name" xml:space="preserve">
|
||||
<value>BindingNavigatorAddNewItem</value>
|
||||
@ -2638,7 +2638,7 @@
|
||||
<value>GridViewParent</value>
|
||||
</data>
|
||||
<data name=">>GridViewParent.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>BindingSource_Entity.Name" xml:space="preserve">
|
||||
<value>BindingSource_Entity</value>
|
||||
@ -2650,19 +2650,19 @@
|
||||
<value>TileNavCategory1</value>
|
||||
</data>
|
||||
<data name=">>TileNavCategory1.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.Navigation.TileNavCategory, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraBars.Navigation.TileNavCategory, DevExpress.XtraBars.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>NavButtonHome.Name" xml:space="preserve">
|
||||
<value>NavButtonHome</value>
|
||||
</data>
|
||||
<data name=">>NavButtonHome.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.Navigation.NavButton, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraBars.Navigation.NavButton, DevExpress.XtraBars.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>NavButtonRefresh.Name" xml:space="preserve">
|
||||
<value>NavButtonRefresh</value>
|
||||
</data>
|
||||
<data name=">>NavButtonRefresh.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.Navigation.NavButton, DevExpress.XtraBars.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.XtraBars.Navigation.NavButton, DevExpress.XtraBars.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>tsslblStatus.Name" xml:space="preserve">
|
||||
<value>tsslblStatus</value>
|
||||
@ -2692,7 +2692,7 @@
|
||||
<value>ImageCollection1</value>
|
||||
</data>
|
||||
<data name=">>ImageCollection1.Type" xml:space="preserve">
|
||||
<value>DevExpress.Utils.ImageCollection, DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.Utils.ImageCollection, DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>ttToolTip.Name" xml:space="preserve">
|
||||
<value>ttToolTip</value>
|
||||
@ -2752,7 +2752,7 @@
|
||||
<value>ToolTipController</value>
|
||||
</data>
|
||||
<data name=">>ToolTipController.Type" xml:space="preserve">
|
||||
<value>DevExpress.Utils.ToolTipController, DevExpress.Utils.v15.1, Version=15.1.7.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
<value>DevExpress.Utils.ToolTipController, DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>$this.Name" xml:space="preserve">
|
||||
<value>frmConstructor_Main</value>
|
||||
|
||||
@ -4796,13 +4796,13 @@ Public Class frmConstructor_Main
|
||||
Exit Sub
|
||||
End If
|
||||
Try
|
||||
Dim row = grvwGrid.GetDataRow(e.RowHandle)
|
||||
Dim itemvalue = row.Item("COLOR")
|
||||
If itemvalue <> "" Then
|
||||
Console.WriteLine("RowColor: " & itemvalue)
|
||||
e.Appearance.BackColor = ColorTranslator.FromWin32(CInt(itemvalue))
|
||||
Dim rowCellValue = grvwGrid.GetRowCellValue(e.RowHandle, "COLOR")
|
||||
If rowCellValue <> "" Then
|
||||
Dim Color As Color = Color.FromArgb(rowCellValue)
|
||||
' Dim c As Color = DirectCast(rowCellValue, Color)
|
||||
e.Appearance.BackColor = Color
|
||||
e.HighPriority = True
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
@ -5339,4 +5339,7 @@ Public Class frmConstructor_Main
|
||||
#End Region
|
||||
|
||||
|
||||
Private Sub grvwGrid_CellValueChanged(sender As Object, e As CellValueChangedEventArgs) Handles grvwGrid.CellValueChanged
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
Loading…
x
Reference in New Issue
Block a user