ToolBarButton.Pushed 屬性
定義
重要
部分資訊涉及發行前產品,在發行之前可能會有大幅修改。 Microsoft 對此處提供的資訊,不做任何明確或隱含的瑕疵擔保。
取得或設定值,指出切換式工具列按鈕目前是否處於按下狀態。
public:
property bool Pushed { bool get(); void set(bool value); };
public bool Pushed { get; set; }
member this.Pushed : bool with get, set
Public Property Pushed As Boolean
屬性值
如果切換式工具列按鈕目前處於按下狀態,則為 true
,否則為 false
。 預設為 false
。
範例
下列程式碼範例示範如何使用 Pushed 、 和 PartialPush 屬性。 若要執行此範例,請將下列程式碼貼到包含 RichTextBox 名為 的 RichTextBox1
控制項的表單中。
InitializeToolBar
在表單的建構函式或 Load
方法中呼叫 方法。
// Declare ToolBar1.
internal:
System::Windows::Forms::ToolBar^ ToolBar1;
private:
// Initialize ToolBar1 with Bold(B), Italic(I), and
// Underline(U) buttons.
void InitializeToolBar()
{
ToolBar1 = gcnew ToolBar;
// Set the appearance to Flat.
ToolBar1->Appearance = ToolBarAppearance::Flat;
// Set the toolbar to dock at the bottom of the form.
ToolBar1->Dock = DockStyle::Bottom;
// Set the toolbar font to 14 points and bold.
ToolBar1->Font = gcnew System::Drawing::Font( FontFamily::GenericSansSerif,14,FontStyle::Bold );
// Declare fontstyle array with the three font styles.
array<FontStyle>^ fonts = {FontStyle::Bold,FontStyle::Italic,FontStyle::Underline};
int count;
// Create a button for each value in the array, setting its
// text to the first letter of the style and its
// button's tag property.
for ( count = 0; count < fonts->Length; count++ )
{
ToolBarButton^ fontButton = gcnew ToolBarButton( fonts[ count ].ToString()->Substring( 0, 1 ) );
fontButton->Style = ToolBarButtonStyle::ToggleButton;
fontButton->Tag = fonts[ count ];
ToolBar1->Buttons->Add( fontButton );
}
this->ToolBar1->ButtonClick += gcnew ToolBarButtonClickEventHandler( this, &Form1::ToolBar1_ButtonClick );
this->Controls->Add( this->ToolBar1 );
}
// Declare FontStyle object, which defaults to the Regular
// FontStyle.
FontStyle style;
void ToolBar1_ButtonClick( Object^ /*sender*/, System::Windows::Forms::ToolBarButtonClickEventArgs^ e )
{
// If a button is pushed, use a bitwise Or combination
// of the style variable and the button tag, to set style to
// the correct FontStyle. Set the button's PartialPush
// property to true for a Windows XP-like appearance.
if ( e->Button->Pushed )
{
e->Button->PartialPush = true;
style = (FontStyle)(style | safe_cast<FontStyle>(e->Button->Tag));
}
else
{
// If the button was not pushed, use a bitwise XOR
// combination to turn off that style
// and set the PartialPush property to false.
e->Button->PartialPush = false;
style = (FontStyle)(style ^ safe_cast<FontStyle>(e->Button->Tag));
}
// Set the font using the existing RichTextBox font and the new
// style.
RichTextBox1->Font = gcnew System::Drawing::Font( RichTextBox1->Font,style );
}
// Declare ToolBar1.
internal System.Windows.Forms.ToolBar ToolBar1;
// Initialize ToolBar1 with Bold(B), Italic(I), and
// Underline(U) buttons.
private void InitializeToolBar()
{
ToolBar1 = new ToolBar();
// Set the appearance to Flat.
ToolBar1.Appearance = ToolBarAppearance.Flat;
// Set the toolbar to dock at the bottom of the form.
ToolBar1.Dock = DockStyle.Bottom;
// Set the toolbar font to 14 points and bold.
ToolBar1.Font = new Font(FontFamily.GenericSansSerif,
14, FontStyle.Bold);
// Declare fontstyle array with the three font styles.
FontStyle[] fonts = new FontStyle[]{FontStyle.Bold,
FontStyle.Italic, FontStyle.Underline};
int count;
// Create a button for each value in the array, setting its
// text to the first letter of the style and its
// button's tag property.
for(count=0; count<fonts.Length; count++)
{
ToolBarButton fontButton =
new ToolBarButton(fonts[count].ToString().Substring(0, 1));
fontButton.Style = ToolBarButtonStyle.ToggleButton;
fontButton.Tag = fonts[count];
ToolBar1.Buttons.Add(fontButton);
}
this.ToolBar1.ButtonClick +=
new ToolBarButtonClickEventHandler(ToolBar1_ButtonClick);
this.Controls.Add(this.ToolBar1);
}
// Declare FontStyle object, which defaults to the Regular
// FontStyle.
FontStyle style = new FontStyle();
private void ToolBar1_ButtonClick(object sender,
System.Windows.Forms.ToolBarButtonClickEventArgs e)
{
// If a button is pushed, use a bitwise Or combination
// of the style variable and the button tag, to set style to
// the correct FontStyle. Set the button's PartialPush
// property to true for a Windows XP-like appearance.
if (e.Button.Pushed)
{
e.Button.PartialPush = true;
style = style |(FontStyle) e.Button.Tag;
}
else
{
// If the button was not pushed, use a bitwise XOR
// combination to turn off that style
// and set the PartialPush property to false.
e.Button.PartialPush = false;
style = style ^ (FontStyle) e.Button.Tag;
}
// Set the font using the existing RichTextBox font and the new
// style.
RichTextBox1.Font = new Font(RichTextBox1.Font, style);
}
' Declare ToolBar1.
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
' Initialize ToolBar1 with Bold(B), Italic(I), and Underline(U) buttons.
Private Sub InitializeToolBar()
ToolBar1 = New ToolBar
' Set the appearance to Flat.
ToolBar1.Appearance = ToolBarAppearance.Flat
' Set the toolbar to dock at the bottom of the form.
ToolBar1.Dock = DockStyle.Bottom
' Set the toolbar font to 14 points and bold.
ToolBar1.Font = New System.Drawing.Font _
(FontFamily.GenericSansSerif, 14, FontStyle.Bold)
' Declare fontstyle array with the three font styles.
Dim fonts() As FontStyle = New FontStyle() _
{FontStyle.Bold, FontStyle.Italic, FontStyle.Underline}
Dim count As Integer
' Create a button for each value in the array, setting its text to the
' first letter of the style and its button's tag property.
For count = 0 To fonts.Length - 1
Dim fontButton As New ToolBarButton(fonts(count). _
ToString.Substring(0, 1))
fontButton.Style = ToolBarButtonStyle.ToggleButton
fontButton.Tag = fonts(count)
ToolBar1.Buttons.Add(fontButton)
Next
Me.Controls.Add(Me.ToolBar1)
End Sub
' Declare FontStyle object, which defaults to the Regular FontStyle.
Dim style As New FontStyle
Private Sub ToolBar1_ButtonClick(ByVal sender As Object, _
ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) _
Handles ToolBar1.ButtonClick
' If a button is pushed, use a bitwise Or combination
' of the style variable and the button tag, to set style to
' the correct FontStyle. Set the button's PartialPush property to
' true for a Windows XP-like appearance.
If (e.Button.Pushed) Then
e.Button.PartialPush = True
style = style Or e.Button.Tag
Else
' If the button was not pushed, use a bitwise XOR
' combination to turn off that style
' and set the PartialPush property to False.
e.Button.PartialPush = False
style = style Xor e.Button.Tag
End If
' Set the font using the existing RichTextBox font and the new
' style.
RichTextBox1.Font = New Font(RichTextBox1.Font, style)
End Sub
備註
當 設定為 true
時 Pushed ,工具列按鈕會顯示為下陷或相對於其他按鈕的內嵌。 除非 設定為 ToggleButton
, ToolBarButtonStyle 否則這個屬性沒有作用。