Spread Windows Forms 11.0 Product Documentation
StringTrim Property (EmptyCellType)
Example 


FarPoint.Win.Spread Assembly > FarPoint.Win.Spread.CellType Namespace > EmptyCellType Class : StringTrim Property
Gets or sets how to trim characters that do not fit into the cell.
Syntax
'Declaration
 
Public Shadows Property StringTrim As StringTrimming
'Usage
 
Dim instance As EmptyCellType
Dim value As StringTrimming
 
instance.StringTrim = value
 
value = instance.StringTrim
public new StringTrimming StringTrim {get; set;}

Property Value

StringTrimming setting that determines now strings are trimmed
Example
private void fpSpread1CellClick(object sender, FarPoint.Win.Spread.CellClickEventArgs e)
{
      FarPoint.Win.Spread.CellType.ICellType ct;
      ct = e.View.Sheets[0].Cells[e.Row, e.Column].CellType;
      if(ct is FarPoint.Win.Spread.CellType.GeneralCellType)
      {
            FarPoint.Win.Spread.CellType.EmptyCellType empty = new FarPoint.Win.Spread.CellType.EmptyCellType();
            empty.AcceptsArrowKeys = FarPoint.Win.SuperEdit.AcceptsArrowKeys.AllArrows;
            empty.StringTrim = StringTrimming.EllipsisCharacter;
            empty.TextOrientation = FarPoint.Win.TextOrientation.TextHorizontal;
            e.View.Sheets[0].Cells[e.Row, e.Column].CellType = empty;
            e.View.Sheets[0].Cells[e.Row, e.Column].Text = "This is an empty cell";
      }
}
Private Sub FpSpread1CellClick(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.CellClickEventArgs) Handles FpSpread1.CellClick
      Dim ct As FarPoint.Win.Spread.CellType.ICellType
      ct = e.View.Sheets(0).Cells(e.Row, e.Column).CellType
      If TypeOf ct Is FarPoint.Win.Spread.CellType.GeneralCellType Then
            Dim empty As New FarPoint.Win.Spread.CellType.EmptyCellType
            empty.AcceptsArrowKeys = FarPoint.Win.SuperEdit.AcceptsArrowKeys.AllArrows
            empty.StringTrim = StringTrimming.EllipsisCharacter
            empty.TextOrientation = FarPoint.Win.TextOrientation.TextHorizontal
            e.View.Sheets(0).Cells(e.Row, e.Column).CellType = empty
            e.View.Sheets(0).Cells(e.Row, e.Column).Text = "This is an empty cell"
      End If
End Sub
See Also

Reference

EmptyCellType Class
EmptyCellType Members