Control.Cursor 属性

定义

命名空间:

System.Windows.Forms

程序集:

System.Windows.Forms.dll

获取或设置当鼠标指针位于控件上时显示的光标。

public:
 virtual property System::Windows::Forms::Cursor ^ Cursor { System::Windows::Forms::Cursor ^ get(); void set(System::Windows::Forms::Cursor ^ value); };

public virtual System.Windows.Forms.Cursor Cursor { get; set; }

member this.Cursor : System.Windows.Forms.Cursor with get, set

Public Overridable Property Cursor As Cursor

属性值

Cursor

一个 Cursor，表示当鼠标指针位于控件上时显示的光标。

示例

下面的代码示例将填充 ComboBox 用户可用的逻辑驱动器。 该示例还设置组合框 Cursor 的属性，以便在 Cursors.Hand 鼠标指针位于下拉按钮上方时显示光标。 此代码要求你具有一个FormComboBox附加代码。

private:
   void Form1_Load( Object^ /*sender*/, EventArgs^ /*e*/ )
   {
      // Display the hand cursor when the mouse pointer
      // is over the combo box drop-down button.
      comboBox1->Cursor = Cursors::Hand;
      
      // Fill the combo box with all the logical
      // drives available to the user.
      try
      {
         IEnumerator^ myEnum = Environment::GetLogicalDrives()->GetEnumerator();
         while ( myEnum->MoveNext() )
         {
            String^ logicalDrive = safe_cast<String^>(myEnum->Current);
            comboBox1->Items->Add( logicalDrive );
         }
      }
      catch ( Exception^ ex ) 
      {
         MessageBox::Show( ex->Message );
      }
   }

private void Form1_Load(object sender, EventArgs e)
{
   // Display the hand cursor when the mouse pointer
   // is over the combo box drop-down button. 
   comboBox1.Cursor = Cursors.Hand;

   // Fill the combo box with all the logical 
   // drives available to the user.
   try
   {
      foreach(string logicalDrive in Environment.GetLogicalDrives() )
      {
         comboBox1.Items.Add(logicalDrive);
      }
   }
   catch(Exception ex)
   {
      MessageBox.Show(ex.Message);
   }
}

Private Sub Form1_Load(sender As Object, _
  e As EventArgs) Handles MyBase.Load
   ' Display the hand cursor when the mouse pointer
   ' is over the combo box drop-down button. 
   comboBox1.Cursor = Cursors.Hand
   
   ' Fill the combo box with all the logical 
   ' drives available to the user. 
   Try
      Dim logicalDrive As String
      For Each logicalDrive In  Environment.GetLogicalDrives()
         comboBox1.Items.Add(logicalDrive)
      Next logicalDrive
   Catch ex As Exception
      MessageBox.Show(ex.Message)
   End Try
End Sub

注解

为控件的属性分配一个CursorCursor，以更改鼠标指针在控件上时显示的光标。 若要暂时更改应用程序上所有控件的鼠标光标，请设置该 Cursor.Current 属性。 通常，在填充ComboBox或保存或加载文件时，Cursor.Current将属性设置为等待游标。

该 Cursor 属性是环境属性。 环境属性是一个控件属性，如果未设置，则从父控件中检索。 例如，默认情况下，a Button 将具有相同 BackColor 的父 Form 级。 有关环境属性的详细信息，请参阅 AmbientProperties 类或 Control 类概述。

继承者说明

重写 Cursor 派生类中的属性时，请使用基类的属性 Cursor 扩展基实现。 否则，必须提供所有实现。 无需同时替代 get 属性和 set 方法 Cursor ;仅可根据需要重写一个。

另请参阅

• Cursor
• Cursors