TextBoxBase.ScrollToCaret Metode

Definisi

Ruang nama:

System.Windows.Forms

Rakitan:

System.Windows.Forms.dll

Menggulir isi kontrol ke posisi tanda sisipan saat ini.

public:
 void ScrollToCaret();

public void ScrollToCaret ();

member this.ScrollToCaret : unit -> unit

Public Sub ScrollToCaret ()

Contoh

Contoh kode berikut menunjukkan cara menggunakan Keys enumerasi dan ScrollToCaret metode untuk memastikan bahwa titik penyisipan teks, yang diwakili oleh caret, selalu terlihat di layar setelah tombol ENTER ditekan. Untuk menjalankan contoh, tempelkan kode berikut dalam formulir yang berisi kontrol yang TextBox disebut TextBox1 dan kontrol yang RichTextBox disebut RichTextBox1. Contoh ini mengharuskan metode penanganan peristiwa telah dikaitkan dengan peristiwa tersebut KeyDown .

private:
   //Handles the Enter key being pressed while TextBox1 has focus. 
   void TextBox1_KeyDown( Object^ /*sender*/, KeyEventArgs^ e )
   {
      TextBox1->HideSelection = false;
      if ( e->KeyCode == Keys::Enter )
      {
         e->Handled = true;

         // Copy the text from TextBox1 to RichTextBox1, add a CRLF after 
         // the copied text, and keep the caret in view.
         RichTextBox1->SelectedText = String::Concat( TextBox1->Text, "\r\n" );
         RichTextBox1->ScrollToCaret();
      }
   }

//Handles the Enter key being pressed while TextBox1 has focus. 
private void TextBox1_KeyDown(object sender, KeyEventArgs e)
{
    TextBox1.HideSelection = false;
    if (e.KeyCode==Keys.Enter)
    {
        e.Handled = true;

        // Copy the text from TextBox1 to RichTextBox1, add a CRLF after 
        // the copied text, and keep the caret in view.
        RichTextBox1.SelectedText = TextBox1.Text + "\r\n";
        RichTextBox1.ScrollToCaret();
    }
}

'Handles the Enter key being pressed while TextBox1 has focus. 
Private Sub TextBox1_KeyDown(ByVal sender As Object, _
    ByVal e As KeyEventArgs) Handles TextBox1.KeyDown
    TextBox1.HideSelection = False
    If e.KeyCode = Keys.Enter Then
        e.Handled = True

        ' Copy the text from TextBox1 to RichTextBox1, add a CRLF after 
        ' the copied text, and keep the caret in view.
        RichTextBox1.SelectedText = TextBox1.Text + _
            Microsoft.VisualBasic.vbCrLf
        RichTextBox1.ScrollToCaret()
    End If
End Sub

Keterangan

Metode ini memungkinkan Anda untuk menggulir konten kontrol hingga tanda sisipan berada dalam wilayah kontrol yang terlihat. Jika tanda sisipan diposisikan di bawah wilayah kontrol yang terlihat, ScrollToCaret metode akan menggulir konten kontrol hingga tanda sisipan terlihat di bagian bawah kontrol. Jika tanda sisipan diposisikan di atas wilayah kontrol yang terlihat, metode ini menggulir konten kontrol hingga tanda sisipan terlihat di bagian atas kontrol. Anda dapat menggunakan metode ini dalam kotak teks multibaris untuk memastikan bahwa titik entri teks saat ini berada dalam wilayah kontrol yang terlihat.

Catatan

Metode ini tidak berpengaruh jika kontrol tidak memiliki fokus atau jika tanda sisipan sudah diposisikan di wilayah kontrol yang terlihat.