
Protected Sub rg_ItemCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles rg.ItemCommand
lblMessage.Text = ""
If (e.CommandName = RadGrid.InitInsertCommandName) Then
If ((CType(source, RadGrid).EditIndexes.Count > 0) _
OrElse e.Item.OwnerTableView.IsItemInserted) Then
prjUtilities.showFeedback(lblMessage, "*You may only have one item open at a time", True)
e.Canceled = True
cblExpenses.Enabled = False
Else
e.Canceled = True
Dim off As New offType
e.Item.OwnerTableView.InsertItem(off)
'Hides the edit column when in create mode
Dim editColumn As GridEditCommandColumn = CType(CType(source, RadGrid).MasterTableView.GetColumn("edit"), GridEditCommandColumn)
editColumn.Visible = False
cblExpenses.Enabled = False
End If
ElseIf e.CommandName = "PerformInsert" Then
Dim editColumn As GridEditCommandColumn = CType(CType(source, RadGrid).MasterTableView.GetColumn("edit"), GridEditCommandColumn)
If Not editColumn.Visible Then
editColumn.Visible = True
End If
cblExpenses.Enabled = True
ElseIf e.CommandName = "Cancel" Then
cblExpenses.Enabled = True
prjUtilities.showFeedback(lblMessage, "Changes Cancelled", False)
Dim editColumn As GridEditCommandColumn = CType(CType(source, RadGrid).MasterTableView.GetColumn("edit"), GridEditCommandColumn)
If Not editColumn.Visible Then
editColumn.Visible = True
End If
Else
'reset the edit column to visible
cblExpenses.Enabled = False
Dim editColumn As GridEditCommandColumn = CType(CType(source, RadGrid).MasterTableView.GetColumn("edit"), GridEditCommandColumn)
If Not editColumn.Visible Then
editColumn.Visible = True
End If
End If
End Sub
<telerik:RadGrid ID="rg" runat="server" AllowPaging="True" AutoGenerateColumns="False"
GridLines="None" Skin="Office2007">
<HeaderContextMenu>
<CollapseAnimation Type="OutQuint" Duration="200"></CollapseAnimation>
</HeaderContextMenu>
<MasterTableView CommandItemDisplay="Top">
<CommandItemTemplate>
<table>
<tr>
<td width="30%">
<asp:ImageButton ID="btnAddImbtn" runat="server" CommandName="InitInsert" CausesValidation="false"
ImageUrl="~/images/RadControls Skins/Office2007/Grid/AddRecord.gif" />
<asp:LinkButton ID="btnAddlkbtn" runat="server" Font-Bold="true" CausesValidation="false"
CommandName="InitInsert">Click Here to Add New</asp:LinkButton>
</td>
<td width="40%">
</td>
<td width="30%">
</td>
</tr>
</table>
</CommandItemTemplate>
<EditFormSettings EditFormType="WebUserControl" UserControlName="~/UserControls/ucOff.ascx" />
<Columns>
<telerik:GridEditCommandColumn EditText="Edit" UniqueName="edit" />
<telerik:GridBoundColumn DataField="offid" UniqueName="offid"
HeaderText="offid" Visible="false">
</telerik:GridBoundColumn>
<telerik:GridTemplateColumn UniqueName="del">
<ItemTemplate>
<asp:LinkButton ID="lblDelete" runat="server" Text="Delete" CommandName="Delete"
CommandArgument='<%#Eval("offid")%>' CausesValidation="false" OnClientClick="return confirm('Are you sure you want to delete this record?');"></asp:LinkButton>
</ItemTemplate>
</telerik:GridTemplateColumn>
</Columns>
</MasterTableView>
</telerik:RadGrid>
<property name="EditMode">Design,Html</property>
But MOSS 2007 ignores my settings and shows the DESIGN and PREVIEW mode.

| // Create new scheduler control so we can load appointments |
|
RadScheduler
RadSchedulerNew = new RadScheduler(); |
| RadSchedulerNew.DataEndField = "EndDate"; |
| RadSchedulerNew.DataKeyField = "UniqueID"; |
| RadSchedulerNew.DataRecurrenceField = "RecurrenceRule"; |
| RadSchedulerNew.DataRecurrenceParentKeyField = "RecurrenceParentID"; |
| RadSchedulerNew.DataStartField = "StartDate"; |
| RadSchedulerNew.DataSubjectField = "Subject"; |
| RadSchedulerNew.AppointmentInsert += new AppointmentInsertEventHandler(RadSchedulerNew_AppointmentInsert); |
| RadSchedulerNew.DataBind(); |
| RadSchedulerNew.InsertAppointment(apt); |
| void RadSchedulerNew_AppointmentInsert(object sender, SchedulerCancelEventArgs e) |
| { |
| if (e.Appointment.Subject == String.Empty) |
| { |
| e.Cancel = true; |
| } |
| } |
