Inherits from Control, Yay, Inherits from WebControl, Nay....

[Alex Nitulescu]

Hi, I have the following in project "RaducuCustomCo ntrols":

Imports System.Componen tModel
Imports System.Web.UI

<DefaultPropert y("Text"), ToolboxData("<{ 0}:Rotator1
runat=server></{0}:Rotator1>") > Public Class Rotator1
Inherits System.Web.UI.W ebControls.WebC ontrol

Public Items As New ArrayList()

Protected Overrides Sub Render(ByVal output As
System.Web.UI.H tmlTextWriter)

Dim objRandom As New Random()
Dim intRanIndex As Integer
Dim objSelectedItem As RotatorItem1

If Items.Count > 0 Then
intRanIndex = objRandom.Next( Items.Count)
objSelectedItem = CType(Items(int RanIndex), RotatorItem1)
output.Write(ob jSelectedItem.T ext)
End If
End Sub

Protected Overrides Sub AddParsedSubObj ect(ByVal obj As Object)

If TypeOf obj Is RotatorItem1 Then
Items.Add(obj)
End If
End Sub
End Class

<DefaultPropert y("Text"), ToolboxData("<{ 0}:RotatorItem1
runat=server></{0}:RotatorItem 1>")> Public Class RotatorItem1
Inherits System.Web.UI.W ebControls.WebC ontrol

Dim _text As String
Dim _color As String

<Description("T he text of this item"), Bindable(True),
Category("Appea rance"), DefaultValue("" )> Property [Text]() As String
Get
Return _text
End Get

Set(ByVal Value As String)
_text = Value
End Set
End Property

<Description("T he color in which the text will be rendered"),
Bindable(True), Category("Appea rance"), DefaultValue("B lack")> Property
[Color]() As String
Get
Return _color
End Get

Set(ByVal Value As String)
_color = Value
End Set
End Property

Protected Overrides Sub Render(ByVal writer As
System.Web.UI.H tmlTextWriter)

writer.AddAttri bute("color", [Color])
writer.RenderBe ginTag("font")
writer.Write([Text])
writer.RenderEn dTag()
End Sub
End Class

I also have <Assembly: TagPrefix("Radu cuCustomControl s", "raducu")> in
AssemblyInfo.vb in "RaducuCustomCo ntrols". Therefore, I expect the following
code to run just fine:

<raducu:Rotator 1 id="Rotator11" runat="server">
<raducu:Rotator Item1 id="RotatorItem 11" text="One" color="red"
runat="server"> </raducu:RotatorI tem1>
<raducu:Rotator Item1 id="Rotatoritem 12" text="Two" color="green"
runat="server"> </raducu:RotatorI tem1>
<raducu:Rotator Item1 id="Rotatoritem 13" text="Three" color="blue"
runat="server"> </raducu:RotatorI tem1>
<raducu:Rotator Item1 id="Rotatoritem 14" text="Four"
runat="server"> </raducu:RotatorI tem1>
</raducu:Rotator1 >

However, I get

Type 'RaducuCustomCo ntrols.Rotator1 ' does not have a property named
'raducu:Rotator Item1'.

on <raducu:Rotator Item1 id="RotatorItem 11" text="One" color="red"
runat="server"> </raducu:RotatorI tem1>.

If I change the Inherits in my custom control from Webcontrol to control, it
works, although I don't see the properties I'm interested in.

Please tell me, what am I missing here ?

Thank you, Alex.