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