Dear team,
I want to make he header of my database has a merge column. I already got
the code, but in c#. can someboby translate this code into vb. Below is the
list of the class
Thanks rizal
using System;
using System.Web.UI.WebControls;
using System.Collections;
using System.Web.UI;
namespace Test
{
/// <summary>
/// Summary description for ASPNetDatagridDecorator.
/// </summary>
public class ASPNetDatagridDecorator
{
public ASPNetDatagridDecorator()
{
//
// TODO: Add constructor logic here
//
}
private ASPNetDatagridDecorator(DataGrid
DatagridToDecorate, ArrayList HeaderCells)
{
//
// TODO: Add constructor logic here
//
this.DatagridToDecorate =
DatagridToDecorate;
AddMergeHeader(HeaderCells);
}
public void AddMergeHeader(ArrayList arrHeaderCells)
{
m_arrHeaderCells =arrHeaderCells;
}
private void NewRenderMethod(HtmlTextWriter writer,
Control ctl)
{
int iCurrIndex = 0;
for(int i=0; i<m_arrHeaderCells.Count;
i++)
{
TableCell item =
(TableCell)m_arrHeaderCells[i];
if(item.ColumnSpan > 1)
{
iCurrIndex +=
item.ColumnSpan-1;
}
if(item.RowSpan > 1)
{
m_htblRowspanIndex.Add(iCurrIndex + i, iCurrIndex + i);
}
item.RenderControl(writer);
}
writer.WriteEndTag("TR");
//*** Add the style attributes that was
defined in design time
// to our second row so they
both will have the same appearance
m_dgDatagridToDecorate.HeaderStyle.AddAttributesToRender(writer);
//*** Insert the second row
writer.RenderBeginTag("TR");
//*** Render all the cells that was
defined in design time, except the last one
// because we already
rendered it above
for(int i=0; i< ctl.Controls.Count; i++)
{
if((null ==
m_htblRowspanIndex[i]))
{
ctl.Controls[i].RenderControl(writer);
}
}
//*** We don't need to write the </TR>
close tag because the writer will do that for us
// and so we're done :)
}
/// <summary>
/// Gets or sets the datagrid to decorate
/// </summary>
public DataGrid DatagridToDecorate
{
get
{
return
m_dgDatagridToDecorate;
}
set
{
if(null !=
m_dgDatagridToDecorate)
{
m_dgDatagridToDecorate.ItemCreated -= new
DataGridItemEventHandler(DatagridToDecorate_ItemCreated);
}
m_dgDatagridToDecorate =
value;
m_dgDatagridToDecorate.ItemCreated += new
DataGridItemEventHandler(DatagridToDecorate_ItemCreated);
}
}
private void DatagridToDecorate_ItemCreated(object
sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
//*** Examine if the item created is the
header item
ListItemType lit = e.Item.ItemType;
if(ListItemType.Header == lit)
{
//*** Redirect the default
header rendering method to our own method
e.Item.SetRenderMethodDelegate(new RenderMethod(NewRenderMethod));
}
}
/// <summary>
/// Hold the reference to the datagrid to decorate
/// </summary>
private DataGrid m_dgDatagridToDecorate = null;
private ArrayList m_arrHeaderCells = null;
private Hashtable m_htblRowspanIndex = new
Hashtable();
}
}
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.10.15/82 - Release Date: 8/25/2005
[Non-text portions of this message have been removed]
------------------------ Yahoo! Groups Sponsor --------------------~-->
Fair play? Video games influencing politics. Click and talk back!
http://us.click.yahoo.com/T8sf5C/tzNLAA/TtwFAA/saFolB/TM
--------------------------------------------------------------------~->
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
