Oddity with Modern Preferences and combo box

General
2

I’ve solved my problem. I think it’s a bit of a hack but it works. I saw an earlier thread (Auto to Text) where it seems possible to force an auto variable into a Text variable. My mangled hack of that more elegant code looks like this:

Function autoToText(a as Auto) As Text
Dim info As Xojo.Introspection.TypeInfo = Xojo.Introspection.GetType(a)

select case info.Name
case "Text"
  return CType(a, Text)
end select
End Function

I wish that the original ModernPreferences didn’t have to use Auto.