MESCIUS SPREAD for Windows Forms 17.0J
TextOrientation プロパティ (EmptyCellType)

セル印刷時のテキストの向きを取得または設定します。
構文
'Declaration
 
Public Shadows Property TextOrientation As TextOrientation
public new TextOrientation TextOrientation {get; set;}

プロパティ値

テキストの向きを決定するTextOrientation設定
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
参照

EmptyCellType クラス
EmptyCellType メンバ

 

 


© MESCIUS inc. All rights reserved.