FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > FpSpread クラス : SetCursor メソッド |
'Declaration Public Sub SetCursor( _ ByVal index As CursorType, _ ByVal cursor As Cursor _ )
'使用法 Dim instance As FpSpread Dim index As CursorType Dim cursor As Cursor instance.SetCursor(index, cursor)
public void SetCursor( CursorType index, Cursor cursor )
FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread(); FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView(); fpSpread1.Location = new Point(10, 10); fpSpread1.Height = 200; fpSpread1.Width = 400; Controls.Add(fpSpread1); fpSpread1.Sheets.Add(shv); Cursor setC, getC; setC = new Cursor(Application.StartupPath + "\\cellbtn.cur"); fpSpread1.SetCursor(FarPoint.Win.Spread.CursorType.Normal, setC); getC = fpSpread1.GetCursor(FarPoint.Win.Spread.CursorType.Normal); listBox1.Items.Add(Cursor.Position.ToString());
Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread() Dim shv As New FarPoint.Win.Spread.SheetView() fpSpread1.Location = New Point(10, 10) fpSpread1.Height = 200 fpSpread1.Width = 400 Controls.Add(fpSpread1) fpSpread1.Sheets.Add(shv) Dim setC, getC As Cursor setC = New Cursor("..\bin\cellbtn.cur") fpSpread1.SetCursor(FarPoint.Win.Spread.CursorType.Normal, setC) getC = fpSpread1.GetCursor(FarPoint.Win.Spread.CursorType.Normal) ListBox1.Items.Add(getC.Position.ToString())