Grundeinstellungen nicht abhängig von Anzahl definierter Sprachen
This commit is contained in:
parent
6945585ca3
commit
7d58223e3a
@ -281,7 +281,7 @@ Public Class frmAdministration
|
||||
End Sub
|
||||
|
||||
Sub Refresh_Free_Groups(PROFILE_ID As Integer)
|
||||
Dim Sql = String.Format("SELECT DISTINCT * FROM TBDD_GROUPS WHERE INTERNAL = 0 AND GUID NOT IN (SELECT GROUP_ID FROM TBCW_GROUP_PROFILE WHERE PROFILE_ID = {0}) ORDER BY NAME", PROFILE_ID)
|
||||
Dim Sql = String.Format("SELECT DISTINCT * FROM TBDD_GROUPS WHERE GUID NOT IN (SELECT GROUP_ID FROM TBCW_GROUP_PROFILE WHERE PROFILE_ID = {0}) ORDER BY NAME", PROFILE_ID)
|
||||
Dim oDataTable = MyDB_DDECM.GetDatatable(Sql)
|
||||
|
||||
Try
|
||||
|
||||
@ -113,9 +113,10 @@ Public Class frmMain
|
||||
RibbonPageGroup1.Visible = False
|
||||
RibbonControl1.Minimized = True
|
||||
End If
|
||||
If BASEDATA_DT_LANGUAGE.Rows.Count > 1 Then
|
||||
If BASEDATA_DT_LANGUAGE.Rows.Count >= 1 Then
|
||||
bbtniKonfig.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
Else
|
||||
Logger.Info("Keine Grundeinstellungen weil keine Sprachen definiert!")
|
||||
bbtniKonfig.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
End If
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user