MESCIUS SPREAD for Windows Forms 17.0J
タッチ操作によるInputManセルの使用

InputManセルでタッチ操作を使用できます。

セルのサイドボタンをタップし、セルの値を変更できます。

サンプルコード

次のサンプルコードは、GcDateTime型セルとGcTextBox型セルのサイドボタンを作成します。GcDateTimeおよびGcTextBoxオブジェクトのDropDownOpeningイベントの引数を表すDropDownOpeningEventArgsクラスのByTouchプロパティは、タッチ操作によってドロップダウンボタンが開かれたかどうかを返します。

C#
コードのコピー
private void Form1_Load(object sender, System.EventArgs e) {
    GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo testbutton = new GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo();
    testbutton.Behavior = GrapeCity.Win.Spread.InputMan.CellType.SideButtonBehavior.SpinDown;
    testbutton.Delay = 300;
    testbutton.Interval = 5;
    testbutton.Text = "1";
 
    GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType dateCellType = new GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType();
    dateCellType.SideButtons.Add(new GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo() { Text = "A" });
    this.fpSpread1_Sheet1.Columns[0].CellType = dateCellType;
 
    GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType textCellType = new GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType();
    textCellType.SideButtons.Add(new GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo() { Text = "B" });
    this.fpSpread1_Sheet1.Columns[1].CellType = textCellType;
 
    GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType dateCellType2 = new GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType();
    dateCellType2.SideButtons.Add(testbutton);
    this.fpSpread1_Sheet1.Columns[2].CellType = dateCellType2;
}
 
void IMCellType_DropDownOpening(object sender, GrapeCity.Win.Spread.InputMan.CellType.DropDownOpeningEventArgs e)
{
    listBox1.Items.Add(e.ByTouch.ToString());
}
 
private void fpSpread1_EditModeOn(object sender, EventArgs e)
{
    if (fpSpread1.EditingControl is GrapeCity.Win.Spread.InputMan.CellType.GcDateTime)
        ((GrapeCity.Win.Spread.InputMan.CellType.GcDateTime)fpSpread1.EditingControl).DropDownOpening += new EventHandler(IMCellType_DropDownOpening);
}
 
private void fpSpread1_EditModeOff(object sender, EventArgs e)
{
    if (fpSpread1.EditingControl is GrapeCity.Win.Spread.InputMan.CellType.GcDateTime)
        ((GrapeCity.Win.Spread.InputMan.CellType.GcDateTime)fpSpread1.EditingControl).DropDownOpening -= new EventHandler(IMCellType_DropDownOpening);
}
Visual Basic
コードのコピー
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim testbutton As New GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo()
    testbutton.Behavior = GrapeCity.Win.Spread.InputMan.CellType.SideButtonBehavior.SpinDown
    testbutton.Delay = 300
    testbutton.Interval = 5
    testbutton.Text = "1"
 
    Dim dateCellType As New GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType()
    dateCellType.SideButtons.Add(New GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo() With {.Text = "A"})
    FpSpread1_Sheet1.Columns(0).CellType = dateCellType
 
    Dim textCellType = New GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType()
    textCellType.SideButtons.Add(New GrapeCity.Win.Spread.InputMan.CellType.SideButtonInfo() With {.Text = "B"})
    FpSpread1_Sheet1.Columns(1).CellType = textCellType
 
    Dim dateCellType2 As New GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType()
    dateCellType2.SideButtons.Add(testbutton)
    FpSpread1_Sheet1.Columns(2).CellType = dateCellType2
End Sub
 
Private Sub IMCellType_DropDownOpening(ByVal sender As Object, ByVal e As GrapeCity.Win.Spread.InputMan.CellType.DropDownOpeningEventArgs)
    ListBox1.Items.Add(e.ByTouch.ToString())
End Sub
 
Private Sub FpSpread1_EditModeOff(sender As Object, e As EventArgs) Handles FpSpread1.EditModeOff
    If TypeOf (FpSpread1.EditingControl) Is GrapeCity.Win.Spread.InputMan.CellType.GcDateTime Then
        RemoveHandler CType(FpSpread1.EditingControl, GrapeCity.Win.Spread.InputMan.CellType.GcDateTime).DropDownOpening, AddressOf IMCellType_DropDownOpening
    End If
End Sub
 
Private Sub FpSpread1_EditModeOn(sender As Object, e As EventArgs) Handles FpSpread1.EditModeOn
    If TypeOf (FpSpread1.EditingControl) Is GrapeCity.Win.Spread.InputMan.CellType.GcDateTime Then
        AddHandler CType(FpSpread1.EditingControl, GrapeCity.Win.Spread.InputMan.CellType.GcDateTime).DropDownOpening, AddressOf IMCellType_DropDownOpening
    End If
End Sub

InputManセルでは以下のタッチ操作による機能があります。

参照

 

 


© MESCIUS inc. All rights reserved.