Fix LT-5408: Show which parses are valid in chooser (#364)

* Add highlighting for parser-approved analyses

* Add GetAnalysisColor

* Change to use check marks and red Xs

* Add AddOpinion

* Add SetGuessColor.  Make double approved analyses be green

* Remove double coloring and add space

* Fix unit test failure

* Remove unnecessary changes

Author: jtmaxwell3

Src/LexText/Interlinear/ChooseAnalysisHandler.cs

@@ -387,6 +387,17 @@ internal static ITsString MakeAnalysisStringRep(IWfiAnalysis wa, LcmCache fdoCac
 				lim = -1;
 				increment = -1;
 			}
+
+			if (wa?.Cache?.LanguageProject != null)
+			{
+				Opinions uao = wa.GetAgentOpinion(wa.Cache.LangProject.DefaultUserAgent);
+				Opinions pao = wa.GetAgentOpinion(wa.Cache.LangProject.DefaultParserAgent);
+				AddOpinion(tsb, uao, InterlinVc.ApprovedGuessColor);
+				AddOpinion(tsb, pao, InterlinVc.MachineGuessColor);
+				tsb.Replace(tsb.Length, tsb.Length, " ", null);
+				tsb.SetProperties(tsb.Length - 1, tsb.Length, formTextProperties);
+			}
+
 			for (int i = start; i != lim; i += increment)
 			{
 				var mb = wa.MorphBundlesOS[i];
@@ -457,6 +468,27 @@ internal static ITsString MakeAnalysisStringRep(IWfiAnalysis wa, LcmCache fdoCac
 			return tsb.GetString();
 		}
 
+		private static void AddOpinion(ITsStrBldr tsb, Opinions opinion, int backColor)
+		{
+			int foreColor = (int)CmObjectUi.RGB(Color.Black);
+			if (opinion == Opinions.approves)
+				tsb.Replace(tsb.Length, tsb.Length, "\u2714", null); // bold check mark
+			else if (opinion == Opinions.noopinion)
+			{
+				// Use same foreground and background color to create a blank of the same width as a check mark.
+				tsb.Replace(tsb.Length, tsb.Length, "\u2714", null);
+				foreColor = backColor;
+			}
+			else if (opinion == Opinions.disapproves)
+			{
+				tsb.Replace(tsb.Length, tsb.Length, "X", null);
+				foreColor = (int)CmObjectUi.RGB(Color.Red);
+			}
+			tsb.SetStrPropValue(tsb.Length - 1, tsb.Length, (int)FwTextPropType.ktptFontFamily, "Segoe UI Symbol");
+			tsb.SetIntPropValues(tsb.Length - 1, tsb.Length, (int)FwTextPropType.ktptForeColor, (int)FwTextPropVar.ktpvDefault, foreColor);
+			tsb.SetIntPropValues(tsb.Length - 1, tsb.Length, (int)FwTextPropType.ktptBackColor, (int)FwTextPropVar.ktpvDefault, backColor);
+		}
+
 		/// <summary>
 		///
 		/// </summary>