TextPattern.IndentationLeadingAttribute フィールド

定義

名前空間:
System.Windows.Automation
アセンブリ:
UIAutomationClient.dll

テキスト範囲の IndentationLeading(TextIndent) 属性を識別します。

public: static initonly System::Windows::Automation::AutomationTextAttribute ^ IndentationLeadingAttribute;
public static readonly System.Windows.Automation.AutomationTextAttribute IndentationLeadingAttribute;
 staticval mutable IndentationLeadingAttribute : System.Windows.Automation.AutomationTextAttribute
Public Shared ReadOnly IndentationLeadingAttribute As AutomationTextAttribute

フィールド値

AutomationTextAttribute

例

次の例は、メモ帳でテキスト範囲の属性値Microsoft取得する方法を示しています。

Note

Microsoftメモ帳は、例としてのみテキスト プロバイダーとして使用されます。 Microsoftメモ帳は、要求される属性値をサポートする保証はありません。

private void GetIndentationLeadingAttribute()
{
    // Start application.
    Process p = Process.Start("Notepad.exe", "text.txt");

    // target --> The root AutomationElement.
    AutomationElement target = AutomationElement.FromHandle(p.MainWindowHandle);

    // Specify the control type we're looking for, in this case 'Document'
    PropertyCondition cond = new PropertyCondition(AutomationElement.ControlTypeProperty, ControlType.Document);

    AutomationElement textProvider = target.FindFirst(TreeScope.Descendants, cond);

    TextPattern textpatternPattern = textProvider.GetCurrentPattern(TextPattern.Pattern) as TextPattern;

    if (textpatternPattern == null)
    {
        Console.WriteLine("Root element does not contain a descendant that supports TextPattern.");
        return;
    }

    Object oAttribute = textpatternPattern.DocumentRange.GetAttributeValue(TextPattern.IndentationLeadingAttribute);
    if (oAttribute == TextPattern.MixedAttributeValue)
    {
        Console.WriteLine("Mixed leading indentation.");
    }
    else
    {
        Console.WriteLine(oAttribute.ToString());
    }
}

Private Sub GetIndentationLeadingAttribute()
    ' Start application.
    Dim p As Process = Process.Start("Notepad.exe", "text.txt")

    ' target --> The root AutomationElement.
    Dim target As AutomationElement = AutomationElement.FromHandle(p.MainWindowHandle)

    ' Specify the control type we're looking for, in this case 'Document'
    Dim cond As PropertyCondition = New PropertyCondition(AutomationElement.ControlTypeProperty, ControlType.Document)

    Dim textProvider As AutomationElement = target.FindFirst(TreeScope.Descendants, cond)

    Dim textpatternPattern As TextPattern = CType(textProvider.GetCurrentPattern(TextPattern.Pattern), TextPattern)

    If (textpatternPattern Is Nothing) Then
        Console.WriteLine("Root element does not contain a descendant that supports TextPattern.")
        Return
    End If

    Dim oAttribute As Object = textpatternPattern.DocumentRange.GetAttributeValue(TextPattern.IndentationLeadingAttribute)
    If (oAttribute = TextPattern.MixedAttributeValue) Then
        Console.WriteLine("Mixed leading indentations.")
    Else
        Console.WriteLine(oAttribute.ToString())
    End If
End Sub

注釈

この属性は、呼び出し元のテキスト範囲に関連付けられている段落に適用されるポイント (GraphicsUnit) の先頭のインデントを表します。

この識別子は、クライアント アプリケーションUI オートメーション使用されます。 UI オートメーション プロバイダーは、TextPatternIdentifiers で同等のフィールドを使用する必要があります。

UI オートメーションクライアントは、GetAttributeValue を呼び出して属性の値を取得します。

この属性の値は、 Double型です。 既定値は zero です。

適用対象

こちらもご覧ください