Add extension to text editor that allows to inject automation peer that represents IntelliSense suggesiton list and the currently selected suggestion - to allow screen narrators to read the suggestion.

Author: sloutsky

ICSharpCode.AvalonEdit/Editing/TextArea.cs

@@ -1085,6 +1085,15 @@ public bool OverstrikeMode {
 
 		#endregion
 
+		#region AutomationPeer for IntelliSense
+		/// <summary>
+		/// Gets or sets AutomationPeer instance used by IntelliSense.
+		/// CompletionWindow can use this property to inject AutomationPeer that reflects
+		/// the suggestion list and the value of the currently selected CompletionData item.
+		/// </summary>
+		public System.Windows.Automation.Peers.AutomationPeer ActiveIntelliSenseAutomationPeer { get; set; }
+		#endregion
+
 		/// <inheritdoc/>
 		protected override System.Windows.Automation.Peers.AutomationPeer OnCreateAutomationPeer()
 		{

ICSharpCode.AvalonEdit/Editing/TextRangeProvider.cs

@@ -76,6 +76,11 @@ public ITextRangeProvider Clone()
 		public bool Compare(ITextRangeProvider range)
 		{
 			TextRangeProvider other = (TextRangeProvider)range;
+			if (textArea.ActiveIntelliSenseAutomationPeer != null) {
+				Log("{0}.Compare({1}) [ActiveIntelliSenseAutomationPeer != null]= false", ID, other.ID);
+				return false;
+			}
+
 			bool result = doc == other.doc
 				&& segment.Offset == other.segment.Offset
 				&& segment.EndOffset == other.segment.EndOffset;
@@ -194,6 +199,11 @@ public IRawElementProviderSimple GetEnclosingElement()
 		public string GetText(int maxLength)
 		{
 			Log("{0}.GetText({1})", ID, maxLength);
+			if (textArea.ActiveIntelliSenseAutomationPeer != null) {
+				var result = textArea.ActiveIntelliSenseAutomationPeer.GetName();
+				Log("{0}.GetText({1}) --> {2}", ID, maxLength, result);
+				return result;
+			}
 			if (maxLength < 0)
 				return doc.GetText(segment);
 			else