AppStd/TaskFlow
8
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Prüfen der Offenen Tickets und Push in Master, frmValidator (Fehlerhandling, Currency etc)

Browse Source
This commit is contained in:
Developer01
2025-08-15 12:55:53 +02:00
parent c4f77ed2e8
commit ffa65a9c07
10 changed files with 845 additions and 804 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
app/TaskFlow/frmValidatorSearch.vb
View File

@@ -77,14 +77,15 @@ Public Class frmValidatorSearch
Return oOperationMode
End Function
Public Sub TabPreload(Panel1Collapsed As Boolean, Panel2Collapsed As Boolean, TabCountSQL As Integer, TabCountDoc As Integer, DTSQL As DataTable, DTDOC As DataTable)
Public Sub TabPreload(TabCountSQL As Integer, TabCountDoc As Integer, DTSQL As DataTable, DTDOC As DataTable)
Try
SplitContainerSearches.Panel1Collapsed = IIf(DTSQL.Rows.Count > 0, False, True)
SplitContainerSearches.Panel2Collapsed = IIf(DTDOC.Rows.Count > 0, False, True)
If Me.InvokeRequired() Then
Me.Invoke(Sub() TabPreload(Panel1Collapsed, Panel2Collapsed, TabCountSQL, TabCountDoc, DTSQL, DTDOC))
Me.Invoke(Sub() TabPreload(TabCountSQL, TabCountDoc, DTSQL, DTDOC))
Else
'#### SQL Tabs Design Laden
SplitContainerSearches.Panel1Collapsed = Panel1Collapsed
SplitContainerSearches.Panel2Collapsed = Panel2Collapsed
If DTSQL.Rows.Count > 0 Then
For p As Integer = 0 To XtraTabControlSQL.TabPages.Count - 1
If XtraTabControlSQL.TabPages(p).TabIndex >= TabCountSQL Then