Dies ist der Code, den ich zu entwickeln versuche:
Public Structure Statistic(Of t)
Dim maxStat As t
Dim curStat As t
Public Sub New(ByVal pValue As t)
maxStat = pValue
curStat = pValue
End Sub
Public Property Level() As t
Get
Return curStat
End Get
Set(ByVal value As t)
curStat = value
If curStat > maxStat Then curStat = maxStat
End Set
End Property
End Structure
Es wird nicht kompiliert, weil ich eine Fehlermeldung erhalte, dass '>' für die Typen T und T nicht definiert ist. Kann ich irgendwie Einschränkungen angeben, die garantieren, dass T ein numerischer Typ ist?
Das ist das, was ich derzeit nach Änderungen und Vorschlägen der Benutzer habe. Es funktioniert immer noch nicht. Muss ich die Werte von T ändern, damit alle von ihnen IComparable sind? Es muss etwas wirklich einfach sein, dass ich vermasseln.
Public Structure Statistic(Of T As IComparable(Of T))
Dim maxStat As T
Dim curStat As T
Public Sub New(ByVal pValue As T)
maxStat = pValue
curStat = pValue
End Sub
Public Property Statistic() As T
Get
Return curStat
End Get
Set(ByVal value As T)
If value > maxStat Then
End If
End Set
End Property
End Structure