Как установить размер шрифта метки GTK с помощью gi-gtk-декларативного? - PullRequest
1 голос
/ 26 февраля 2020

Я хочу увеличить текст, но не знаю как. (Я обнаружил, что Label имеет атрибут attributes типа PangoAttrList, но не может понять, как создать последний (если действительно так устанавливается размер шрифта) в контексте, где он может быть установлен на Label widget.)

Ниже приведен минимальный пример:

#!/usr/bin/env cabal
{- cabal:
build-depends:
  , base ^>= 4.13
  , gi-gtk
  , gi-gtk-declarative
  , gi-gtk-declarative-app-simple
ghc-options:
  -Wall
  -threaded
-}

{-# LANGUAGE OverloadedLabels #-}
{-# LANGUAGE OverloadedLists #-}
{-# LANGUAGE OverloadedStrings #-}

import Data.Void (absurd)

import qualified GI.Gtk as Gtk hiding ((:=), on)
import qualified GI.Gtk.Declarative as Gtk
import qualified GI.Gtk.Declarative.App.Simple as Gtk

main :: IO ()
main = () <$ Gtk.run Gtk.App
  { Gtk.view = \ () ->
        Gtk.bin Gtk.Window [#title Gtk.:= "example"] $
        Gtk.widget Gtk.Label [#label Gtk.:= "foobar" {- What should be here? -}]
  , Gtk.update = \ () -> absurd
  , Gtk.inputs = []
  , Gtk.initialState = ()
  }
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...