私は、特定の幅と高さを持つように設定できるテキストボックスを作成したいと思います。しかし、私が作成するテキストボックスは、最初に幅と高さがないように見えます。例えば。次のコードをテキストボックスの幅及び高さハスケルの図:テキストに長さや幅がないのはなぜですか?
main = do
putStrLn $ show $ width $ myText
putStrLn $ show $ height $ myText
mainWith myText
myText :: Diagram B
myText = text "here" # lw 1 # fontSizeL 0.2 # fc grey # scaleX 1
(テキストなしで)ブランク図中結果、及びプリント「0.0」:
ghc --make Main.hs && ./Main -o circle.svg -w 400
[1 of 1] Compiling Main (Main.hs, Main.o)
Linking Main ...
0.0
0.0
するために私は他の何かの上に置く必要があるように見えるようにテキストを取得します。例えば。次のコード:
main = do
putStrLn $ show $ width $ myDiagram
putStrLn $ show $ height $ myDiagram
mainWith myDiagram
myDiagram :: Diagram B
myDiagram = myText <> myBackground
myText :: Diagram B
myText = text "here" # lw 1 # fontSizeL 0.2 # fc grey # scaleX 1
myBackground :: Diagram B
myBackground = rect 1 1 # fc black
は、期待どおりに黒い背景内に灰色のテキストを生成します。
なぜテキストボックスにサイズがありませんか?
テキストボックスの長さと幅を特定の値に設定するにはどうすればよいですか?
scaleUToXのSVGFontsは、テキストの幅を設定するためにうまくいきます。答えをありがとう! – mherzl