SpinDown イベント

次のサンプルコードは、SpinButtonのダウンボタンが押されたときに、SpinDownイベントを使用してタスクを実行する方法を示します。この例では、SpinDownイベントに接続されたイベントハンドラで、listBox1の選択されたインデックスを増加させています。

このサンプルコードは、GrapeCity.Win.Containers.GcComboFrameクラスの概要に示されている詳細なコード例の一部を抜粋したものです。その元の例では、最初にcomboBox1からSpinButton項目を選択してgcComboFrame1にSpinButtonを表示し、次にそのSpinButtonをスピンアップまたはスピンダウンできます。

C#
Visual Basic

// Returns a SpinButton instance for gcComboFrame1.
private SideButtonBase CreateSpinButton()
{
    SpinButton spinButton = new SpinButton();

    // Specify a unique name for this button.
    spinButton.Name = "SpinButton";

    // Set the Interval for spinButton.
    spinButton.Interval = 100;

    spinButton.SpinUp += new EventHandler(SpinButton_SpinUp);
    spinButton.SpinDown += new EventHandler(SpinButton_SpinDown);

    // Not show spinButton in gcComboFrame1.
    spinButton.Visible = ButtonVisibility.NotShown;

    return spinButton;
}

// Increase the seleced index of listBox1 when spin is down.
private void SpinButton_SpinDown(object sender, EventArgs e)
{
    if (this.listBox1.SelectedIndex < this.listBox1.Items.Count - 1)
    {
        this.listBox1.SelectedIndex += 1;
    }
    else
    {
        this.listBox1.SelectedIndex = this.listBox1.Items.Count - 1;
    }

    this.textBox1.Text = this.listBox1.SelectedItem.ToString();
}

// Decrease the seleced index of listBox1 when spin is down.
private void SpinButton_SpinUp(object sender, EventArgs e)
{
    if (this.listBox1.SelectedIndex > 0)
    {
        this.listBox1.SelectedIndex -= 1;
    }
    else
    {
        this.listBox1.SelectedIndex = 0;
    }
    this.textBox1.Text = this.listBox1.SelectedItem.ToString();
}

' Returns a SpinButton instance for gcComboFrame1.
Private Function CreateSpinButton() As SideButtonBase
    Dim spinButton As New SpinButton()

    ' Specify a unique name for this button.
    spinButton.Name = "SpinButton"

    ' Set the Interval for spinButton.
    spinButton.Interval = 100

    AddHandler spinButton.SpinUp, AddressOf SpinButton_SpinUp
    AddHandler spinButton.SpinDown, AddressOf SpinButton_SpinDown

    ' Not show spinButton in gcComboFrame1.
    spinButton.Visible = ButtonVisibility.NotShown

    Return spinButton
End Function

' Increase the selected index of listBox1 when spin is down.
Private Sub SpinButton_SpinDown(ByVal sender As Object, ByVal e As EventArgs)
    If Me.listBox1.SelectedIndex < Me.listBox1.Items.Count - 1 Then
        Me.listBox1.SelectedIndex += 1
    Else
        Me.listBox1.SelectedIndex = Me.listBox1.Items.Count - 1
    End If

    Me.textBox1.Text = Me.listBox1.SelectedItem.ToString()
End Sub

' Decrease the selected index of listBox1 when spin is down.
Private Sub SpinButton_SpinUp(ByVal sender As Object, ByVal e As EventArgs)
    If Me.listBox1.SelectedIndex > 0 Then
        Me.listBox1.SelectedIndex -= 1
    Else
        Me.listBox1.SelectedIndex = 0
    End If
    Me.textBox1.Text = Me.listBox1.SelectedItem.ToString()
End Sub