共用方式為


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
如果相較之下 Point 的 AbsoluteCharOffset 屬性值小於呼叫 EditPoint 物件的 AbsoluteCharOffset 屬性值,則為 true,否則為 false。

備註

如果 Point 與呼叫點物件不在相同的文件中,GreaterThan 就會擲回 ArgumentException 例外狀況。 如果引數是 VirtualPointGreaterThan 會與 VirtualPoint 比較虛擬位置 (Virtual Position),否則在其他情況下,它會與實體位置進行比較。

範例

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 介面

GreaterThan 多載

EnvDTE80 命名空間

其他資源

HOW TO:編譯和執行 Automation 物件模型程式碼範例