ToolStripButton.CheckedChanged Händelse

public:
 event EventHandler ^ CheckedChanged;

public event EventHandler CheckedChanged;

public event EventHandler? CheckedChanged;

member this.CheckedChanged : EventHandler 

Public Custom Event CheckedChanged As EventHandler 

Händelsetyp

Exempel

I följande kodexempel anges CheckOnClick egenskapen till true och använder Checked egenskapen i en CheckedChanged händelse för att ändra teckensnittet för knapptexten till fetstil när knappen klickas.

ToolStripButton^ boldButton;

void InitializeBoldButton()
{
    boldButton = gcnew ToolStripButton;
    boldButton->Text = "B";
    boldButton->CheckOnClick = true;
    boldButton->CheckedChanged  += gcnew EventHandler(this, 
        &Form1::boldButtonCheckedChanged);
    toolStrip1->Items->Add(boldButton);
}

void boldButtonCheckedChanged(Object^ sender, EventArgs^ e)
{
    if (boldButton->Checked)
    { 
        this->Font= gcnew System::Drawing::Font(this->Font, 
            FontStyle::Bold);
    }
    else
    { 
        this->Font = gcnew System::Drawing::Font(this->Font, 
            FontStyle::Regular);
    }
}


//   internal:

internal ToolStripButton boldButton;

private void InitializeBoldButton()
{
    boldButton = new ToolStripButton();
    boldButton.Text = "B";
    boldButton.CheckOnClick = true;
    toolStrip1.Items.Add(boldButton);
}

private void boldButton_CheckedChanged(object sender, EventArgs e)
{
    if (boldButton.Checked)
    {
        this.Font = new Font(this.Font, FontStyle.Bold);
    }
    else
    {
        this.Font = new Font(this.Font, FontStyle.Regular);
    }
}

Friend WithEvents boldButton As ToolStripButton

Private Sub InitializeBoldButton()
    boldButton = New ToolStripButton()
    boldButton.Text = "B"
    boldButton.CheckOnClick = True
    toolStrip1.Items.Add(boldButton)

End Sub

Private Sub boldButton_CheckedChanged(ByVal sender As [Object], _
    ByVal e As EventArgs) Handles boldButton.CheckedChanged
    If boldButton.Checked Then
        Me.Font = New Font(Me.Font, FontStyle.Bold)
    Else
        Me.Font = New Font(Me.Font, FontStyle.Regular)
    End If

End Sub

Kommentarer

Mer information om hur du hanterar händelser finns i Hantera och höja händelser.