Hi,

I can't tell you how to do this with themes, but I guess You can create a usercontrol to suit your needs, please have a look at the attached code snippets and images for reference. Create a folder called "ucImg" in your web root directory (or the dir where you put the user control) and copy the images to that folder. Drag and drop the user control onto your design surface, then in your page_init event add:

    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
        ucStyledTextBox1.Height = 15
        ucStyledTextBox1.Width = 250
        ucStyledTextBox1.Text = "Trying out styled textbox..."
    End Sub

That should do it!

/Carl.

ucStyledTextBox.ascx:
 
<%@ Control Language="VB" AutoEventWireup="false" CodeFile="ucStyledTextBox.ascx.vb" Inherits="ucStyledTextBox" %>
<asp:table ID="constructTable" runat="server" CellPadding="0" CellSpacing="0" BorderWidth="0">
    <asp:TableRow ID="topConstructRow" runat="server">
        <asp:TableCell ID="topLeftConstructCell" runat="server">
            <asp:Image ID="ul" ImageUrl="~/ucImg/ul.gif" runat="server" />
        </asp:TableCell>
        <asp:TableCell ID="topConstructCell" runat="server">
            <asp:Image ID="u" ImageUrl="~/ucImg/t.gif" runat="server" />
        </asp:TableCell>
        <asp:TableCell ID="topRightConstructCell" runat="server" >
            <asp:Image ID="ur" ImageUrl="~/ucImg/ur.gif" runat="server" />
        </asp:TableCell>
    </asp:TableRow>
    <asp:TableRow ID="middleConstructRow" runat="server">
        <asp:TableCell ID="leftConstructCell" runat="server">
            <asp:Image ID="l" imageUrl="~/ucImg/l.gif" runat="server" />
        </asp:TableCell>
        <asp:TableCell ID="centerConstructCell" runat="server">
            <asp:TextBox ID="txtContent" Style="background-color: #FFFFFF;font: Arial;font-size: 10pt; border:solid 0px White;" runat="server" />
        </asp:TableCell>
        <asp:TableCell ID="rightConstructCell" runat="server">
            <asp:Image ID="r" ImageUrl="~/ucImg/r.gif" runat="server" />
        </asp:TableCell>
    </asp:TableRow>
    <asp:TableRow ID="bottomConstructRow" runat="server">
        <asp:TableCell ID="lowerLeftConstructCell" runat="server">
            <asp:Image ID="ll" ImageUrl="~/ucImg/ll.gif" runat="server" />
        </asp:TableCell>
        <asp:TableCell ID="lowerConstructCell" runat="server">
            <asp:Image ID="b" ImageUrl="~/ucImg/b.gif" runat="server" />
        </asp:TableCell>
        <asp:TableCell ID="lowerRightConstructCell" runat="server">
            <asp:Image ID="br" ImageUrl="~/ucImg/br.gif" runat="server" />
        </asp:TableCell>
    </asp:TableRow>
</asp:table>
 
ucStyledTextBox.ascx.vb:
 
 
Partial Class ucStyledTextBox
    Inherits System.Web.UI.UserControl
 
    Private _normHeight As System.Web.UI.WebControls.Unit = 7
    Private _normWidth As System.Web.UI.WebControls.Unit = 7
    Private _height As System.Web.UI.WebControls.Unit = 0
    Private _width As System.Web.UI.WebControls.Unit = 0
    Private _fontHeight As System.Web.UI.WebControls.FontSize = 0
 
    Public Property Height() As System.Web.UI.WebControls.Unit
        Get
            Return _height
        End Get
        Set(ByVal value As System.Web.UI.WebControls.Unit)
            _height = value
        End Set
    End Property
 
    Public Property Width() As System.Web.UI.WebControls.Unit
        Get
            Return _width
        End Get
        Set(ByVal value As System.Web.UI.WebControls.Unit)
            _width = value
        End Set
    End Property
 
    Public Property FontHeight() As System.Web.UI.WebControls.FontSize
        Get
            Return _fontHeight
        End Get
        Set(ByVal value As System.Web.UI.WebControls.FontSize)
            _fontHeight = value
        End Set
    End Property
 
    Public Property Text() As String
        Get
            Return txtContent.Text.ToString
        End Get
        Set(ByVal value As String)
            txtContent.Text = value
        End Set
    End Property
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not _height = 0 Then
            txtContent.Height = _height
        Else
            txtContent.Height = 15
        End If
        If Not _width = 0 Then
            txtContent.Width = _width
        Else
            txtContent.Width = 200
        End If
        If Not _fontHeight = 0 Then
            txtContent.Font.Size = _fontHeight
        Else
            txtContent.Font.Size = 15
        End If
        l.Height = txtContent.Height.Value + 4
        l.Width = _normWidth
        r.Height = txtContent.Height.Value + 4
        r.Width = _normWidth
        u.Width = txtContent.Width.Value + 2
        u.Height = _normHeight
        b.Width = txtContent.Width.Value + 2
        b.Height = _normHeight
    End Sub
End Class

Select allOpen in new window

ucImages.zip

wow, I wasn't expecting someone to show me all that!  only one problem...  My project is in C#?

-J

Hi,

So, did this solve it for you?

/Carl.

Hi,

No feedback from You on my provided solution, can you please close out the question and reward points if the solution was what you needed? Thx.

/Carl.