FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > FpSpread クラス : AllowDragDrop プロパティ |
'Declaration Public Property AllowDragDrop As Boolean
'使用法 Dim instance As FpSpread Dim value As Boolean instance.AllowDragDrop = value value = instance.AllowDragDrop
public bool AllowDragDrop {get; set;}
FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread(); FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView(); DialogResult dlg; fpSpread1.Location = new Point(10, 10); fpSpread1.Height = 200; fpSpread1.Width = 400; Controls.Add(fpSpread1); fpSpread1.Sheets.Add(shv); fpSpread1.ActiveSheet.SetValue(0, 0, "Drag"); fpSpread1.ActiveSheet.SetValue(1, 0, "And"); fpSpread1.ActiveSheet.SetValue(2, 0, "Drop"); dlg = MessageBox.Show("If you want to Drag/Drop click the YES button, place the pointer on the edge of the selection, and then drag and drop.", "DragDrop", MessageBoxButtons.YesNo); if (dlg == DialogResult.Yes) { fpSpread1.ActiveSheet.AddSelection(0, 0, 3, 1); fpSpread1.AllowDragDrop = true; }
Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread() Dim shv As New FarPoint.Win.Spread.SheetView() Dim dlg As DialogResult fpSpread1.Location = New Point(10, 10) fpSpread1.Height = 200 fpSpread1.Width = 400 Controls.Add(fpSpread1) fpSpread1.Sheets.Add(shv) fpSpread1.ActiveSheet.SetValue(0, 0, "Drag") fpSpread1.ActiveSheet.SetValue(1, 0, "And") fpSpread1.ActiveSheet.SetValue(2, 0, "Drop") dlg = MessageBox.Show("If you want to Drag/Drop click the YES button, place the pointer on the edge of the selection, and then drag and drop.", "DragDrop", MessageBoxButtons.YesNo) If dlg = DialogResult.Yes Then fpSpread1.ActiveSheet.AddSelection(0, 0, 3, 1) fpSpread1.AllowDragDrop = True End If