Metoda EditPoint2.GreaterThan —
Zwraca czy wartość EditPoint obiektu AbsoluteCharOffset właściwość jest większa niż w przypadku danego TextPoint obiektu.
Przestrzeń nazw: EnvDTE80
Zestaw: EnvDTE80 (w EnvDTE80.dll)
Składnia
'Deklaracja
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
Parametry
Point
Typ: TextPointWymagany.A TextPoint do porównania do obiektu wywołującego punktu.
Wartość zwracana
Typ: Boolean
true Jeśli Point ma mniejsze AbsoluteCharOffset wartości właściwości w porównaniu do powołania EditPoint obiektu AbsoluteCharOffset właściwość; w przeciwnym razie false.
Uwagi
GreaterThanWyrzuca ArgumentException wyjątek Jeśli Point nie znajduje się w tym samym dokumencie co obiekt wywołujący punktu.Z VirtualPoint, GreaterThan porównuje pozycje wirtualnego, jeśli argument jest VirtualPoint, w przeciwnym razie porównuje fizycznemu położeniu.
Przykłady
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.");
}
Zabezpieczenia programu .NET Framework
- Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Używanie bibliotek pochodzących z częściowo zaufanego kodu.
Zobacz też
Informacje
Inne zasoby
Porady: kompilowanie i uruchamianie kodu modelu obiektów automatyzacji — przykłady