Cell[TextData[{ "(16) ", ButtonBox["[images]", BaseStyle->"Hyperlink", ButtonData->{"https://i.stack.imgur.com/gHWby.png", None}]}], "Text"]
After click the link, then open one notebook, however it's in bad encoding?
My $CharacterEncoding
is CP936
, I'm not sure whether this is related, I'm on Windows, maybe someone's environment will show the linked image good?
SystemOpen
. $\endgroup$SystemOpen
is ok, but in this case, I just wanna image show in Mathematica's new open notebook, something like Latex's formula preview or MathML window in SE, I just think it maybe developed by some setting about encoding that makes this action like as expected. Also something like a button on the image link, and thenImport
and show the image(or image's codes) in one New open Notebook. $\endgroup$CellPrint@Cell[ TextData[{ "(16) ", ButtonBox["[images]", Evaluator -> Automatic, BaseStyle -> "Hyperlink", ButtonFunction -> (Print @ Import @ # &), ButtonData -> "http://i.stack.imgur.com/gHWby.png"]}], "Text"]
$\endgroup$