Как преобразовать тип проекта в общий класс библиотеки типа

Question

(образцы C# код находятся в нижней части вопроса.)

У меня есть библиотека классов общего между количеством решений, с типом называется SharedType. У меня есть метод в библиотеке классов, которая обрабатывает коллекцию этого типа:

Sub ProcessSharedTypeEnumerable(src As IEnumerable(Of SharedType)) 
    'do something here 
End Sub 

Каждое решение имеет свой конкретный тип, который должен сопоставить/преобразовать в SharedType:

Namespace Project1 
    Class ProjectType 
    End Class 
End Namespace 

Как я могу позвонить ProcessSharedTypeEnumerable без необходимости конвертировать ProjectType в SharedType на сайт звонка?

Dim lst As New List(Of ProjectType) 
'populate list 

'instead of this: 
ProcessSharedTypeEnumerable(lst.Select(Function(x) New SharedType With { 'populate members here' }) 
'use this: 
ProcessSharedTypeEnumerable(lst) 

---

Я знаю, что могу иметь тип проекта реализовать интерфейс из класса библиотеки, который имеет метод, который сопоставляет к общему типу

Public Interface ISharedTypeMappable 
    Function ToSharedType() As SharedType 
End Interface 

Тогда метод ProcessSharedTypeEnumerable может принимать IEnumerable(Of ISharedTypeMappable) и я могу позвонить .Select(Function(x) x.ToSharedType) в пределах ProcessSharedTypeEnumerable, чтобы получить IEnumerable(Of SharedType).

---

Есть ли более «правильный» способ сделать это? Общая ковариация и неявное преобразование? Некоторые встроенные механизмы преобразования .NET?

---

C# примеры кода

библиотека классов метод: Код

static class Utils { //I know it's an awful name ... 
    static void ProcessSharedTypeEnumerable(IEnumerable<SharedType> src) { 
     //do something here 
    } 
} 

Проект:

var lst = new List<ProjectType>(); 
//populate list 

//instead of this: 
Utils.ProcessSharedTypeEnumerable(lst.Select(x=>new SharedType { /* populate properties here */})); 
//do this 
Utils.ProcessSharedTypeEnumerable(lst); 

---

Update

Я не хочу иметь ProjectType наследоваться от SharedType по двум причинам (1) ProjectType уже унаследована от другого базового типа, и (2) SharedType могут иметь элементы, которые не должны быть на ProjectType.

Answer 1

Наследование?

Sub Main() 
    Dim lst As New List(Of ProjectType) From { 
     New ProjectType With {.s = "1"}, 
     New ProjectType With {.s = "2"}, 
     New ProjectType With {.s = "3"} 
    } 
    SharedType.ProcessSharedTypeEnumerable(lst) 
End Sub 

Shared Sub ProcessSharedTypeEnumerable(src As IEnumerable(Of SharedType)) 
    For Each st As SharedType In src 
     MsgBox(st.s) 
    Next 
End Sub 

Class SharedType 
    Property s As String 
End Class 

Class ProjectType 
    Inherits SharedType 
End Class 

Answer 2

EDIT: Это теперь сообщества вики ответ

В соответствии с просьбой, вот моя попытка реализации Operator Widening CType. Однако это не сработает. Может быть, кто-то, кто это читает, может это исправить.

Module Module1 

    Sub Main() 
    Dim lst As New List(Of ProjectType) From { 
     New ProjectType With {.t = "1"}, 
     New ProjectType With {.t = "2"}, 
     New ProjectType With {.t = "3"} 
    } 
    MsgBox(CType(lst(0), SharedType).s) 'This works' 
    ProcessSharedTypeEnumerable(lst) 'This does not :-(' 
    ProcessSharedTypeEnumerable(lst.Cast(Of SharedType).ToList) 'Neither does this :-(' 
    End Sub 

    Sub ProcessSharedTypeEnumerable(src As IEnumerable(Of SharedType)) 
    For Each st As SharedType In src 
     MsgBox(st.s) 
    Next st 
    End Sub 

    Class SharedType 
    Property s As String 
    End Class 

    Class ProjectType 
    Property t As String 

    Public Shared Widening Operator CType(p As ProjectType) As SharedType 
     Return New SharedType With {.s = p.t} 
    End Operator 
    End Class 
End Module