Jak kontrolować wygląd czcionki w polu wprowadzania manipulatora?

Question

Przepraszam za zrobienie czegoś, co prawdopodobnie jest banalne, moje pierwsze pytanie tutaj, ale właśnie zdałem sobie sprawę, że nie wiem, jak ustawić czcionkę w polu wejściowym w sterowaniu manipulatorem. Żadna z opcji tej funkcji nie jest przeznaczona do stylizowania w polu wejściowym (AFAIK). Zastanawiałam się, czy opcja pole wejściowe będzie działać:

Style[Manipulator[0.5, Appearance -> {"Open", Tiny}], 
DefaultOptions -> {InputField -> {BaseStyle -> Directive[Red, 16]}}] 

ale tak się nie stało. Zakładam, że to jest trywialne, ale mnie zaskoczyło.

Edit

Próbowałem przy użyciu lokalnego stylu Manipulator

Cell[StyleData["Manipulator"], 
ShowStringCharacters->False, 
NumberMarks->False, 
FontFamily:>CurrentValue["PanelFontFamily"], 
FontSize->24, 
FontColor->RGBColor[1,0,0], 
FontWeight->"Bold"] 

ten zmienia kolor czcionki i wagę (nie ma to zmienić w mojej aplikacji tylko testowanie tego, co działa, a co nie), ale wciąż nie zmienia rozmiaru czcionki. Jeśli to rozwiązanie stylów pracował myślę, że to wystarczy na teraz, ale ostatecznie chciałbym mieć mały manipulator w A Manipulacja:

{{x, 40, "Hello World"}, 20, 100, 5, Appearance -> "Open", 
AppearanceElements -> {"InputField", "StepLeftButton", "StepRightButton",  
         "HideControlsButton"}, ImageSize -> Tiny} 

ale z non-tiny czcionki w polu tekstowym, a osiągnąć to poprzez bezpośredni kodowanie.

Answer 1

Jedynym sposobem, w jaki wiem, aby zmienić rozmiar tekstu w polu, jest uderzenie w całość za pomocą Magnification. Korzystanie wskazówek Simona powyżej to zrobić z Style:

Style[ 
    Manipulator[0.5, Appearance -> {"Open", Tiny}], 
    DynamicBoxOptions -> {BaseStyle -> Magnification -> 2} 
]