Вам нужна функция addHeader
из Web.Scotty:
http://hackage.haskell.org/package/scotty-0.11.3/docs/Web-Scotty.html [ 114]
addHeader :: Text -> Text -> ActionM ()
Пример:
{-#Language OverloadedStrings#-}
import Network.Wai.Middleware.Static
import Web.Scotty
main :: IO ()
main = do
scotty 3000 $ do
middleware static
get "/some/:file" $ do
f <- param "file"
addHeader "Content-Type" "image/png"
file f
Запрос к http: // localhost: 3000 / some / image возвращает файл с именем «image» с тип содержимого image/png
:
Самое легкое решение, которое я нашел для этой проблемы.
Должен использовать BindableRichTextBox, который может быть найден по http://www.shawnduggan.com/?p=54
Используя Преобразователи преобразовывают строку HTML в XAML и затем превращают его в объект FlowDocument
Свяжите документ BindableRichTextBox
Заставьте RichTextBox быть похожим на TextBlock (Focusable = "Ложь", BorderThinkness = "0", BorderBrush = "Белый".... и т.д.)
Что-то, что я сделал в прошлом, должно использовать ContentControl со свойством Content, связанным со строкой с ValueConverter, который возвращает динамично созданный TextBlock. Другие решения могут быть найдены здесь, включая этого.