Hi
My code to change the back color of all the selected cells is working fine but It can not change the border color of all the selected cells of the grid. What I am doing wrong?
Here is my code:
private void dtgCpr_ViewCellFormatting(object sender, CellFormattingEventArgs e)
{
e.CellElement.DrawBorder = true;
if (e.CellElement.IsSelected)
{
e.CellElement.BorderColor = Color.Red;
e.CellElement.BackColor = Color.SeaShell;
}
}
Thanks
Regards
Private
Sub
rgvItems_CellFormatting(
ByVal
sender
As
Object
,
ByVal
e
As
CellFormattingEventArgs)
Handles
rgvItems.CellFormatting
If
TypeOf
e.CellElement.ColumnInfo
Is
GridViewCommandColumn
AndAlso
Not
(
TypeOf
e.CellElement.RowElement
Is
GridTableHeaderRowElement)
Then
Dim
column
As
GridViewCommandColumn =
DirectCast
(e.CellElement.ColumnInfo, GridViewCommandColumn)
If
column.Name =
"PLButton"
Then
Dim
element
As
RadButtonElement =
DirectCast
(e.CellElement.Children(0), RadButtonElement)
element.DisplayStyle = Telerik.WinControls.DisplayStyle.Image
' This is an example of course
element.Image = ImageList.Images(0)
'e.CellElement.StringAlignment = StringAlignment.Center
'Me.ApplyThemeToElement(element, "ControlDefault")
End
If
End
If
End
Sub
ColumnGroupsViewDefinition. When I use the same template on the MasterTemplate, it works fine. The code I use is
GridViewTemplate
gvChildTemplate = new GridViewTemplate();
gvChildTemplate.DataSource = _ds.Tables[1];
CustomizeChildTemplate(gvChildTemplate);
gvChildTemplate.ViewDefinition = _colGroupsView;
radGridView1.Templates.Add(gvChildTemplate);
GridViewRelation relation = new GridViewRelation(radGridView1.MasterTemplate);
relation.ChildTemplate = gvChildTemplate;
relation.RelationName =
"MeasureName";
relation.ParentColumnNames.Add(
"MeasureName");
relation.ChildColumnNames.Add(
"MeasureName");
radGridView1.Relations.Add(relation);
RadChart1.Series.Clear()
RadChart1.ChartTitle.TextBlock.Text =
"My Chart"
Dim
chartSeries
As
ChartSeries = RadChart1.CreateSeries(
"2009"
, System.Drawing.Color.RoyalBlue, System.Drawing.Color.LightSteelBlue, ChartSeriesType.Bar)
chartSeries.AddItem(120,
""
)
chartSeries.AddItem(140,
""
)
chartSeries.AddItem(35,
""
)
chartSeries.AddItem(120,
""
)
chartSeries.AddItem(140,
""
, System.Drawing.Color.Red)
chartSeries.AddItem(35,
""
)
chartSeries.AddItem(120,
""
)
chartSeries.AddItem(140,
""
)
RadChart1.Series.Add(chartSeries)
chartSeries.Appearance.LabelAppearance.Visible =
False
Dim
chartSeries2
As
ChartSeries = RadChart1.CreateSeries(
"2010"
, System.Drawing.Color.DarkBlue, System.Drawing.Color.LightBlue, ChartSeriesType.Bar)
chartSeries2.AddItem(120,
""
)
chartSeries2.AddItem(140,
""
)
chartSeries2.AddItem(35,
""
)
chartSeries2.AddItem(120,
""
)
chartSeries2.AddItem(140,
""
)
chartSeries2.AddItem(35,
""
)
chartSeries2.AddItem(120,
""
)
chartSeries2.AddItem(140,
""
)
RadChart1.Series.Add(chartSeries)
chartSeries2.Appearance.LabelAppearance.Visible =
False
RadChart1.PlotArea.XAxis.AxisLabel.TextBlock.Text =
"Months"
RadChart1.PlotArea.XAxis.AxisLabel.TextBlock.Appearance.TextProperties.Color = System.Drawing.Color.Red
RadChart1.PlotArea.XAxis.AddRange(1, 8, 1)
RadChart1.PlotArea.XAxis(0).TextBlock.Text =
"Jan"
RadChart1.PlotArea.XAxis(1).TextBlock.Text =
"Fev"
RadChart1.PlotArea.XAxis(2).TextBlock.Text =
"Mar"
RadChart1.PlotArea.XAxis(3).TextBlock.Text =
"Abr"
RadChart1.PlotArea.XAxis(4).TextBlock.Text =
"Mai"
RadChart1.PlotArea.XAxis(5).TextBlock.Text =
"Jun"
RadChart1.PlotArea.XAxis(6).TextBlock.Text =
"Jul"
RadChart1.PlotArea.XAxis(7).TextBlock.Text =
"Ago"
RadChart1.DataBind()
Private Sub rgvGrid_CellEditorInitialized(ByVal sender As Object, _ |
ByVal e As Telerik.WinControls.UI.GridViewCellEventArgs) _ |
Handles rgvGrid.CellEditorInitialized |
If TypeOf rgvNotes.CurrentColumn Is GridViewDataColumn Then |
Select Case DirectCast(rgvNotes.CurrentColumn, GridViewDataColumn).UniqueName |
Case "SomeColumnName" |
Dim activeEditor As RadDateTimeEditor = TryCast(rgvNotes.ActiveEditor, RadDateTimeEditor) |
If activeEditor IsNot Nothing Then |
Dim editorElement As RadDateTimeEditorElement _ |
= TryCast(activeEditor.EditorElement, RadDateTimeEditorElement) |
If editorElement IsNot Nothing Then |
Dim dateTimePickerCalendar As RadDateTimePickerCalendar _ |
= TryCast(editorElement.GetCurrentBehavior(), RadDateTimePickerCalendar) |
If dateTimePickerCalendar IsNot Nothing Then |
dateTimePickerCalendar.Calendar.ShowFooter = False |
End If |
End If |
End If |
End Select |
End If |
End Sub |