EditPoint.LessThan, méthode
Retourne une valeur indiquant si la valeur de la propriété AbsoluteCharOffset de l'objet EditPoint appelé est inférieure à celle de l'objet TextPoint donné.
Espace de noms : EnvDTE
Assembly : EnvDTE (dans EnvDTE.dll)
Syntaxe
'Déclaration
Function LessThan ( _
Point As TextPoint _
) As Boolean
bool LessThan(
TextPoint Point
)
bool LessThan(
[InAttribute] TextPoint^ Point
)
abstract LessThan :
Point:TextPoint -> bool
function LessThan(
Point : TextPoint
) : boolean
Paramètres
Point
Type : EnvDTE.TextPointRequis. TextPoint à comparer à l'objet de point d'appel.
Valeur de retour
Type : Boolean
Valeur booléenne indiquant true si Point a une valeur de propriété AbsoluteCharOffset supérieure à la propriété AbsoluteCharOffset de l'objet du point d'appel.
Notes
LessThan lève une exception ArgumentException si Point n'est pas dans le même document que l'objet du point d'appel. Avec l'objet VirtualPoint, LessThan compare les positions virtuelles si l'argument est un VirtualPoint. Sinon, il compare les positions « physiques ».
Exemples
Sub LessThanExample(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
void LessThanExample(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.");
}
Sécurité .NET Framework
- Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, voir Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.
Voir aussi
Référence
Autres ressources
Comment : compiler et exécuter les exemples de code du modèle objet Automation