Hello!
I am trying to make nice SVG arrows.
The lines are easy, but for arrow tips I am trying the "SVG way" and don't see
the result :-(
Basically I am trying to translate the XML code there:
http://tutorials.jenkov.com/svg/marker-element.html#referencing-markers-from-a-path
as Gnoga stuff :
type Arrow_type is record area : aliased SVG.SVG_Type; defs
: Element_Type; marker_1 : Element_Type; marker_1_path :
Element_Type; content : Element_Type; end record;
Creation code:
new_arrow.defs.Create_XML_Element (new_arrow.area, SVG_Namespace,
"defs"); new_arrow.marker_1.Create_XML_Element (new_arrow.defs,
SVG_Namespace, "marker"); new_arrow.marker_1.Attribute("id",
"markerArrow"); new_arrow.marker_1.Attribute("markerWidth", "13");
new_arrow.marker_1.Attribute("markerHeight", "13");
new_arrow.marker_1.Attribute("refx", "2");
new_arrow.marker_1.Attribute("refy", "7");
new_arrow.marker_1.Attribute("orient", "auto");
new_arrow.marker_1_path.Create_XML_Element (new_arrow.marker_1, SVG_Namespace,
"path"); new_arrow.marker_1_path.Attribute ("d", "M2,2 L2,13 L8,7 L2,2");
new_arrow.marker_1_path.Attribute ("style", "fill: #000000;");
new_arrow.content.Create_XML_Element (new_arrow.area, SVG_Namespace,
"path"); new_arrow.content.Attribute ("d", 'M' &
Integer'Image(x1-minx) & Integer'Image(y1-miny) & -- Move To 'L' &
Integer'Image(x2-minx) & Integer'Image(y2-miny) -- Line To );
new_arrow.content.Attribute ("stroke", "#221111");
new_arrow.content.Attribute ("stroke-width", "1");
new_arrow.content.Attribute ("style", "marker-end: url(#markerArrow);");
The pathes displays OK, but I don't see the markers.Any clue ?
CheersGautier
------------------------------------------------------------------------------
One dashboard for servers and applications across Physical-Virtual-Cloud
Widest out-of-the-box monitoring support with 50+ applications
Performance metrics, stats and reports that give you Actionable Insights
Deep dive visibility with transaction tracing using APM Insight.
http://ad.doubleclick.net/ddm/clk/290420510;117567292;y
_______________________________________________
Gnoga-list mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gnoga-list
