我正在使用svg-builder創建一些簡單的圖紙,例如
import Graphics.Svg
main :: IO ()
main = do
print $ svg contents
svg :: Element -> Element
svg content =
doctype
<> with (svg11_ content) [Version_ <<- "1.1", Width_ <<- "300", Height_ <<- "200"]
contents :: Element
contents =
circle_ [Cx_ <<- "50", Cy_ <<- "50", R_ <<-"40", Stroke_ <<- "green", Stroke_width_ <<- "4", Fill_ <<- "yellow" ]
現在我想將這些繪圖嵌入到一個普通的 Html 頁面中,例如用
blaze-html構建。困難在于,它blaze-html使用 和 之類的資料型別Html,Builder但是
svg-builder使用稱為 的資料型別Element。如何使用svg-builder Elements in blaze-html?
注意:有這個類似的問題
,但它使用blaze-svg并且我想使用svg-builder。
uj5u.com熱心網友回復:
使用renderTextfrom svg-builder,將生成的文本傳遞到preEscapedToHtmlfrom blaze-html。請注意,您不想在此處包含檔案型別。
轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/530200.html
上一篇:Haskell:函式checkDirecRio中的非詳盡模式
下一篇:無法將型別“b”與Int匹配
