diff --git a/app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache b/app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache index 715c91b..671ed4a 100644 Binary files a/app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache and b/app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache differ diff --git a/app/DD_PM_WINDREAM/ClassImageSelector.vb b/app/DD_PM_WINDREAM/ClassImageSelector.vb index af37acf..e704296 100644 --- a/app/DD_PM_WINDREAM/ClassImageSelector.vb +++ b/app/DD_PM_WINDREAM/ClassImageSelector.vb @@ -21,7 +21,7 @@ Public Class ClassImageSelector value = "No selection" End If - Return value + Return New ImageValue(value) End Function End Class diff --git a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb index 9bf936f..77b1c6a 100644 --- a/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb +++ b/app/DD_PM_WINDREAM/frmSQL_DESIGNER.vb @@ -47,9 +47,6 @@ Public Class frmSQL_DESIGNER If CURRENT_DT_SQL_CONFIG_TABLE.Rows.Count = 1 Then cmbConnection.SelectedValue = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CONNECTION_ID") cmbConnection.FindStringExact(CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CON_STRING")) - SQL_COMMANDTextBox.Text = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("SQL_COMMAND") - Else - SQL_COMMANDTextBox.Text = String.Empty End If Dim oSQL = String.Format("SELECT NAME FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {0} AND CTRL_TYPE <> 'LBL' ORDER BY NAME", CURRENT_ProfilGUID)