del método SPMobileBaseFieldControl.CreateControlForEdit
Crea un control para representar el campo en un formulario de elemento de edición.
Espacio de nombres: Microsoft.SharePoint.Mobile.WebControls
Ensamblado: Microsoft.SharePoint (en Microsoft.SharePoint.dll)
Sintaxis
'Declaración
Protected Overridable Function CreateControlForEdit As Control
'Uso
Dim returnValue As Control
returnValue = Me.CreateControlForEdit()
protected virtual Control CreateControlForEdit()
Valor devuelto
Tipo: System.Web.UI.Control
MobileControl que representa el campo en un formulario de edición.
Comentarios
La implementación predeterminada llama CreateControlForDisplay.
Ejemplos
En el siguiente ejemplo se muestra un reemplazo de CreateControlForEdit que agrega un "vencido" para el título del elemento en un formulario de elemento de edición. Para obtener el ejemplo completo, vea Walkthrough: Creating a Custom Field Rendering Control for Mobile Pages.
protected override MobileControl CreateControlForEdit()
{
MobileControl myEditControl = null;
if (this.Item != null && this.Field != null)
{
if (this.NeedEllipsisRendering)
{
myEditControl = this.CreateControlForDisplay();
}
else
{
if (!this.Page.IsPostBack)
{
string strEdit = this.Field.GetFieldValueForEdit(this.ItemFieldValue);
string overDue = "OVERDUE: ";
SPListItem item = this.ListItem;
if (item["Expires"] != null)
{
System.DateTime date = (DateTime)item["Expires"];
if (date.CompareTo(System.DateTime.Today) < 0)
{
this.TextBoxControl.Text = overDue + strEdit;
}
else
{
this.TextBoxControl.Text = strEdit;
}
}
}
myEditControl = this.TextBoxControl;
}
}
return myEditControl;
}
Protected Overrides Function CreateControlForEdit() As MobileControl
Dim myEditControl As MobileControl = Nothing
If Me.Item IsNot Nothing AndAlso Me.Field IsNot Nothing Then
If Me.NeedEllipsisRendering Then
myEditControl = Me.CreateControlForDisplay()
Else
If Not Me.Page.IsPostBack Then
Dim strEdit As String = Me.Field.GetFieldValueForEdit(Me.ItemFieldValue)
Dim overDue As String = "OVERDUE: "
Dim item As SPListItem = Me.ListItem
If item("Expires") IsNot Nothing Then
Dim [date] As Date = CDate(item("Expires"))
If [date].CompareTo(Date.Today) < 0 Then
Me.TextBoxControl.Text = overDue & strEdit
Else
Me.TextBoxControl.Text = strEdit
End If
End If
End If
myEditControl = Me.TextBoxControl
End If
End If
Return myEditControl
End Function
Vea también
Referencia
clase SPMobileBaseFieldControl