TextPattern.IndentationFirstLineAttribute 字段
定义
重要
一些信息与预发行产品相关,相应产品在发行之前可能会进行重大修改。 对于此处提供的信息,Microsoft 不作任何明示或暗示的担保。
标识文本范围的 IndentationFirstLine
(TextIndent) 特性。
public: static initonly System::Windows::Automation::AutomationTextAttribute ^ IndentationFirstLineAttribute;
public static readonly System.Windows.Automation.AutomationTextAttribute IndentationFirstLineAttribute;
staticval mutable IndentationFirstLineAttribute : System.Windows.Automation.AutomationTextAttribute
Public Shared ReadOnly IndentationFirstLineAttribute As AutomationTextAttribute
字段值
示例
以下示例演示如何获取 Microsoft 记事本中文本范围的属性值。
备注
Microsoft 记事本仅用于文本提供程序。 无法保证 Microsoft 记事本支持所请求的属性值。
private void GetIndentationFirstLineAttribute()
{
// 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.IndentationFirstLineAttribute);
if (oAttribute == TextPattern.MixedAttributeValue)
{
Console.WriteLine("Mixed first line indents.");
}
else
{
Console.WriteLine(oAttribute.ToString());
}
}
Private Sub GetIndentationFirstLineAttribute()
' 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.IndentationFirstLineAttribute)
If (oAttribute = TextPattern.MixedAttributeValue) Then
Console.WriteLine("Mixed first line indentations.")
Else
Console.WriteLine(oAttribute.ToString())
End If
End Sub
注解
此属性表示应用于与调用文本范围关联的段落 () () 的第 GraphicsUnit 一行缩进。
此标识符由UI 自动化客户端应用程序使用。 UI 自动化提供程序应使用等效字段。TextPatternIdentifiers
UI 自动化客户端通过调用GetAttributeValue获取特性的值。
此属性的值的类型 Double。 默认值是 zero
。