VirtualPoint الواجهة

مقالة
09/21/2010

يسمح لك إلى معالجة النص خارج الهامش الأيمن (الهامش الأيسر في Windows ثنائية الاتجاه) نص مستند.

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

بناء الجملة

'إقرار
<GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")> _
Public Interface VirtualPoint _
    Inherits TextPoint

[GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface VirtualPoint : TextPoint

[GuidAttribute(L"42320454-626C-4DD0-9ECB-357C4F1966D8")]
public interface class VirtualPoint : TextPoint

[<GuidAttribute("42320454-626C-4DD0-9ECB-357C4F1966D8")>]
type VirtualPoint =  
    interface
        interface TextPoint
    end

public interface VirtualPoint extends TextPoint

ملاحظات

VirtualPointتشبه الكائناتTextPointالكائن إلا أنه فإنها من الممكن أن يطلب ظاهري مسافة في مستند. VirtualPointالكائنات يتم إرجاعها بواسطةTextSelection.StartPointوTextSelection.EndPoint.

ظاهري المسافة هي المسافة الفارغ إلى يمين الأسطر الموجودة من نص، و ظاهري النقاط الموجودة في هذه المنطقة.

أمثلة

Sub VirtualPointExample()
   ' Before running this example, open a text document.
   Dim objSel As TextSelection = DTE.ActiveDocument.Selection
   Dim objActive As VirtualPoint = objSel.ActivePoint
   ' Collapse the selection to the beginning of the line.
   objSel.StartOfLine()
   ' objActive is "live", tied to the position of the actual selection, 
   ' so it will reflect the new position.
   Dim iCol As Long = objActive.DisplayColumn
   ' Move the selection to the end of the line.
   objSel.EndOfLine()

   MsgBox("The length of the insertion point line is " & (objActive.DisplayColumn - iCol) & " display characters.")
   MsgBox("VirtualCharOffset value: " & objActive.VirtualCharOffset & vbCr & "VirtualDisplayColumn value: " & objActive.VirtualDisplayColumn)
End Sub

راجع أيضًَا

المرجع

VirtualPoint الأعضاء

EnvDTE مساحة الاسم

Share via