fix imageselector, fix sql designer

This commit is contained in:
Jonathan Jenne 2019-11-15 15:05:38 +01:00
parent fefb26b556
commit 8b9b409769
3 changed files with 1 additions and 4 deletions

View File

@ -21,7 +21,7 @@ Public Class ClassImageSelector
value = "No selection"
End If
Return value
Return New ImageValue(value)
End Function
End Class

View File

@ -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)