Dim Ass As Reflection.Assembly = _
              System.Reflection.Assembly.GetExecutingAssembly()
            Dim frm As DevExpress.XtraEditors.XtraForm = Nothing
            Dim instances As Int16
            For Each myType As Type In Ass.GetTypes
                If UCase(myType.Name) = UCase(tnTag.strFormularname) Then
 
                    Dim t As Type = Type.GetType(myType.FullName)
                    instances = CShort(t.InvokeMember("GetInstances", _
                      BindingFlags.InvokeMethod, _
                                            Nothing, Nothing, New Object() {}))
                    If (instances < 1) Then
                        frm = CType(Ass.CreateInstance(myType.FullName), _
                          XtraForm)
                        frm.Show()
                    Else
 
                        '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
                        ' !!!!!
                        'Hier hänge ich nun: Wie kriege ich es hin, dass
                        'ein bereits instanziertes Formular z.b. aus der 
                        ' Taskleiste "hochgeholt" wird,
                        'den Fokus erhält.... 
                        'Dim mi As MethodInfo = t.GetMethod("Show", New Type() 
                        ' {})
                        'mi.Invoke(t, Nothing)
                    End If
                    Exit For
                End If
            Next