example_01.bmx 340 B

123456789101112131415161718192021
  1. SuperStrict
  2. Framework brl.standardio
  3. Import text.graphviz
  4. Local gvc:TGVGraphviz = New TGVGraphviz
  5. Local dot:String = """
  6. digraph G {Hello->World}
  7. """
  8. Local graph:TAGraph = TAGraph.FromString(dot)
  9. If graph
  10. Local res:Int = gvc.Layout(graph, "dot")
  11. Print "Layout result: " + res
  12. End If
  13. Local svg:String = gvc.ToSvg(graph)
  14. Print svg