مشاركة عبر

EditPoint2.GreaterThan أسلوب (TextPoint)

  • مقالة

إرجاع ما إذا كانت القيمة EditPointالكائن AbsoluteCharOffsetأكبر من خاصية المعطى TextPointالكائن.

مساحة الاسم:  EnvDTE80
التجميع:  EnvDTE80 (في EnvDTE80.dll)

بناء الجملة

'إقرار
Function GreaterThan ( _
    Point As TextPoint _
) As Boolean

bool GreaterThan(
    TextPoint Point
)

bool GreaterThan(
    [InAttribute] TextPoint^ Point
)

abstract GreaterThan : 
        Point:TextPoint -> bool 

function GreaterThan(
    Point : TextPoint
) : boolean

المعلمات

القيمة المُرجعة

النوع: System.Boolean
trueifPointيحتوي أصغرAbsoluteCharOffsetالقيمة خاصية مقارنة إلى الاتصالEditPointاسم الكائنAbsoluteCharOffsetخاصية؛ وإلاfalse.

التطبيقات

EditPoint.GreaterThan(TextPoint)

ملاحظات

GreaterThanيطرحArgumentException‏‏ استثناء إذاPointهو غير موجودة في نفس مستند كاستدعاء يؤشر الكائن. باستخدام VirtualPoint، GreaterThanيقارن بين المواضع الظاهرية إذا وسيطة هو VirtualPoint، otherwهوe فإنه يقارن المواضع الفعلية.

أمثلة

Sub GreaterThanExample(ByVal dte As DTE)

    ' Create a new text file.
    dte.ItemOperations.NewFile()
    Dim txtDoc As TextDocument = _
        CType(dte.ActiveDocument.Object(), TextDocument)

    ' Create an edit point at the empty text document's StartPoint 
    ' and EndPoint; CompareEditPoints displays "point1 and point2
    ' occupy the same location."
    Dim point1 As EditPoint = txtDoc.StartPoint.CreateEditPoint()
    Dim point2 As EditPoint = txtDoc.EndPoint.CreateEditPoint()
    CompareEditPoints(point1, point2)

    ' Insert ten lines of text.
    Dim i As Integer
    For i = 1 To 10
        point1.Insert("Line " & i.ToString() & vbCrLf)
    Next

    ' Create an edit point at the text document's StartPoint and 
    ' EndPoint; CompareEditPoints displays "point1 comes 
    ' before point2."
    point1 = txtDoc.StartPoint.CreateEditPoint()
    point2 = txtDoc.EndPoint.CreateEditPoint()
    CompareEditPoints(point1, point2)

End Sub

Sub CompareEditPoints(ByVal point1 As EditPoint, _
    ByVal point2 As EditPoint)

    If point1.LessThan(point2) Then
        MsgBox("point1 comes before point2.")
    ElseIf point1.GreaterThan(point2) Then
        MsgBox("point2 comes before point1.")
    ElseIf (point1.EqualTo(point2)) Then
        MsgBox("point1 and point2 occupy the same location.")
    End If

End Sub

public void GreaterThanExample(DTE dte)
{
    // Create a new text file.
    dte.ItemOperations.NewFile(@"General\Text File", "", 
        Constants.vsViewKindPrimary);
    TextDocument txtDoc = 
        (TextDocument)dte.ActiveDocument.Object("");

    // Create an edit point at the empty text document's StartPoint 
    // and EndPoint; CompareEditPoints displays "point1 and point2
    // occupy the same location."
    EditPoint point1 = txtDoc.StartPoint.CreateEditPoint();
    EditPoint point2 = txtDoc.EndPoint.CreateEditPoint();
    CompareEditPoints(point1, point2);

    // Insert ten lines of text.
    for (int i = 1; i <= 10; i++)
    {
        point1.Insert("Line " + i.ToString() + Environment.NewLine);
    }

    // Create an edit point at the text document's StartPoint and 
    // EndPoint; CompareEditPoints displays "point1 comes 
    // before point2."
    point1 = txtDoc.StartPoint.CreateEditPoint();
    point2 = txtDoc.EndPoint.CreateEditPoint();
    CompareEditPoints(point1, point2);
}

void CompareEditPoints(EditPoint point1, EditPoint point2)
{
    if (point1.LessThan(point2))
        MessageBox.Show("point1 comes before point2.");
    else if (point1.GreaterThan(point2))
        MessageBox.Show("point2 comes before point1.");
    else if (point1.EqualTo(point2))
        MessageBox.Show("point1 and point2 occupy the same location.");
}

أمن NET Framework.

راجع أيضًَا

المرجع

EditPoint2 واجهة

EditPoint2 الأعضاء

GreaterThan التحميل الزائد

EnvDTE80 مساحة الاسم

موارد أخرى

كيفية: الترجمة وإعادة تشغيل أمثلة التعليمات البرمجية لطراز كائن التنفيذ التلقائي