FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > SheetView クラス : SetStickyNoteStyleInfo メソッド |
'Declaration Public Overridable Sub SetStickyNoteStyleInfo( _ ByVal row As Integer, _ ByVal column As Integer, _ ByVal info As StickyNoteStyleInfo _ )
'使用法 Dim instance As SheetView Dim row As Integer Dim column As Integer Dim info As StickyNoteStyleInfo instance.SetStickyNoteStyleInfo(row, column, info)
fpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development"); fpSpread1.ActiveSheet.Cells[2, 0].NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote; FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo nsinfo = new FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo(); nsinfo = fpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0); nsinfo.BackColor = Color.Bisque; nsinfo.Font = new Font("Tahoma", 24); nsinfo.ForeColor = Color.Cyan; nsinfo.Width = 320; nsinfo.ShapeOutlineColor = Color.Cyan; nsinfo.ShapeOutlineThickness = 1; nsinfo.ShadowOffsetX = 3; nsinfo.ShadowOffsetY = 3; fpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo);
FpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development") FpSpread1.ActiveSheet.Cells(2, 0).NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote Dim nsinfo As FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo = New FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo nsinfo = FpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0) nsinfo.BackColor = Color.Bisque nsinfo.Font = New Font("Tahoma", 24) nsinfo.ForeColor = Color.Cyan nsinfo.Width = 320 nsinfo.ShapeOutlineColor = Color.Cyan nsinfo.ShapeOutlineThickness = 1 nsinfo.ShadowOffsetX = 3 nsinfo.ShadowOffsetY = 3 FpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo)
fpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development"); FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo nsinfo = new FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo(); nsinfo = fpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0); nsinfo.BackColor = Color.Bisque; nsinfo.Font = new Font("Tahoma", 24); nsinfo.ForeColor = Color.Cyan; nsinfo.Width = 320; nsinfo.ShapeOutlineColor = Color.Cyan; nsinfo.ShapeOutlineThickness = 1; nsinfo.ShadowOffsetX = 3; nsinfo.ShadowOffsetY = 3; nsinfo.MarginLeft = 5; fpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo); fpSpread1.Sheets[0].Cells[2, 0].NoteIndicatorPosition = FarPoint.Win.Spread.NoteIndicatorPosition.BottomLeft;
FpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development") Dim nsinfo As FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo = New FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo() nsinfo = FpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0) nsinfo.BackColor = Color.Bisque nsinfo.Font = New Font("Tahoma", 12) nsinfo.ForeColor = Color.Cyan nsinfo.Width = 250 nsinfo.ShapeOutlineColor = Color.Cyan nsinfo.ShapeOutlineThickness = 1 nsinfo.ShadowOffsetX = 3 nsinfo.ShadowOffsetY = 3 nsinfo.MarginLeft = 5 FpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo) FpSpread1.Sheets(0).Cells(2, 0).NoteIndicatorPosition = FarPoint.Win.Spread.NoteIndicatorPosition.BottomLeft